kmacro-x

a fork of vifon's kmacro-x
git clone https://git.trogloxene.org/kmacro-x.git
Log | Files | Refs | README | LICENSE

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:
Mkmacro-x-mc-extra.el | 5++---
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