diff options
| author | Miles Bader | 2005-09-25 22:07:01 +0000 |
|---|---|---|
| committer | Miles Bader | 2005-09-25 22:07:01 +0000 |
| commit | 7b9dc9afcc06c9d5c3e3f75f3bb420d57cd1de12 (patch) | |
| tree | 27ba66e7b5ca9a56ca0c0a76169249ee48337e6c /lisp/diff.el | |
| parent | 2f022b888f8e37778c13736539bd4434cc882eb2 (diff) | |
| parent | 5fae1caef32374fffc256f7f92952398d226fff2 (diff) | |
| download | emacs-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.el | 8 |
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))) |