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

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

[elpa] master eaef5b0: * gited.el (gited-update): Preserve marks in Gite


From: Tino Calancha
Subject: [elpa] master eaef5b0: * gited.el (gited-update): Preserve marks in Gited buffer.
Date: Sat, 1 Jul 2017 00:20:35 -0400 (EDT)

branch: master
commit eaef5b06c7ddaadc4b3880cf139f4bc3ec6f694c
Author: Tino Calancha <address@hidden>
Commit: Tino Calancha <address@hidden>

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

diff --git a/packages/gited/gited.el b/packages/gited/gited.el
index 164b288..01c7a96 100644
--- a/packages/gited/gited.el
+++ b/packages/gited/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]