harvey/acme/bin/wnew

#!/bin/rc -e

id=`{mkwnew $*}
cat >/mnt/acme/$id/body
echo clean >/mnt/acme/$id/ctl