We've been running ActivePerl 5.8.0.806 on Windows for some time and recently upgraded to ActivePerl 5.8.8.817. Along the way (ActivePerl 5.8.4) the Perl Tk module was upgraded to 804.027. Previously, it had been using 800.???. While Perl 5.8.8 fixed the original problem we had, it introduced a problem where the behavior of DialogBox changed and our dialog boxes are no longer being displayed. A code snippet that demonstrates this is:
======= use Tk; use Tk::DialogBox; $main = MainWindow->new(); # this creates the main dialog box $dialog = $main->DialogBox (-title => "TITLE BAR TEXT", -buttons => [ "Button 1","Button 2" ] ); # this creates the desired box $main->withdraw(); # this makes the main dialog box invisible $button = $dialog->Show(); # this makes the desired dialog box appear $main->destroy(); # this destroys the main dialog box print "Button pushed: $button\n"; ======= The problem is that the user wants to hide the main window and still show the DialogBox. With version 4.x of DialogBox.pm, the "withdraw" that hides $main also keeps $dialog from being shown on the screen. How should one code it where you hide the main Tk window, but are still allowed to show a DialogBox created off the main window? Steve _______________________________________________ ActivePerl mailing list [email protected] To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
