commit c0afc03712332c896ef7e3fc6621754c2fafccff
parent 913e08cfa377eb1537ed066e2a4f08b8d8d59a5e
Author: Wojciech Siewierski <wojciech@siewierski.eu>
Date: Sun, 5 Mar 2023 15:35:04 +0100
Drop an unnecessary let binding
Diffstat:
1 file changed, 2 insertions(+), 3 deletions(-)
diff --git a/kmacro-x-mc-extra.el b/kmacro-x-mc-extra.el
@@ -44,10 +44,9 @@ Some code borrowed from `mc/toggle-cursor-on-click'."
(unless (windowp (posn-window position))
(user-error "Position not in text area of window"))
(select-window (posn-window position))
- (let* ((point (posn-point position))
- (overlays-at-point (overlays-at point)))
+ (let ((point (posn-point position)))
(unless (catch 'cursor
- (dolist (ov overlays-at-point)
+ (dolist (ov (overlays-at point))
(when (eq (overlay-get ov 'face) 'kmacro-x-mc-cursor-face)
(delete-overlay ov)
(setq kmacro-x-mc-cursors