fixed typo in encrypt.tcl