Hi mmartin
The below code also would fix your problem.
$window->signal_connect(destroy => sub {Gtk2->main_quit() if (Gtk2->ma +in_level()); exit 0;}); #<---ERROR
Thanks & Regards,
Bakkiaraj M
My Perl Gtk2 technology demo project - http://code.google.com/p/saaral-soft-search-spider/ , contributions are welcome.
In reply to Re: Perl Gtk2 - ->destroy() is Not Causing the Script to Exit
by sam_bakki
in thread Perl Gtk2 - ->destroy() is Not Causing the Script to Exit
by mmartin
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |