[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] master 25a8505 1/2: * gited.el (gited-goto-branch): Return point
From: |
Tino Calancha |
Subject: |
[elpa] master 25a8505 1/2: * gited.el (gited-goto-branch): Return point on success. |
Date: |
Fri, 30 Jun 2017 23:09:49 -0400 (EDT) |
branch: master
commit 25a85050828932e69021206a29b302f7a1621558
Author: Tino Calancha <address@hidden>
Commit: Tino Calancha <address@hidden>
* gited.el (gited-goto-branch): Return point on success.
---
packages/gited/gited.el | 7 ++++---
1 file changed, 4 insertions(+), 3 deletions(-)
diff --git a/packages/gited/gited.el b/packages/gited/gited.el
index 9e5b505..2cf11ea 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: Mon Jun 26 08:41:10 JST 2017
+;; Last-Updated: Sat Jul 01 12:04:28 JST 2017
;; By: calancha
-;; Update #: 666
+;; Update #: 667
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;
@@ -2519,7 +2519,8 @@ Return buffer position on success, else nil."
(let ((row (cl-position branch (gited-listed-branches) :test #'equal)))
(goto-char (point-min))
(forward-line (if (overlays-at (point-min)) (1+ row) row))
- (gited--goto-column (1+ gited-branch-idx)))))
+ (gited--goto-column (1+ gited-branch-idx))
+ (point))))
(defun gited-next-marked-branch (arg &optional wrap opoint)
"Move to the next ARG marked branch.