contrib/plan9/9mail
author Pierre-Yves David <pierre-yves.david@octobus.net>
Wed, 25 Jan 2023 12:51:26 +0100
changeset 50046 2264e775512b
parent 19613 4bfd3c7160d9
permissions -rw-r--r--
subrepo: use `changing_files` context in subrepository code This is better, not ideal, but better.
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
19613
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
     1
#!/bin/rc
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
     2
# 9mail - Mercurial email wrapper for upas/marshal
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
     3
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
     4
fn usage {
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
     5
	echo >[1=2] usage: mercurial/9mail -f from to [cc]
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
     6
	exit usage
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
     7
}
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
     8
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
     9
from=()
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
    10
cc=()
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
    11
to=()
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
    12
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
    13
switch($1){
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
    14
case -f
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
    15
	from=$2
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
    16
case *
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
    17
	usage
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
    18
}
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
    19
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
    20
to=($3)
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
    21
if(~ $#* 4)
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
    22
	cc=(-C $4)
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
    23
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
    24
upasname=$from
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
    25
upas/marshal $cc $to
4bfd3c7160d9 9mail: new script to add support for Plan 9 upas/marshal email wrapper
Jeff Sickel <jas@corpus-callosum.com>
parents:
diff changeset
    26