Keep only non-default options in .xst
Keep only non-default options in .xst

Using the .xrpt file, removed default options thus :

	grep DEFAULT= Tenyr_xst.xrpt | \
	perl -lne '($d) = /DEFAULT="(.*?)"/;' \
	       -e '($v) = /value="(.*?)"/;'   \
	       -e '($l) = /label="(.*?)"/;'   \
	       -e 'print "$l\\>" if uc $d ne uc $v' > keep
	(grep -v '^-' Tenyr.xst ; grep -f keep Tenyr.xst) > temp
	mv temp Tenyr.xst

kulp/tenyr,kulp/tenyr,kulp/tenyr