branch: elpa/isl
commit c8861273340047f15344ef3b4174da2c88b5406f
Author: Thierry Volpiatto <[email protected]>
Commit: Thierry Volpiatto <[email protected]>
Move while-no-input on top
---
isearch-light.el | 8 ++++----
1 file changed, 4 insertions(+), 4 deletions(-)
diff --git a/isearch-light.el b/isearch-light.el
index 8a5f375b1f5..0830a431a0d 100644
--- a/isearch-light.el
+++ b/isearch-light.el
@@ -220,10 +220,10 @@ Optional argument PATTERN default to `isl-pattern'."
(defun isl-update ()
"Update `current-buffer' when `isl-pattern' change."
(with-selected-window (get-buffer-window isl-current-buffer)
- (isl-delete-overlays)
- (let ((case-fold-search (isl-set-case-fold-search))
- ov)
- (while-no-input
+ (while-no-input
+ (isl-delete-overlays)
+ (let ((case-fold-search (isl-set-case-fold-search))
+ ov)
(unless (string= isl-pattern "")
(save-excursion
(goto-char (point-min))
