From 61dcaaf53622ece672cc6114f3f75e5ce3544c09 Mon Sep 17 00:00:00 2001 From: Alexey Veretennikov Date: Thu, 31 Dec 2015 13:46:30 +0100 Subject: [PATCH] Removed redundand code Removed ovl-start after comments in emacs-devel since it was redundant --- loccur.el | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/loccur.el b/loccur.el index 9b110b0c2..add5a44f0 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) -- 2.39.2