diff options
Diffstat (limited to 'lisp/vc-git.el')
| -rw-r--r-- | lisp/vc-git.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/lisp/vc-git.el b/lisp/vc-git.el index 9f18418425e..5c0b9129485 100644 --- a/lisp/vc-git.el +++ b/lisp/vc-git.el | |||
| @@ -268,9 +268,8 @@ | |||
| 268 | 268 | ||
| 269 | (defun vc-git-status-printer (info) | 269 | (defun vc-git-status-printer (info) |
| 270 | "Pretty-printer for the vc-dir-fileinfo structure." | 270 | "Pretty-printer for the vc-dir-fileinfo structure." |
| 271 | (let* ((state (if (vc-dir-fileinfo->directory info) | 271 | (let* ((isdir (vc-dir-fileinfo->directory info)) |
| 272 | 'DIRECTORY | 272 | (state (if isdir "" (vc-dir-fileinfo->state info))) |
| 273 | (vc-dir-fileinfo->state info))) | ||
| 274 | (extra (vc-dir-fileinfo->extra info)) | 273 | (extra (vc-dir-fileinfo->extra info)) |
| 275 | (old-perm (when extra (vc-git-extra-fileinfo->old-perm extra))) | 274 | (old-perm (when extra (vc-git-extra-fileinfo->old-perm extra))) |
| 276 | (new-perm (when extra (vc-git-extra-fileinfo->new-perm extra)))) | 275 | (new-perm (when extra (vc-git-extra-fileinfo->new-perm extra)))) |