diff options
Diffstat (limited to 'systems/unix/tex-fpc/ch.ch/mkuntrap')
-rwxr-xr-x | systems/unix/tex-fpc/ch.ch/mkuntrap | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/systems/unix/tex-fpc/ch.ch/mkuntrap b/systems/unix/tex-fpc/ch.ch/mkuntrap new file mode 100755 index 0000000000..926b9663c2 --- /dev/null +++ b/systems/unix/tex-fpc/ch.ch/mkuntrap @@ -0,0 +1,17 @@ +# undo some changes made for the trap test +# deactivate trap blocks +ed mf.ch <<'END' +g/^@x trap/.,/^@z/s/^/ /\ +?^ @x?,.p +w +q +END +# activate part blocks +test $? = 0 \ +&& ed mf.ch <<'END' +g/^ @x part/.,/^ @z/s/^ //\ +?^@x?,.p +w +q +END +test $? = 0 || (echo $0 failed ; exit 1) |