From: Richard M. Stallman Date: Thu, 10 Aug 1995 19:46:16 +0000 (+0000) Subject: (vc-dired-reformat-line): Display eight character user names correctly. X-Git-Tag: emacs-19.34~3041 X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=8cc8dc43f76a87f358f71d47c6db5c8a011b032d;p=emacs.git (vc-dired-reformat-line): Display eight character user names correctly. --- diff --git a/lisp/vc.el b/lisp/vc.el index fa38ca4f0d5..902367e5ac4 100644 --- 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))) )))