hideshow in tcl mode hangs and never returns