branch: externals/doc-view-follow
commit 9fd8086ad72a8830a9bf861bc313f98a8c4c9798
Author: Paul Nelson <ultr...@gmail.com>
Commit: Paul Nelson <ultr...@gmail.com>
Remove unused redisplay timer
* doc-dual-view.el (doc-dual-view--redisplay-timer): Remove this
unused variable.
(doc-dual-view-mode): Remove code that cancels the timer, as the timer
functionality is no longer used.
---
doc-dual-view.el | 10 ++--------
1 file changed, 2 insertions(+), 8 deletions(-)
diff --git a/doc-dual-view.el b/doc-dual-view.el
index 37f6a76fc3..5cc2cd3091 100644
--- a/doc-dual-view.el
+++ b/doc-dual-view.el
@@ -64,9 +64,7 @@ redisplay-func)."
(function :tag "Current Page Function")
(function :tag "Max Page Function")
(function :tag "Redisplay Function"))))
-
-(defvar-local doc-dual-view--redisplay-timer nil
- "Timer for delayed redisplay.")
+ (function :tag "Max Page Function"))))
(defun doc-dual-view--order-windows (windows)
"Order WINDOWS based on their position, leftmost (or topmost if equal)
first."
@@ -139,11 +137,7 @@ redisplay-func)."
(dolist (goto-func goto-funcs)
(if doc-dual-view-mode
(advice-add goto-func :after #'doc-dual-view--sync-pages)
- (advice-remove goto-func #'doc-dual-view--sync-pages)))))
- (when (not doc-dual-view-mode)
- (when doc-dual-view--redisplay-timer
- (cancel-timer doc-dual-view--redisplay-timer)
- (setq doc-dual-view--redisplay-timer nil))))
+ (advice-remove goto-func #'doc-dual-view--sync-pages))))))
(defun doc-dual-view--maybe-enable ()
"Enable `doc-dual-view-mode' if appropriate for this buffer."
