diff options
| author | yoctocell <public@yoctocell.xyz> | 2021-01-18 12:36:09 +0100 |
|---|---|---|
| committer | yoctocell <public@yoctocell.xyz> | 2021-01-18 12:36:09 +0100 |
| commit | c5b82e14cacaf2757e1e0de9d5a92e3fa4234e1b (patch) | |
| tree | 472835ae29358ea97a8bb7c344989a2a97cb0fc2 | |
| parent | 1b0778eb9dec87217423e2182a2f64113ccc257b (diff) | |
Make `git-email-send-email' take files as an argument
`git-email-send-email' will take a list of files as an argument.
| -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 |