diff options
Diffstat (limited to 'git-email.el')
| -rw-r--r-- | git-email.el | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/git-email.el b/git-email.el index 067a10a..cf294bd 100644 --- a/git-email.el +++ b/git-email.el @@ -119,7 +119,7 @@ If no marks are found, return the filename at point." (defun git-email--vc-dir () "Return list of filenames for marked files in `vc-dir'. If no marks are found, return the filename at point." - (let* ((marked-files (vc-dir-marked-files)) + (let* ((marked-files (nreverse (vc-dir-marked-files))) (files (if marked-files marked-files (list (vc-dir-current-file))))) @@ -131,8 +131,7 @@ If no marks are found, return the filename at point." (cond ((eq major-mode 'dired-mode) (git-email--dired)) ((eq major-mode 'vc-dir-mode) - ;; We want to display the cover letter first - (nreverse (vc-dir-marked-files))) + (git-email--vc-dir)) (t (message "Not a supported major mode")))) |