Syntactic Confectionery Delight | |
PerlMonks |
comment on |
( [id://3333]=superdoc: print w/replies, xml ) | Need Help?? |
Hello Monks,
Perl: Strawberry Perl 5.18 (*on Windows XP) A few months ago I wrote a very large GUI program using Perl Gtk2 which still seems to be working just fine. But I'm now creating a MUCH smaller GUI script that I really just want to display a Popup window to ask the User Yes Or No. If they select "No" then the script SHOULD exit. I don't remember ever having this issue in my last GUI program, but it was a while ago now and I'm pretty confused by this error, and why the script won't exit. Here is my Gtk2 code. At first I just created a MessageDialog object with 'undef' as its parent but I was getting errors. The error wasn't specifically towards the parent window, but I decided to create a $window object (*toplevel) anyway and I just don't ever issue the "->show_all" function to display it...
So when I execute the script, the MessageDialog opens just fine and I click the "No" button and I get the following error: Gtk-CRITICAL **: gtk_main_quit: assertion `main_loops != NULL' failed at C:\Documents and Settings\Administrator\My Documents \test_gtk.pl line 10. Also, when the error gets displayed in the console window, the script basically just hangs until I do a Ctrl-C... Anyone have any idea why this isn't working, am I missing something here? Any thoughts or suggestions would be much appreciated, I'm not sure what else to try. Thanks in Advance, Matt In reply to Perl Gtk2 - ->destroy() is Not Causing the Script to Exit by mmartin
|
|