2000-12-25 00:00:00 ShengHuo ZHU <zsh@cs.rochester.edu>

	* dgnushack.el (dgnushack-compile): elc is in the current directory.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index a206792..f0be9ad 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,7 @@
 2000-12-25 00:00:00  ShengHuo ZHU  <zsh@cs.rochester.edu>
 
+       * dgnushack.el (dgnushack-compile): elc is in the current directory.
+
        * qp.el (quoted-printable-encode-region): Don't check multibyte in
        XEmacs.
 

diff --git a/lisp/dgnushack.el b/lisp/dgnushack.el
index 913c0a8..1877a1e 100644 (file)
--- a/lisp/dgnushack.el
+++ b/lisp/dgnushack.el
@@ -137,13 +137,15 @@ Modify to suit your needs."))
 
     (dolist (file files)
       (setq file (expand-file-name file srcdir))
-      (when (and (file-exists-p (setq elc (concat file "c")))
+      (when (and (file-exists-p 
+                 (setq elc (concat (file-name-nondirectory file) "c")))
                 (file-newer-than-file-p file elc))
        (delete-file elc)))
     
     (while (setq file (pop files))
       (setq file (expand-file-name file srcdir))
-      (when (or (not (file-exists-p (setq elc (concat file "c"))))
+      (when (or (not (file-exists-p 
+                     (setq elc (concat (file-name-nondirectory file) "c"))))
                (file-newer-than-file-p file elc))
        (ignore-errors
          (byte-compile-file file))))))