# HG changeset patch
# User Markus Rost <rost@math.uni-bielefeld.de>
# Date 1037309864 0
# Node ID ce84fde651fccdfe7d331d9e322bcb142f7cc80d
# Parent  89f1b9ff174d14c6593f3c962f29cab8df0ecc9c
(custom-make-dependencies): Bind load-file-name.

diff -r 89f1b9ff174d -r ce84fde651fc lisp/cus-dep.el
--- a/lisp/cus-dep.el	Thu Nov 14 21:37:10 2002 +0000
+++ b/lisp/cus-dep.el	Thu Nov 14 21:37:44 2002 +0000
@@ -54,7 +54,8 @@
 	    (insert-file-contents file)
 	    (goto-char (point-min))
 	    (string-match "\\`\\(.*\\)\\.el\\'" file)
-	    (let ((name (file-name-nondirectory (match-string 1 file))))
+	    (let ((name (file-name-nondirectory (match-string 1 file)))
+		  (load-file-name file))
 	      (if (save-excursion
 		    (re-search-forward
 		     (concat "(provide[ \t\n]+\\('\\|(quote[ \t\n]\\)[ \t\n]*"