summaryrefslogtreecommitdiff
path: root/lisp
diff options
context:
space:
mode:
authorRichard M. Stallman <rms@gnu.org>1995-08-10 19:46:16 +0000
committerRichard M. Stallman <rms@gnu.org>1995-08-10 19:46:16 +0000
commit0f6d1f65cf7b66c6c35b6d04453dd3e16965bc2d (patch)
tree123bf21f8a3dcbdaeb730a3a4575a09a18f492ad /lisp
parent73271e4e9216b78b04edd551c6745d7a5f8df009 (diff)
downloademacs-0f6d1f65cf7b66c6c35b6d04453dd3e16965bc2d.tar.gz
(vc-dired-reformat-line): Display eight character user names correctly.
Diffstat (limited to 'lisp')
-rw-r--r--lisp/vc.el2
1 files changed, 1 insertions, 1 deletions
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)))
)))