[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
master 0ecebbf: ; * lisp/replace.el (occur--set-arrow): Remove unused va
From: |
Mattias Engdegård |
Subject: |
master 0ecebbf: ; * lisp/replace.el (occur--set-arrow): Remove unused variable. |
Date: |
Sun, 1 Aug 2021 09:25:32 -0400 (EDT) |
branch: master
commit 0ecebbf2746e41f4a3c3e27c18d96e74f6f3b030
Author: Mattias Engdegård <mattiase@acm.org>
Commit: Mattias Engdegård <mattiase@acm.org>
; * lisp/replace.el (occur--set-arrow): Remove unused variable.
---
lisp/replace.el | 3 +--
1 file changed, 1 insertion(+), 2 deletions(-)
diff --git a/lisp/replace.el b/lisp/replace.el
index 462cc26..54d652b 100644
--- a/lisp/replace.el
+++ b/lisp/replace.el
@@ -1446,8 +1446,7 @@ To return to ordinary Occur mode, use
\\[occur-cease-edit]."
(defun occur--set-arrow ()
"Set the overlay arrow at the first line of the occur match at point."
(save-excursion
- (let ((start (point))
- (target (get-text-property (point) 'occur-target))
+ (let ((target (get-text-property (point) 'occur-target))
;; Find the start of the occur match, in case it's multi-line.
(prev (previous-single-property-change (point) 'occur-target)))
(when (and prev (eq (get-text-property prev 'occur-target) target))
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- master 0ecebbf: ; * lisp/replace.el (occur--set-arrow): Remove unused variable.,
Mattias Engdegård <=