# HG changeset patch
# User Richard M. Stallman <rms@gnu.org>
# Date 808083976 0
# Node ID e6713915dd94500a7c095e81bffc60834126c650
# Parent  3ef9f196e634e914e7325e97095e0eab9a72588b
(vc-dired-reformat-line): Display eight character user names correctly.

diff -r 3ef9f196e634 -r e6713915dd94 lisp/vc.el
--- a/lisp/vc.el	Thu Aug 10 18:55:44 1995 +0000
+++ b/lisp/vc.el	Thu Aug 10 19:46:16 1995 +0000
@@ -1138,7 +1138,7 @@
    (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)))
     )))