shithub: bin.rc

ref: 2b61ac07407f664888705b5584b0ff04afb1dcda
dir: /bin/last/

View raw version 
#!/bin/rc

# Repeats on standard output the textual output
# of the last command in a current rio window.
# May be considered a complement to "(1).

awk '
	/^'^$prompt(1)^'/ {clear = 1; next}
	{
		if(clear){
			clear = 0
			i = 0
			delete buf
		}
		buf[i++] = $0
	}
	END{
		for(i=0; i<length(buf); i++)
			print buf[i]
	}
' /dev/text