Mercurial > emacs
comparison lisp/files.el @ 47302:9f4e1e4aded6
(diff-buffer-with-file): Call diff synchronously, so we don't delete
the temporary file before diff has a chance to read it.
author | Colin Walters <walters@gnu.org> |
---|---|
date | Sat, 07 Sep 2002 21:30:37 +0000 |
parents | e69385685151 |
children | fc1a7db42eee |
comparison
equal
deleted
inserted
replaced
47301:bac8aaf18835 | 47302:9f4e1e4aded6 |
---|---|
3006 (progn | 3006 (progn |
3007 (with-current-buffer buffer | 3007 (with-current-buffer buffer |
3008 (save-restriction | 3008 (save-restriction |
3009 (widen) | 3009 (widen) |
3010 (write-region (point-min) (point-max) tempfile nil 'nomessage))) | 3010 (write-region (point-min) (point-max) tempfile nil 'nomessage))) |
3011 (diff buf-filename tempfile)) | 3011 (diff buf-filename tempfile nil t)) |
3012 (when (file-exists-p tempfile) | 3012 (when (file-exists-p tempfile) |
3013 (delete-file tempfile))) | 3013 (delete-file tempfile))) |
3014 nil))) | 3014 nil))) |
3015 | 3015 |
3016 (defvar save-some-buffers-action-alist | 3016 (defvar save-some-buffers-action-alist |