[elpa] externals/vc-backup 529c86b 09/18: Print the user who owns the file

[ELPA Syncer]

branch: externals/vc-backup
commit 529c86b4e2045db5b276103242979fc6406621be
Author: Alfred M. Szmidt <ams@gnu.org>
Commit: Philip Kaludercic <philipk@posteo.net>

    Print the user who owns the file
---
 vc-backup.el | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

diff --git a/vc-backup.el b/vc-backup.el
index 9100974..3cc5f76 100644
--- a/vc-backup.el
+++ b/vc-backup.el
@@ -297,9 +297,11 @@ The results are written into BUFFER."
       (insert "Backups for " file "\n\n")
       (dolist (rev (nreverse (vc-backup--list-backup-versions file)))
        (let* ((attr (file-attributes (cdr rev)))
+               (suid (file-attribute-user-id attr))
+               (suser (or (user-login-name suid) suid))
               (stime (file-attribute-modification-time attr))
               (sdate (format-time-string "%c" stime)))
-         (insert (format "v%-25s%s\n" (car rev) sdate)))))
+         (insert (format "v%-25s%s (%s)\n" (car rev) sdate suser)))))
     (goto-char (point-min))
     (forward-line 2))
   'limit-unsupported)