branch: elpa/magit
commit c59ac90f6cc43034515e6cffb96231c9ccda7083
Author: Jonas Bernoulli <[email protected]>
Commit: Jonas Bernoulli <[email protected]>

    magit-blob-{ancestor,successor}: Abbreviate returned hash
---
 lisp/magit-files.el | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/lisp/magit-files.el b/lisp/magit-files.el
index 3d32330e25e..e60e87a43c8 100644
--- a/lisp/magit-files.el
+++ b/lisp/magit-files.el
@@ -423,7 +423,7 @@ the same location in the respective file in the working 
tree."
 (defun magit-blob-ancestor (rev file)
   (nth (if rev 1 0)
        (seq-partition (magit-with-toplevel
-                        (magit-git-lines "log" "-2" "--format=%H" "--name-only"
+                        (magit-git-lines "log" "-2" "--format=%h" "--name-only"
                                          "--follow" (or rev "HEAD") "--" file))
                       2)))
 
@@ -431,7 +431,7 @@ the same location in the respective file in the working 
tree."
   (pcase rev
     ("{worktree}" nil)
     (_ (let ((lines (magit-with-toplevel
-                      (magit-git-lines "log" "--format=%H" "--name-only"
+                      (magit-git-lines "log" "--format=%h" "--name-only"
                                        "--follow" "HEAD" "--" file))))
          (catch 'found
            (while lines

Reply via email to