aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorMichael Albinus2008-02-03 11:58:58 +0000
committerMichael Albinus2008-02-03 11:58:58 +0000
commit4228da3ac889fa2fc40570693b77ba14bfb2f724 (patch)
treefeeae48cc8e8ea8c5b6102f2e7c9aded9a60cb5a
parent12478e677187cf37050e00fe926cef32323d162f (diff)
downloademacs-4228da3ac889fa2fc40570693b77ba14bfb2f724.tar.gz
emacs-4228da3ac889fa2fc40570693b77ba14bfb2f724.zip
* ediff-util.el (ediff-compute-custom-diffs-maybe): Handle remote files.
-rw-r--r--lisp/ediff-util.el18
1 files changed, 10 insertions, 8 deletions
diff --git a/lisp/ediff-util.el b/lisp/ediff-util.el
index 058e20f6a19..7497cd3745f 100644
--- a/lisp/ediff-util.el
+++ b/lisp/ediff-util.el
@@ -3424,10 +3424,14 @@ Without an argument, it saves customized diff argument, if available
3424 (let ((buf-A-file-name (buffer-file-name ediff-buffer-A)) 3424 (let ((buf-A-file-name (buffer-file-name ediff-buffer-A))
3425 (buf-B-file-name (buffer-file-name ediff-buffer-B)) 3425 (buf-B-file-name (buffer-file-name ediff-buffer-B))
3426 file-A file-B) 3426 file-A file-B)
3427 (unless (and buf-A-file-name (file-exists-p buf-A-file-name)) 3427 (unless (and buf-A-file-name
3428 (file-exists-p buf-A-file-name)
3429 (not (ediff-file-remote-p buf-A-file-name)))
3428 (setq file-A 3430 (setq file-A
3429 (ediff-make-temp-file ediff-buffer-A))) 3431 (ediff-make-temp-file ediff-buffer-A)))
3430 (unless (and buf-B-file-name (file-exists-p buf-B-file-name)) 3432 (unless (and buf-B-file-name
3433 (file-exists-p buf-B-file-name)
3434 (not (ediff-file-remote-p buf-B-file-name)))
3431 (setq file-B 3435 (setq file-B
3432 (ediff-make-temp-file ediff-buffer-B))) 3436 (ediff-make-temp-file ediff-buffer-B)))
3433 (or (ediff-buffer-live-p ediff-custom-diff-buffer) 3437 (or (ediff-buffer-live-p ediff-custom-diff-buffer)
@@ -3441,16 +3445,14 @@ Without an argument, it saves customized diff argument, if available
3441 ediff-custom-diff-program ediff-custom-diff-buffer 'synchronize 3445 ediff-custom-diff-program ediff-custom-diff-buffer 'synchronize
3442 ediff-custom-diff-options 3446 ediff-custom-diff-options
3443 ;; repetition of buf-A-file-name is needed so it'll return a file 3447 ;; repetition of buf-A-file-name is needed so it'll return a file
3444 (or (and buf-A-file-name (file-exists-p buf-A-file-name) buf-A-file-name) 3448 (or file-A buf-A-file-name)
3445 file-A) 3449 (or file-B buf-B-file-name))
3446 (or (and buf-B-file-name (file-exists-p buf-B-file-name) buf-B-file-name)
3447 file-B))
3448 ;; put the diff file in diff-mode, if it is available 3450 ;; put the diff file in diff-mode, if it is available
3449 (if (fboundp 'diff-mode) 3451 (if (fboundp 'diff-mode)
3450 (with-current-buffer ediff-custom-diff-buffer 3452 (with-current-buffer ediff-custom-diff-buffer
3451 (diff-mode))) 3453 (diff-mode)))
3452 (and file-A (file-exists-p file-A) (delete-file file-A)) 3454 (and file-A (delete-file file-A))
3453 (and file-B (file-exists-p file-B) (delete-file file-B)) 3455 (and file-B (delete-file file-B))
3454 )) 3456 ))
3455 3457
3456(defun ediff-show-diff-output (arg) 3458(defun ediff-show-diff-output (arg)