aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/diff.el
diff options
context:
space:
mode:
authorMiles Bader2005-09-25 22:07:01 +0000
committerMiles Bader2005-09-25 22:07:01 +0000
commit7b9dc9afcc06c9d5c3e3f75f3bb420d57cd1de12 (patch)
tree27ba66e7b5ca9a56ca0c0a76169249ee48337e6c /lisp/diff.el
parent2f022b888f8e37778c13736539bd4434cc882eb2 (diff)
parent5fae1caef32374fffc256f7f92952398d226fff2 (diff)
downloademacs-7b9dc9afcc06c9d5c3e3f75f3bb420d57cd1de12.tar.gz
emacs-7b9dc9afcc06c9d5c3e3f75f3bb420d57cd1de12.zip
Revision: miles@gnu.org--gnu-2005/emacs--unicode--0--patch-85
Merge from emacs--cvs-trunk--0 Patches applied: * emacs--cvs-trunk--0 (patch 556-561) - Update from CVS - Merge from gnus--rel--5.10 * gnus--rel--5.10 (patch 122-124) - Update from CVS: lisp/mm-url.el (mm-url-decode-entities): Fix regexp. - Update from CVS
Diffstat (limited to 'lisp/diff.el')
-rw-r--r--lisp/diff.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/lisp/diff.el b/lisp/diff.el
index 7602ecb0e37..8c4332b2da2 100644
--- a/lisp/diff.el
+++ b/lisp/diff.el
@@ -83,15 +83,15 @@ With prefix arg, prompt for diff switches."
83 (setq newf (buffer-file-name) 83 (setq newf (buffer-file-name)
84 newf (if (and newf (file-exists-p newf)) 84 newf (if (and newf (file-exists-p newf))
85 (read-file-name 85 (read-file-name
86 (concat "Diff new file: (default " 86 (concat "Diff new file (default "
87 (file-name-nondirectory newf) ") ") 87 (file-name-nondirectory newf) "): ")
88 nil newf t) 88 nil newf t)
89 (read-file-name "Diff new file: " nil nil t))) 89 (read-file-name "Diff new file: " nil nil t)))
90 (setq oldf (file-newest-backup newf) 90 (setq oldf (file-newest-backup newf)
91 oldf (if (and oldf (file-exists-p oldf)) 91 oldf (if (and oldf (file-exists-p oldf))
92 (read-file-name 92 (read-file-name
93 (concat "Diff original file: (default " 93 (concat "Diff original file (default "
94 (file-name-nondirectory oldf) ") ") 94 (file-name-nondirectory oldf) "): ")
95 (file-name-directory oldf) oldf t) 95 (file-name-directory oldf) oldf t)
96 (read-file-name "Diff original file: " 96 (read-file-name "Diff original file: "
97 (file-name-directory newf) nil t))) 97 (file-name-directory newf) nil t)))