I haven't used Tk in several years, so I'm pulling this out of thin air, but...might passing a true value for -underline help?