branch: elpa/isl
commit 1048bda00a29964fa0040a6ca375005a23aa150b
Author: Thierry Volpiatto <[email protected]>
Commit: Thierry Volpiatto <[email protected]>
Reindent and remove one unneeded progn
---
isearch-light.el | 7 +++----
1 file changed, 3 insertions(+), 4 deletions(-)
diff --git a/isearch-light.el b/isearch-light.el
index da0ef286735..f407d313c84 100644
--- a/isearch-light.el
+++ b/isearch-light.el
@@ -433,7 +433,7 @@ the initial position i.e. the position before launching
`isl-search'."
(push (cons start (save-excursion
(forward-line (- isl-visible-context-lines))
(1- (point-at-bol))))
- hiddens)
+ hiddens)
(forward-line isl-visible-context-lines)
(goto-char (setq start (point-at-eol)))))
(when hiddens
@@ -443,9 +443,8 @@ the initial position i.e. the position before launching
`isl-search'."
do (let ((ol (make-overlay beg end)))
(overlay-put ol 'isl-invisible t)
(overlay-put ol 'invisible 'isl-invisible)))))
- (progn
- (remove-overlays nil nil 'isl-invisible t)
- (remove-from-invisibility-spec '(isl-invisible . t))))))
+ (remove-overlays nil nil 'isl-invisible t)
+ (remove-from-invisibility-spec '(isl-invisible . t)))))
(defun isl-iter-circular (seq)
"Infinite iteration on SEQ."
