X-Git-Url: https://git.notmuchmail.org/git?p=notmuch;a=blobdiff_plain;f=emacs%2Fmake-deps.el;h=91f4ef3dd08c5f8bd757a2423c1afc15693a2945;hp=5b6db6986dc0953d41a3564ede46a6aba7ffc11c;hb=73b8f0b8d71af395667022395b6d6bb692c3aaf2;hpb=c3a683299d4c27d6eadaacf4fb516f73a6c69fc3

diff --git a/emacs/make-deps.el b/emacs/make-deps.el
index 5b6db698..91f4ef3d 100644
--- a/emacs/make-deps.el
+++ b/emacs/make-deps.el
@@ -23,7 +23,6 @@
 
 (defun batch-make-deps ()
   "Invoke `make-deps' for each file on the command line."
-
   (setq debug-on-error t)
   (dolist (file command-line-args-left)
     (let ((default-directory command-line-default-directory))
@@ -37,8 +36,8 @@
 This prints make dependencies to `standard-output' based on the
 top-level `require' expressions in the current buffer.  Paths in
 rules will be given relative to DIR, or `default-directory'."
-
-  (setq dir (or dir default-directory))
+  (unless dir
+    (setq dir default-directory))
   (save-excursion
     (goto-char (point-min))
     (condition-case nil