contrib/plan9/9mail
author Raphaël Gomès <rgomes@octobus.net>
Wed, 01 Sep 2021 17:40:25 +0200
changeset 48073 1e00834491a5
parent 19613 4bfd3c7160d9
permissions -rw-r--r--
rhg-cat: fallback when detecting `.` or `..` path segments We do not normalize paths correctly yet, so exclude the shortcuts. Differential Revision: https://phab.mercurial-scm.org/D11378

#!/bin/rc
# 9mail - Mercurial email wrapper for upas/marshal

fn usage {
	echo >[1=2] usage: mercurial/9mail -f from to [cc]
	exit usage
}

from=()
cc=()
to=()

switch($1){
case -f
	from=$2
case *
	usage
}

to=($3)
if(~ $#* 4)
	cc=(-C $4)

upasname=$from
upas/marshal $cc $to