branch: elpa/anzu
commit 450b4ddb4b8eef64962bd252a38a34843cf459b0
Author: Syohei YOSHIDA <[email protected]>
Commit: Syohei YOSHIDA <[email protected]>
Fix byte compile warnings(#1)
Thanks tam17aki
---
anzu.el | 12 ++++++------
1 file changed, 6 insertions(+), 6 deletions(-)
diff --git a/anzu.el b/anzu.el
index 33ef3039a3..9a11da338b 100644
--- a/anzu.el
+++ b/anzu.el
@@ -51,6 +51,11 @@ First `%d' is current position, second `%d' is total number
of matched"
"face of anzu modeline"
:group 'anzu)
+(defvar anzu--total-matched 0)
+(defvar anzu--current-posion 0)
+(defvar anzu--last-isearch-string nil)
+(defvar anzu--cached-positions nil)
+
(defun anzu--search-all-position (str)
(save-excursion
(goto-char (point-min))
@@ -70,11 +75,6 @@ First `%d' is current position, second `%d' is total number
of matched"
return i
finally return 0))
-(defvar anzu--total-matched 0)
-(defvar anzu--current-posion 0)
-(defvar anzu--last-isearch-string nil)
-(defvar anzu--cached-positions nil)
-
(defun anzu--update ()
(unless (string= isearch-string "")
(let ((result (if (string= isearch-string anzu--last-isearch-string)
@@ -121,7 +121,7 @@ First `%d' is current position, second `%d' is total number
of matched"
(add-hook 'isearch-mode-hook 'anzu--cons-mode-line nil t)
(add-hook 'isearch-mode-end-hook 'anzu--reset-mode-line nil t))
(remove-hook 'isearch-update-post-hook 'anzu--update t)
- (remove-hook 'isearch-mode-hook 'anzu--cons-mode-line nil t)
+ (remove-hook 'isearch-mode-hook 'anzu--cons-mode-line t)
(remove-hook 'isearch-mode-end-hook 'anzu--reset-mode-line t)
(anzu--reset-mode-line)))