emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/multiple-cursors dfe8a2d 029/434: Slight optimisation


From: ELPA Syncer
Subject: [nongnu] elpa/multiple-cursors dfe8a2d 029/434: Slight optimisation
Date: Sat, 7 Aug 2021 09:19:48 -0400 (EDT)

branch: elpa/multiple-cursors
commit dfe8a2d1e893ee336d0466ac0bd6f075d4d7c597
Author: Magnar Sveen <magnars@gmail.com>
Commit: Magnar Sveen <magnars@gmail.com>

    Slight optimisation
---
 multiple-cursors.el | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/multiple-cursors.el b/multiple-cursors.el
index 6cad9e0..cd08fc3 100644
--- a/multiple-cursors.el
+++ b/multiple-cursors.el
@@ -223,10 +223,8 @@ mark-multiple if point and mark is on different columns."
     (error "Mark a set of lines first."))
   (mc/remove-additional-cursors)
   (let* ((point-line (line-number-at-pos))
-         (mark-line (save-excursion (exchange-point-and-mark) 
(line-number-at-pos)))
-         (num-cursors (abs (- point-line mark-line)))
+         (mark-line (progn (exchange-point-and-mark) (line-number-at-pos)))
          (navigation-func (if (< point-line mark-line) 'previous-line 
'next-line)))
-    (exchange-point-and-mark)
     (deactivate-mark)
     (while (not (eq (line-number-at-pos) point-line))
       (mc/add-cursor-at-point)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]