diff options
| author | Andreas Schwab <schwab@suse.de> | 2004-04-24 18:17:04 +0000 |
|---|---|---|
| committer | Andreas Schwab <schwab@suse.de> | 2004-04-24 18:17:04 +0000 |
| commit | de9dc5e59c015110136c91f8d292f337d1de4f09 (patch) | |
| tree | 2731c52ff70b6ff17fe983884c545cb963339232 /lisp/diff.el | |
| parent | 6f60853a511cc75d822fcf1cdf24e70e23d9bc5f (diff) | |
| download | emacs-de9dc5e59c015110136c91f8d292f337d1de4f09.tar.gz | |
(diff): Set default-directory in diff buffer.
Diffstat (limited to 'lisp/diff.el')
| -rw-r--r-- | lisp/diff.el | 2 |
1 files changed, 2 insertions, 0 deletions
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 |