Commit 8cc8dc43 authored by Richard M. Stallman's avatar Richard M. Stallman

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

parent 314001b5
......@@ -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)))
)))
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment