Update login.tcl

Cleaned up some mess left in for some reason