| author | Pierre-Yves David <pierre-yves.david@octobus.net> |
| Wed, 06 Mar 2024 15:54:22 +0100 | |
| changeset 51532 | a0ef462cf1a4 |
| 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 |