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