1
0
mirror of https://github.com/fspc/gbootroot.git synced 2025-02-23 00:53:23 -05:00

No reason having multiple instances of the uml box.

This commit is contained in:
freesource 2001-08-02 05:17:43 +00:00
parent b61d0426db
commit c4252f1cc9

View File

@ -1083,6 +1083,8 @@ sub advanced_root_section {
sub uml_box { sub uml_box {
if (not defined $uml_window) {
$uml_window = Gtk::Window->new("toplevel"); $uml_window = Gtk::Window->new("toplevel");
$uml_window->signal_connect("destroy", \&destroy_window, $uml_window->signal_connect("destroy", \&destroy_window,
\$uml_window); \$uml_window);
@ -1255,7 +1257,12 @@ sub uml_box {
$uml_window->destroy() if $uml_window; $uml_window->destroy() if $uml_window;
} ); } );
$uml_window->show(); }
if (!visible $uml_window) {
$uml_window->show();
} else {
$uml_window->destroy;
}
} }