X-Git-Url: https://diplodocus.org/git/nmh/blobdiff_plain/f7d05e5e1b0ee776b5a4204804197d9dc02c9b0a..54fb590089a2bf43d7987861ba57acb17cebc150:/docs/contrib/replaliases

diff --git a/docs/contrib/replaliases b/docs/contrib/replaliases
index 602abb88..efc249c1 100644
--- a/docs/contrib/replaliases
+++ b/docs/contrib/replaliases
@@ -1,7 +1,13 @@
 #### replaliases
 ####
 #### convenience functions for various repl(1) commands
-#### They're functions instead of aliases for portability.
+####
+#### They're functions instead of aliases for portability.  This file
+#### is intended to be sourced from a Bourne-compatible shell, e.g.,
+####     source `mhparam docdir`/contrib/replaliases
+#### to declare the functions.
+####
+#### Author: David Levine <levinedl@acm.org>
 
 #### If using par (see mhn.defaults), it helps to have its PARINIT
 #### environment variable set.  If you really want it to be null,
@@ -26,17 +32,56 @@ fi
 rt() {
     if [ "$1" = -h ]; then
         shift
-        repl -filter mhl.replywithoutbody -convertargs text/plain '' "$@"
+        \repl -filter mhl.replywithoutbody -convertargs text/plain '' "$@"
     elif [ "$1" = -p ]; then
         shift
-        repl -filter mhl.replywithoutbody -convertargs text/html '' "$@"
+        \repl -filter mhl.replywithoutbody -convertargs text/html '' "$@"
     else
-        repl -filter mhl.replywithoutbody \
+        \repl -filter mhl.replywithoutbody \
              -convertargs text/html '' -convertargs text/plain '' "$@"
     fi
 }
 
 
+#### Add -editor mhbuild to above.  Useful only when attachments
+#### won't be added to the message.
+####
+#### To ease editing at the What now? prompt, add a line like this to
+#### your .mh_profile:
+####     mhbuild-next: $EDITOR
+#### assuming that your EDTIOR environment variable is set; if not,
+#### replace $EDITOR above with the name of your editor.  Without that
+#### profile entry, enter "e[dit] $EDITOR" at the What now? prompt.
+rtm() {
+    rt -editor mhbuild "$@"
+}
+
+
+#### accept a calendar request
+calaccept() {
+    \repl -noformat -editor mhbuild \
+         -convertargs text/calendar '-reply accept -contenttype' "$@"
+}
+
+#### decline a calendar request
+caldecline() {
+    \repl -noformat -editor mhbuild \
+         -convertargs text/calendar '-reply decline -contenttype' "$@"
+}
+
+#### reply as tentative to a calendar request
+caltentative() {
+    \repl -noformat -editor mhbuild \
+         -convertargs text/calendar '-reply tentative -contenttype' "$@"
+}
+
+#### cancel a calendar request
+calcancel() {
+    \repl -noformat -editor mhbuild \
+         -convertargs text/calendar '-cancel -contenttype' "$@"
+}
+
+
 # Local Variables:
 # mode: sh
 # End: