branch: externals/vc-jj
commit ba7bc7e08d8a36371f60154cc11b301a6332eb42
Author: Rudi Schlatte <r...@constantly.at>
Commit: Rudi Schlatte <r...@constantly.at>

    Fix incorrect parent info
    
    Fixes #54
---
 vc-jj.el | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/vc-jj.el b/vc-jj.el
index 90f40b5ba1..d41ca6a9aa 100644
--- a/vc-jj.el
+++ b/vc-jj.el
@@ -279,17 +279,17 @@ parents.map(|c| concat(
                             (propertize string 'face face)))))
          (info (key description change-id change-id-prefix commit-id 
commit-id-prefix)
            ;; format a changeset info line
-           (let ((change-id-suffix (substring change-id (length 
change-id-short)))
-                 (commit-id-suffix (substring commit-id (length 
commit-id-short))))
+           (let ((change-id-suffix (substring change-id (length 
change-id-prefix)))
+                 (commit-id-suffix (substring commit-id (length 
commit-id-prefix))))
              (concat
               (str (format "% -11s: " key) 'vc-dir-header)
               ;; There's no vc-dir-header-value-emphasis or similar
               ;; face, so we re-use vc-dir-status-up-to-date to render
               ;; the unique prefix
               " "
-              (str change-id-suffix 'vc-dir-status-ignored change-id-short)
+              (str change-id-suffix 'vc-dir-status-ignored change-id-prefix)
               " "
-              (str commit-id-suffix 'vc-dir-status-ignored commit-id-short)
+              (str commit-id-suffix 'vc-dir-status-ignored commit-id-prefix)
               " "
               (if (string-empty-p description)
                   (str "(no description set)")

Reply via email to