shithub: bin.rc

ref: 7888f0d7ab5dbd4f0a92cef3730590a4c7b9bea8
dir: /bin/clear/

View raw version 
#!/bin/rc -e
rfork e
flagfmt = 'a:clearall'; args = ''
eval `{aux/getflags $*} || aux/usage

if(~ $clearall 1)
	>/dev/text && exit
</dev/text sed '/^'^$prompt(1)^'/q' | sed '$d' >/tmp/clear
cat /tmp/clear >/dev/text