tcall wmail to send mail. - plan9port - [fork] Plan 9 from user space
 (HTM) git clone git://src.adamsgaard.dk/plan9port
 (DIR) Log
 (DIR) Files
 (DIR) Refs
 (DIR) README
 (DIR) LICENSE
       ---
 (DIR) commit f69a6ff541fc1aba9cc5c968524306a52e8842f0
 (DIR) parent 18b0811745677e0d63e3e2fa74a6b501992ef370
 (HTM) Author: rsc <devnull@localhost>
       Date:   Sun, 22 Aug 2004 15:38:10 +0000
       
       call wmail to send mail.
       
       Diffstat:
         A bin/wmail                           |      11 +++++++++++
         M plumb/basic                         |       3 ++-
       
       2 files changed, 13 insertions(+), 1 deletion(-)
       ---
 (DIR) diff --git a/bin/wmail b/bin/wmail
       t@@ -0,0 +1,11 @@
       +#!/bin/sh
       +
       +case "x-$MAILER" in
       +x-|x-browser)
       +        # start mail in a new window
       +        web 'mailto://'$1
       +        ;;
       +*)
       +        9term $MAILER
       +        ;;
       +esac
 (DIR) diff --git a/plumb/basic b/plumb/basic
       t@@ -49,7 +49,8 @@ plumb start wdoc2txt $file
        type is text
        data matches '[a-zA-Z0-9_+.\-]+@[a-zA-Z0-9_+.\-]*'
        plumb to sendmail
       -plumb start window rc -c '''echo % mail '''$0'; mail '$0
       +plumb start wmail $0
       +# plumb start window rc -c '''echo % mail '''$0'; mail '$0
        
        # image files go to page
        type is text