From 8cc8dc43f76a87f358f71d47c6db5c8a011b032d Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Thu, 10 Aug 1995 19:46:16 +0000 Subject: [PATCH] (vc-dired-reformat-line): Display eight character user names correctly. --- lisp/vc.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) 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))) ))) -- 2.39.2