plan9port/bin/label

#!/bin/sh

case `uname` in
SunOS)
	awk=nawk
	;;
*)
	awk=awk
	;;
esac

label() {
	echo "$@" | $awk '{printf("\033];%s\007", $0);}' >/dev/tty
}

label "$@"
various shell script fixes. add 9a, 9c, 9l wrapper scripts. label sets label on xterm/9term 2003-11-23 18:29:08 +00:00			`#!/bin/sh`

Small fixes 2004-03-31 01:01:24 +00:00			case `uname` in
			`SunOS)`
			`awk=nawk`
			`;;`
			`*)`
			`awk=awk`
			`;;`
			`esac`

various shell script fixes. add 9a, 9c, 9l wrapper scripts. label sets label on xterm/9term 2003-11-23 18:29:08 +00:00			`label() {`
label: write to /dev/tty to avoid redirections 2009-05-05 14:06:07 +00:00			`echo "$@" \| $awk '{printf("\033];%s\007", $0);}' >/dev/tty`
various shell script fixes. add 9a, 9c, 9l wrapper scripts. label sets label on xterm/9term 2003-11-23 18:29:08 +00:00			`}`

			`label "$@"`