From de9dc5e59c015110136c91f8d292f337d1de4f09 Mon Sep 17 00:00:00 2001 From: Andreas Schwab Date: Sat, 24 Apr 2004 18:17:04 +0000 Subject: [PATCH] (diff): Set default-directory in diff buffer. --- lisp/diff.el | 2 ++ 1 file changed, 2 insertions(+) diff --git a/lisp/diff.el b/lisp/diff.el index 231130db212..76b1b5e60a7 100644 --- a/lisp/diff.el +++ b/lisp/diff.el @@ -111,6 +111,7 @@ With prefix arg, prompt for diff switches." ,(shell-quote-argument (or new-alt new))) " ")) (buf (get-buffer-create "*Diff*")) + (thisdir default-directory) proc) (save-excursion (display-buffer buf) @@ -125,6 +126,7 @@ With prefix arg, prompt for diff switches." (diff ',old ',new ',switches ',no-async))) (set (make-local-variable 'diff-old-temp-file) old-alt) (set (make-local-variable 'diff-new-temp-file) new-alt) + (setq default-directory thisdir) (insert command "\n") (if (and (not no-async) (fboundp 'start-process)) (progn -- 2.39.5