[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] scratch/add-vdiff 8b79246 171/258: Make sure we're in a vdiff buf
From: |
Justin Burkett |
Subject: |
[elpa] scratch/add-vdiff 8b79246 171/258: Make sure we're in a vdiff buffer on refresh |
Date: |
Wed, 17 May 2017 08:13:45 -0400 (EDT) |
branch: scratch/add-vdiff
commit 8b792464d5b7e19489676372242595626b8e717f
Author: justbur <address@hidden>
Commit: justbur <address@hidden>
Make sure we're in a vdiff buffer on refresh
---
vdiff.el | 87 ++++++++++++++++++++++++++++++++--------------------------------
1 file changed, 44 insertions(+), 43 deletions(-)
diff --git a/vdiff.el b/vdiff.el
index a3ccef3..10b8db1 100644
--- a/vdiff.el
+++ b/vdiff.el
@@ -429,49 +429,50 @@ because those are handled differently.")
(defun vdiff-refresh ()
"Asynchronously refresh diff information."
(interactive)
- (let* ((tmp-a (make-temp-file "vdiff-a-"))
- (tmp-b (make-temp-file "vdiff-b-"))
- (tmp-c (when vdiff-3way-mode
- (make-temp-file "vdiff-c-")))
- (prgm (if vdiff-3way-mode
- vdiff-diff3-program
- vdiff-diff-program))
- (ses vdiff--session)
- (cmd (mapconcat
- #'identity
- (vdiff--non-nil-list
- prgm
- (vdiff-session-whitespace-args ses)
- (vdiff-session-case-args ses)
- vdiff-diff-extra-args
- tmp-a tmp-b tmp-c)
- " "))
- (buffers (vdiff-session-buffers ses))
- (proc-buf (vdiff-session-process-buffer ses))
- (proc (get-buffer-process proc-buf)))
- (setq vdiff--last-command cmd)
- (with-current-buffer (car buffers)
- (write-region nil nil tmp-a nil 'quietly))
- (with-current-buffer (cadr buffers)
- (write-region nil nil tmp-b nil 'quietly))
- (when vdiff-3way-mode
- (with-current-buffer (nth 2 buffers)
- (write-region nil nil tmp-c nil 'quietly)))
- (when proc
- (kill-process proc))
- (with-current-buffer (get-buffer-create proc-buf)
- (erase-buffer))
- ;; (setq vdiff--last-command cmd)
- (setq proc
- (start-process-shell-command proc-buf proc-buf cmd))
- (when vdiff-3way-mode
- (process-put proc 'vdiff-3way t))
- (process-put proc 'vdiff-session ses)
- (process-put proc 'vdiff-tmp-a tmp-a)
- (process-put proc 'vdiff-tmp-b tmp-b)
- (when tmp-c
- (process-put proc 'vdiff-tmp-c tmp-c))
- (set-process-sentinel proc #'vdiff--diff-refresh-1)))
+ (when (vdiff--buffer-p)
+ (let* ((tmp-a (make-temp-file "vdiff-a-"))
+ (tmp-b (make-temp-file "vdiff-b-"))
+ (tmp-c (when vdiff-3way-mode
+ (make-temp-file "vdiff-c-")))
+ (prgm (if vdiff-3way-mode
+ vdiff-diff3-program
+ vdiff-diff-program))
+ (ses vdiff--session)
+ (cmd (mapconcat
+ #'identity
+ (vdiff--non-nil-list
+ prgm
+ (vdiff-session-whitespace-args ses)
+ (vdiff-session-case-args ses)
+ vdiff-diff-extra-args
+ tmp-a tmp-b tmp-c)
+ " "))
+ (buffers (vdiff-session-buffers ses))
+ (proc-buf (vdiff-session-process-buffer ses))
+ (proc (get-buffer-process proc-buf)))
+ (setq vdiff--last-command cmd)
+ (with-current-buffer (car buffers)
+ (write-region nil nil tmp-a nil 'quietly))
+ (with-current-buffer (cadr buffers)
+ (write-region nil nil tmp-b nil 'quietly))
+ (when vdiff-3way-mode
+ (with-current-buffer (nth 2 buffers)
+ (write-region nil nil tmp-c nil 'quietly)))
+ (when proc
+ (kill-process proc))
+ (with-current-buffer (get-buffer-create proc-buf)
+ (erase-buffer))
+ ;; (setq vdiff--last-command cmd)
+ (setq proc
+ (start-process-shell-command proc-buf proc-buf cmd))
+ (when vdiff-3way-mode
+ (process-put proc 'vdiff-3way t))
+ (process-put proc 'vdiff-session ses)
+ (process-put proc 'vdiff-tmp-a tmp-a)
+ (process-put proc 'vdiff-tmp-b tmp-b)
+ (when tmp-c
+ (process-put proc 'vdiff-tmp-c tmp-c))
+ (set-process-sentinel proc #'vdiff--diff-refresh-1))))
(defun vdiff--encode-range (insert beg &optional end)
(let* ((beg (vdiff--maybe-int beg))
- [elpa] scratch/add-vdiff 5b1b342 119/258: Remove duplicated code in vdiff-files, (continued)
- [elpa] scratch/add-vdiff 5b1b342 119/258: Remove duplicated code in vdiff-files, Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff 750a1bc 124/258: Fix bug in remove-refinements, Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff c8cba47 125/258: Fix package, Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff 83f0788 118/258: Don't make temp files global, Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff 72fe0fa 130/258: Don't update diff info while sending changes, Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff c6e30a2 136/258: Merge pull request #9 from gvol/master, Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff 53c2a6b 153/258: Fix receiving changes, Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff 5dcdc97 158/258: Remove other-window, Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff 7029054 159/258: Comment out vdiff-buffers3, Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff 97d7098 174/258: Add screenshot of three way diff, Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff 8b79246 171/258: Make sure we're in a vdiff buffer on refresh,
Justin Burkett <=
- [elpa] scratch/add-vdiff 42f56ae 177/258: Don't jump to beginning of buffer on start, Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff 192dbfe 166/258: Release vdiff-buffers3, Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff 1d8f6e7 185/258: Use correct mode for three way diff on quit, Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff 71d1d20 169/258: Add overlay markers to diff3 send/receive, Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff fef3208 189/258: Update screenshot, Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff 03e1b64 186/258: Remove unnecessary unique name function, Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff 87ade86 192/258: Always move to start of fold on close, Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff d3faef0 197/258: Refresh manually after receive, Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff a88d313 200/258: Sync scroll after fold toggle, Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff 74feddf 206/258: Adjust width of subtraction string, Justin Burkett, 2017/05/17