branch: master
commit 61dcaaf53622ece672cc6114f3f75e5ce3544c09
Author: Alexey Veretennikov <alexey.veretenni...@gmail.com>
Commit: Alexey Veretennikov <alexey.veretenni...@gmail.com>
Removed redundand code
Removed ovl-start after comments in emacs-devel since
it was redundant
---
loccur.el | 5 ++---
1 files changed, 2 insertions(+), 3 deletions(-)
diff --git a/loccur.el b/loccur.el
index 9b110b0..add5a44 100644
--- a/loccur.el
+++ b/loccur.el
@@ -274,9 +274,8 @@ REGEX is an argument to `loccur'."
(mapcar (lambda (line)
(let ((beginning (car line)))
(unless ( = (- beginning prev-end) 1)
- (let ((ovl-start (if (= prev-end 1) 1 prev-end))
- (ovl-end (1- beginning)))
- (push (list ovl-start ovl-end) overlays)))
+ (let ((ovl-end (1- beginning)))
+ (push (list prev-end ovl-end) overlays)))
(setq prev-end (nth 3 line))))
buffer-matches)
(push (list (1+ prev-end) (point-max)) overlays)
