# activate chatty blocks case $# in 1) tm=$1 ;; *) tm=tex ;; esac ed $tm.ch <<'END' g/^ @x chatty/.,/^ @z/s/^ //\ ?^@x?,.p w q END test $? = 0 || (echo failed; exit 1)