summaryrefslogtreecommitdiff
path: root/systems/unix/tex-fpc/ch.ch/mkundebug
blob: f0f6c7655e736ed016aae7a3737c95c4945c4679 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
# deactivate debug block to turn debugging off.
case $# in
1) tm=$1 ;;
*) tm=tex ;;
esac
ed $tm.ch <<'END'
g/^@x debug/.,/^@z/s/^/	/\
?^	@x?,.p
w
q
END
test $? = 0 || (echo $0 $1 failed ; exit 1)