[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] master 59cbc41: Use local binding of `post-command-hook' to reset
From: |
Michael Heerdegen |
Subject: |
[elpa] master 59cbc41: Use local binding of `post-command-hook' to reset wrap flag |
Date: |
Mon, 4 Dec 2017 07:04:52 -0500 (EST) |
branch: master
commit 59cbc41e2bfff171c744123335bd1d3e2a2865e7
Author: Michael Heerdegen <address@hidden>
Commit: Michael Heerdegen <address@hidden>
Use local binding of `post-command-hook' to reset wrap flag
The current search is a global thing, so we must use the global value
of `post-command-hook' to reset the `el-search--wrap-flag'.
---
packages/el-search/el-search.el | 6 +++---
1 file changed, 3 insertions(+), 3 deletions(-)
diff --git a/packages/el-search/el-search.el b/packages/el-search/el-search.el
index be58eae..95441d6 100644
--- a/packages/el-search/el-search.el
+++ b/packages/el-search/el-search.el
@@ -7,7 +7,7 @@
;; Created: 29 Jul 2015
;; Keywords: lisp
;; Compatibility: GNU Emacs 25
-;; Version: 1.4.0.7
+;; Version: 1.4.0.8
;; Package-Requires: ((emacs "25") (stream "2.2.4"))
@@ -1905,12 +1905,12 @@ local binding of `window-scroll-functions'."
(defun el-search--reset-wrap-flag ()
(unless (or (eq this-command 'el-search-query-replace)
(eq this-command 'el-search-pattern))
- (remove-hook 'post-command-hook 'el-search--reset-wrap-flag t)
+ (remove-hook 'post-command-hook 'el-search--reset-wrap-flag)
(setq el-search--wrap-flag nil)))
(defun el-search--set-wrap-flag (value)
(when value
- (add-hook 'post-command-hook #'el-search--reset-wrap-flag t t))
+ (add-hook 'post-command-hook #'el-search--reset-wrap-flag t))
(setq el-search--wrap-flag value))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- [elpa] master 59cbc41: Use local binding of `post-command-hook' to reset wrap flag,
Michael Heerdegen <=