diff options
Diffstat (limited to 'systems/unix/tex-fpc/ch.ch/mkundebug')
-rwxr-xr-x | systems/unix/tex-fpc/ch.ch/mkundebug | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/systems/unix/tex-fpc/ch.ch/mkundebug b/systems/unix/tex-fpc/ch.ch/mkundebug new file mode 100755 index 0000000000..f0f6c7655e --- /dev/null +++ b/systems/unix/tex-fpc/ch.ch/mkundebug @@ -0,0 +1,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) |