Skip to content

Commit 61dcaaf

Browse files
committed
Removed redundand code
Removed ovl-start after comments in emacs-devel since it was redundant
1 parent d08fdac commit 61dcaaf

File tree

1 file changed

+2
-3
lines changed

1 file changed

+2
-3
lines changed

loccur.el

Lines changed: 2 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -274,9 +274,8 @@ REGEX is an argument to `loccur'."
274274
(mapcar (lambda (line)
275275
(let ((beginning (car line)))
276276
(unless ( = (- beginning prev-end) 1)
277-
(let ((ovl-start (if (= prev-end 1) 1 prev-end))
278-
(ovl-end (1- beginning)))
279-
(push (list ovl-start ovl-end) overlays)))
277+
(let ((ovl-end (1- beginning)))
278+
(push (list prev-end ovl-end) overlays)))
280279
(setq prev-end (nth 3 line))))
281280
buffer-matches)
282281
(push (list (1+ prev-end) (point-max)) overlays)

0 commit comments

Comments
 (0)