How would I make a top level window unclosable until a defined action is performed. For example, if I have a password prompt, how would I expand the TLW, remove the close, maximize and minimize icons? And make sure nothing else can be done until the password is entered. I am using Perl Tk