shithub: binrc

ref: 5491db664f00643bfe855c59a16bc20e9f4fd9aa
dir: binrc/scratch

View raw version 
#!/bin/rc
# scratch: create an acme scratch window

id=`{cat /mnt/acme/new/ctl}
id=$id(1)

echo 'name '^`{pwd}^'/-scratch' > /mnt/acme/$id/ctl
echo scratch > /mnt/acme/$id/ctl
echo nomenu > /mnt/acme/$id/ctl