Commit adf4cc7e authored by Stefan Monnier's avatar Stefan Monnier
Browse files

(diff-remembered-defdir): New var.

(diff-find-file-name): Use it to flush diff-remembered-files-alist.
parent 4ec69ba5
2008-03-25 Stefan Monnier <monnier@iro.umontreal.ca>
* diff-mode.el (diff-remembered-defdir): New var.
(diff-find-file-name): Use it to flush diff-remembered-files-alist.
2008-03-25 Glenn Morris <rgm@gnu.org>
 
* calendar/cal-bahai.el (calendar-bahai-read-date): New name for
......
......@@ -672,6 +672,7 @@ data such as \"Index: ...\" and such."
;;;;
(defvar diff-remembered-files-alist nil)
(defvar diff-remembered-defdir nil)
(defun diff-filename-drop-dir (file)
(when (string-match "/" file) (substring file (match-end 0))))
......@@ -745,6 +746,10 @@ Non-nil OLD means that we want the old file.
Non-nil BATCH means to prefer returning an incorrect answer than to prompt
the user.
PREFIX is only used internally: don't use it."
(unless (equal diff-remembered-defdir default-directory)
;; Flush diff-remembered-files-alist if the default-directory is changed.
(set (make-local-variable 'diff-remembered-defdir) default-directory)
(set (make-local-variable 'diff-remembered-files-alist) nil))
(save-excursion
(unless (looking-at diff-file-header-re)
(or (ignore-errors (diff-beginning-of-file))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment