[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] scratch/add-vdiff f481a82 112/258: Add refresh timer delay
From: |
Justin Burkett |
Subject: |
[elpa] scratch/add-vdiff f481a82 112/258: Add refresh timer delay |
Date: |
Wed, 17 May 2017 08:13:34 -0400 (EDT) |
branch: scratch/add-vdiff
commit f481a823649078755d97818a14915b0e525315b2
Author: justbur <address@hidden>
Commit: justbur <address@hidden>
Add refresh timer delay
---
vdiff.el | 9 +++++++--
1 file changed, 7 insertions(+), 2 deletions(-)
diff --git a/vdiff.el b/vdiff.el
index f1fe921..3572151 100644
--- a/vdiff.el
+++ b/vdiff.el
@@ -181,6 +181,7 @@ because those are handled differently.")
(defvar vdiff--setting-vscroll nil)
(defvar vdiff--diff-stale nil)
(defvar vdiff--after-change-timer nil)
+(defvar vdiff--after-change-refresh-delay 1)
;; * Utilities
@@ -1034,11 +1035,15 @@ buffer)."
;; (eq vdiff-subtraction-style 'full))
;; (vdiff--scroll-function)))))
-(defun vdiff--after-change-function (beg _end _len)
+(defun vdiff--after-change-function (&rest _)
(unless vdiff--diff-stale
(setq vdiff--diff-stale t)
+ (when (timerp vdiff--after-change-timer)
+ (cancel-timer vdiff--after-change-timer))
(setq vdiff--after-change-timer
- (run-with-idle-timer 2 nil (lambda () (vdiff-refresh))))))
+ (run-with-idle-timer
+ vdiff--after-change-refresh-delay
+ nil #'vdiff-refresh))))
(defvar vdiff--bottom-left-angle-bits
(let ((vec (make-vector 13 (+ (expt 2 7) (expt 2 6)))))
- [elpa] scratch/add-vdiff 79b3434 052/258: Make some arg names more consistent, (continued)
- [elpa] scratch/add-vdiff 79b3434 052/258: Make some arg names more consistent, Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff 528a5ce 051/258: Simplify logic for sending/receiving changes, Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff c2f1ad9 068/258: Add vdiff-hydra.el, Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff e94d187 059/258: Simplify adding overlays, Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff 4596948 081/258: Reduce load in vdiff--scroll-function, Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff d65fcd7 083/258: Simplify commentary, Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff 0777eda 099/258: Add vdiff-refresh binding to prefix map, Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff d46f686 094/258: Make README table narrower, Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff 803fd6d 098/258: Add subtraction style option, Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff 5f2c72c 105/258: Change alignment algorithm, Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff f481a82 112/258: Add refresh timer delay,
Justin Burkett <=
- [elpa] scratch/add-vdiff 28d28b7 116/258: Add restore windows command, Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff 905be9c 122/258: Map remove refinements command, Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff 717d5b6 121/258: Allow failed line translation, Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff b267885 137/258: Merge branch 'gvol-master', Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff 8daa391 133/258: Add case and whitespace toggles, Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff 95a1230 154/258: Fix vscroll bug, Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff e556705 151/258: Simplify scroll function, Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff f36b6b2 162/258: Fix line-translation error, Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff 13f553f 163/258: Fix fold logic for diff3, Justin Burkett, 2017/05/17
- [elpa] scratch/add-vdiff 88e7f1c 178/258: Remove min-window-width, Justin Burkett, 2017/05/17