shithub: bin.rc

ref: c30e1e6ba0303b7d50cbfb13686e69db0a512bdf
dir: /bin/clear/

View raw version 
#!/bin/rc
rfork e
flagfmt = 'a:clearall'
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