branch: elpa/isl
commit 3ebd9aeae3ebf70e1c62dd3ea27fad17db71701e
Author: Thierry Volpiatto <[email protected]>
Commit: Thierry Volpiatto <[email protected]>
Fix invalid-regexp error
---
isearch-light.el | 10 ++++++----
1 file changed, 6 insertions(+), 4 deletions(-)
diff --git a/isearch-light.el b/isearch-light.el
index e8006be9509..6bcf5184130 100644
--- a/isearch-light.el
+++ b/isearch-light.el
@@ -129,10 +129,12 @@
(unless (string= isl-pattern "")
(save-excursion
(goto-char (point-min))
- (while (re-search-forward isl-pattern nil t)
- (setq ov (make-overlay (match-beginning 0) (match-end 0)))
- (push ov isl-item-overlays)
- (overlay-put ov 'face 'isl-match))
+ (condition-case-unless-debug nil
+ (while (re-search-forward isl-pattern nil t)
+ (setq ov (make-overlay (match-beginning 0) (match-end 0)))
+ (push ov isl-item-overlays)
+ (overlay-put ov 'face 'isl-match))
+ (invalid-regexp nil))
(setq isl-item-overlays (reverse isl-item-overlays)))
(if (null isl-item-overlays)
(setq isl-number-results 0)