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

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

[elpa] externals/gited 6645603 37/73: * gited.el (gited-update): Preserv


From: Stefan Monnier
Subject: [elpa] externals/gited 6645603 37/73: * gited.el (gited-update): Preserve marks in Gited buffer.
Date: Sun, 29 Nov 2020 00:00:35 -0500 (EST)

branch: externals/gited
commit 6645603462c178b583c2461f791951aa572c5d2f
Author: Tino Calancha <tino.calancha@gmail.com>
Commit: Tino Calancha <tino.calancha@gmail.com>

    * gited.el (gited-update): Preserve marks in Gited buffer.
---
 gited.el | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

diff --git a/gited.el b/gited.el
index 164b288..01c7a96 100644
--- a/gited.el
+++ b/gited.el
@@ -10,9 +10,9 @@
 ;; Compatibility: GNU Emacs: 24.4
 ;; Version: 0.2.5
 ;; Package-Requires: ((emacs "24.4") (cl-lib "0.5"))
-;; Last-Updated: Sat Jul 01 12:05:35 JST 2017
+;; Last-Updated: Sat Jul 01 13:19:13 JST 2017
 ;;           By: calancha
-;;     Update #: 668
+;;     Update #: 669
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;;
@@ -1077,11 +1077,13 @@ date are hidden from view."
   (interactive)
   (unless (derived-mode-p major-mode 'gited-mode)
     (user-error "Cannot enable Gited mode in this buffer"))
-  (let ((target-br (ignore-errors (gited-get-branchname)))
+  (let ((marks (gited-remember-marks 1 (point-max)))
+        (target-br (ignore-errors (gited-get-branchname)))
         (at-headr-p (gited-at-header-line-p))
         (hide-details gited-hide-details-mode))
     (gited-list-branches gited-ref-kind nil 'update)
     (gited-hide-details-mode (if hide-details 1 0))
+    (when marks (gited-mark-remembered marks)) ; Preserve marks.
     (if (not at-headr-p)
         (gited-goto-branch target-br)
       (gited-goto-branch gited-current-branch))))



reply via email to

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