branch: elpa/isl
commit c5cc220942cc6da1d63f2487e4316def54a70011
Author: Thierry Volpiatto <[email protected]>
Commit: Thierry Volpiatto <[email protected]>
Fix long lines
---
isearch-light.el | 6 ++++--
1 file changed, 4 insertions(+), 2 deletions(-)
diff --git a/isearch-light.el b/isearch-light.el
index f2f51c96804..979d8dde618 100644
--- a/isearch-light.el
+++ b/isearch-light.el
@@ -308,8 +308,10 @@ symbol. The return value is a cons cell (beg . end)."
if (or (not rest)
(cl-loop for (pred . re) in rest
always (funcall pred
- (progn (goto-char (car bounds))
- (re-search-forward re (cdr
bounds) t)))))
+ (progn
+ (goto-char (car bounds))
+ (re-search-forward
+ re (cdr bounds) t)))))
do (goto-char (cdr bounds)) and return bounds
else do (goto-char (cdr bounds))
finally return nil)))
