(vc-dired-reformat-line): Display eight character user names correctly.

8cc8dc43 · Richard M. Stallman · 314001b5 · 8cc8dc43
Commit 8cc8dc43 authored Aug 10, 1995 by Richard M. Stallman
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

lisp/vc.el lisp/vc.el +1 -1

No files found.
--- a/lisp/vc.el
+++ b/lisp/vc.el
@@ -1138,7 +1138,7 @@ on a buffer attached to the file named in the current Dired buffer line."
   (t
    (if x (setq x (concat "(" x ")")))
    (if (re-search-forward "\\([0-9]+ \\).................\\( .*\\)" nil 0)
-       (let ((rep (substring (concat x "                 ") 0 9)))
+       (let ((rep (substring (concat x "                 ") 0 10)))
         (replace-match (concat "\\1" rep "\\2") t)))
    )))