summaryrefslogtreecommitdiff
path: root/scripts/mumi.in
diff options
context:
space:
mode:
authorArun Isaac <arunisaac@systemreboot.net>2023-03-08 15:36:57 +0000
committerRicardo Wurmus <rekado@elephly.net>2023-03-30 22:57:19 +0200
commit8d4c2580725a02951aeb78dc5c6d0e49220a5e9f (patch)
tree67e5b6f7a1ab35ca78827028261c2d357874be00 /scripts/mumi.in
parent4520035a18c6d96fc6de35cd9fcb489bdc6724ef (diff)
client: Support sending email to issues.
* mumi/client.scm: Import (rnrs io ports), (srfi srfi-71), (srfi srfi-171), (ice-9 match), (ice-9 popen), (web client), (web response) and (email email). (issue-number-of-message, call-with-input-pipe, git-send-email): New functions. (send-email): New public function. * scripts/mumi.in (show-mumi-usage): Document send-email subcommand. (main): Add send-email subcommand. * tests/client.scm: New file. * Makefile.am (SCM_TESTS): Add tests/client.scm.
Diffstat (limited to 'scripts/mumi.in')
-rw-r--r--scripts/mumi.in5
1 files changed, 5 insertions, 0 deletions
diff --git a/scripts/mumi.in b/scripts/mumi.in
index dfd082d..2295328 100644
--- a/scripts/mumi.in
+++ b/scripts/mumi.in
@@ -126,6 +126,9 @@
`mumi new':
clear current issue presumably to open a new one.
+ `mumi send-email':
+ send patches to debbugs.
+
`mumi web [--address=address] [--port=port] [--listen-repl[=port]] [--disable-mailer]':
start the application web server.
@@ -158,6 +161,8 @@
(client:print-current-issue))
(("new")
(client:clear-current-issue!))
+ (("send-email" . patches)
+ (client:send-email patches))
(("mailer" . rest)
(let* ((opts (parse-options rest))
(sender (assoc-ref opts 'sender))