diff options
| -rw-r--r-- | git-email.el | 15 |
1 files changed, 7 insertions, 8 deletions
diff --git a/git-email.el b/git-email.el index 0c55183..ad08548 100644 --- a/git-email.el +++ b/git-email.el @@ -342,14 +342,13 @@ behavior is to delete them after sending email." buffers))) ;;;###autoload -(defun git-email-send-email () - "Send patch(es) to someone." - (interactive) - (let ((files (git-email--get-files))) - (dolist (file files) - (run-hooks 'git-email-pre-compose-email-hook) - (git-email--compose-email file) - (run-hooks 'git-email-post-compose-email-hook)))) +(defun git-email-send-email (files) + "Send FILES as patch(es) to someone using your MUA." + (interactive (list (git-email--get-files))) + (dolist (file files) + (run-hooks 'git-email-pre-compose-email-hook) + (git-email--compose-email file) + (run-hooks 'git-email-post-compose-email-hook))) (provide 'git-email) ;;; git-email.el ends here |