Browse Source

No reason having multiple instances of the uml box.

master
freesource 24 years ago
parent
commit
c4252f1cc9
  1. 7
      gbootroot

7
gbootroot

@ -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;
} ); } );
}
if (!visible $uml_window) {
$uml_window->show(); $uml_window->show();
} else {
$uml_window->destroy;
}
} }

Loading…
Cancel
Save