(defun dot () (point))

; Remove leading path specs generated by 1997 version of makedpend.
(defun fix-makedepend-output ()
  (interactive)
  (search-forward "# DO NOT DELETE THIS LINE -- make depend depends on it.")
  (while (search-forward ".o:" nil t)
    (setq d (dot))
    (search-backward "/")
    (if (= (count-lines d (dot)) 1)
	(progn
	  (forward-char 1)
	  (kill-line 0)
	  (next-line 1)
	)
    )
  )
)

(defun fix-makedepend-output-and-save ()
  (interactive)
  (let ((save-version-control version-control))
    (setq version-control 'never)
    ;(setq kept-old-versions 1000)
    ;(setq kept-new-versions 1000)
    (fix-makedepend-output)
    (save-buffer)
    (setq version-control save-version-control)
  )
)