author | Augie Fackler <raf@durin42.com> |
Tue, 22 Aug 2017 15:51:30 -0400 | |
changeset 33959 | dc95caa1ec0d |
parent 19613 | 4bfd3c7160d9 |
permissions | -rw-r--r-- |
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 |