[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[elpa] externals/gited cc4d5f7 17/73: Use taggerdate/taggername when lis
From: |
Stefan Monnier |
Subject: |
[elpa] externals/gited cc4d5f7 17/73: Use taggerdate/taggername when listing tags |
Date: |
Sun, 29 Nov 2020 00:00:30 -0500 (EST) |
branch: externals/gited
commit cc4d5f7d1a37df83c09fc7dcd531a54ec9c51afa
Author: Tino Calancha <tino.calancha@gmail.com>
Commit: Tino Calancha <tino.calancha@gmail.com>
Use taggerdate/taggername when listing tags
* gited.el (gited-list-refs-format-command): Don't hardcode
authordate/authorname.
(gited--list-refs-format): New defun.
(gited--fill-branch-alist): Use it.
(gited-list-branches): Don't prune remote branches when `gited-ref-kind'
is \"tags\".
---
gited.el | 33 ++++++++++++++++++++-------------
1 file changed, 20 insertions(+), 13 deletions(-)
diff --git a/gited.el b/gited.el
index 632c805..55ba8bd 100644
--- a/gited.el
+++ b/gited.el
@@ -10,9 +10,9 @@
;; Compatibility: GNU Emacs: 24.4
;; Version: 0.2.0
;; Package-Requires: ((emacs "24.4") (cl-lib "0.5"))
-;; Last-Updated: Thu Jun 08 12:55:11 JST 2017
+;; Last-Updated: Thu Jun 08 14:26:38 JST 2017
;; By: calancha
-;; Update #: 649
+;; Update #: 650
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;
@@ -331,8 +331,7 @@ TITLE is the title of the last commit.")
(put 'gited-bisect-buffer 'permanent-local t)
(defvar gited-list-refs-format-command
- '("for-each-ref" "--format='(%(authordate:raw) \
-\"%(refname:short)\" \"%(authorname)\")'" "refs/%s")
+ '("for-each-ref" "--format='(%%(%s:raw) \"%%(refname:short)\" \"%%(%s)\")'"
"refs/%s")
"Format strings to build a Git command to list references.")
(defvar gited-date-regexp (concat "\\("
@@ -2420,15 +2419,23 @@ reach the beginning of the buffer."
(gited--move-to-column col)
(goto-char (next-single-property-change (point)
'tabulated-list-column-name)))
+(defun gited--list-refs-format (pattern)
+ (let ((refs-fmt (append (butlast gited-list-refs-format-command)
+ (list (format (car (last
gited-list-refs-format-command))
+ (if pattern
+ (pcase pattern
+ ("local" "heads")
+ ("remote" "remotes")
+ (_ pattern))
+ "heads"))))))
+ (setf (cadr refs-fmt)
+ (format (cadr refs-fmt)
+ (if (equal pattern "tags") "taggerdate" "authordate")
+ (if (equal pattern "tags") "taggername" "authorname")))
+ refs-fmt))
+
(defun gited--fill-branch-alist (&optional pattern)
- (let* ((args (append (butlast gited-list-refs-format-command)
- (list (format (car (last
gited-list-refs-format-command))
- (if pattern
- (pcase pattern
- ("local" "heads")
- ("remote" "remotes")
- (_ pattern))
- "heads")))))
+ (let* ((args (gited--list-refs-format pattern))
(alist
(with-temp-buffer
(insert "(\n")
@@ -3211,7 +3218,7 @@ in the active region."
(when (eq buffer-invisibility-spec t)
(setq buffer-invisibility-spec (list t)))
;; Check if we must prune remotes.
- (when (and (not (equal gited-ref-kind "local"))
+ (when (and (equal gited-ref-kind "remote")
(or (eq t gited-prune-remotes)
(and (eq 'daily gited-prune-remotes)
(or (not gited--last-remote-prune)
- [elpa] externals/gited 0a303a1 70/73: Make code more compact by using pcase-dolist, (continued)
- [elpa] externals/gited 0a303a1 70/73: Make code more compact by using pcase-dolist, Stefan Monnier, 2020/11/29
- [elpa] externals/gited 40e57eb 60/73: * gited/gited.el: Don't require `gited-ci`, which isn't found., Stefan Monnier, 2020/11/29
- [elpa] externals/gited b5fdc7e 61/73: Add missing file gited-ci.el, Stefan Monnier, 2020/11/29
- [elpa] externals/gited ad074e1 49/73: * packages/gited/gited.el (gited-stash-branch): Update Gited buffer on success, Stefan Monnier, 2020/11/29
- [elpa] externals/gited 36ec8fa 34/73: ; * packages/gited/gited.el: Update file header., Stefan Monnier, 2020/11/29
- [elpa] externals/gited f81463e 44/73: gited-git-checkout: New function, Stefan Monnier, 2020/11/29
- [elpa] externals/gited d78161b 56/73: * packages/gited/gited.el (gited-pull): Delete unused variable, Stefan Monnier, 2020/11/29
- [elpa] externals/gited 475e297 72/73: Support Gited buffers over a tramp connection, Stefan Monnier, 2020/11/29
- [elpa] externals/gited 8f6722e 66/73: * gited.el: Bump version to 0.5.4, Stefan Monnier, 2020/11/29
- [elpa] externals/gited e8f116d 02/73: Default to beginning of epoch when no commit time info, Stefan Monnier, 2020/11/29
- [elpa] externals/gited cc4d5f7 17/73: Use taggerdate/taggername when listing tags,
Stefan Monnier <=
- [elpa] externals/gited 68c723a 46/73: * gited.el (gited-git-checkout): Avoid harmless warning., Stefan Monnier, 2020/11/29
- [elpa] externals/gited 7a691c9 57/73: Skip tests when Git is not available, Stefan Monnier, 2020/11/29
- [elpa] externals/gited 33c42d9 55/73: gited-pull fetches all remote branches, Stefan Monnier, 2020/11/29
- [elpa] externals/gited 96ec28a 35/73: * gited.el (gited-goto-branch): Return point on success., Stefan Monnier, 2020/11/29
- [elpa] externals/gited c8eaa05 58/73: gited.el: Merge branch 'show-trunk-ci-status', Stefan Monnier, 2020/11/29
- [elpa] externals/gited 736ac62 52/73: Do not assume that 'git rev-parse 1' exits with status != 0, Stefan Monnier, 2020/11/29
- [elpa] externals/gited 910cf66 40/73: * gited.el (gited-do-sync-with-trunk): Fix typo in docstring., Stefan Monnier, 2020/11/29
- [elpa] externals/gited dc0b527 38/73: gited-do-sync-with-trunk: New command, Stefan Monnier, 2020/11/29
- [elpa] externals/gited 2ce2163 13/73: Prune deleted remote branches, Stefan Monnier, 2020/11/29
- [elpa] externals/gited fac8958 03/73: gited-list-branches: Move to current branch only when it's shown, Stefan Monnier, 2020/11/29