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)")