--- deliantra/Deliantra-Client/DC/UI.pm	2006/05/27 21:06:09	1.244
+++ deliantra/Deliantra-Client/DC/UI.pm	2006/05/27 21:15:57	1.245
@@ -225,6 +225,16 @@
    $self
 }
 
+sub toggle_visibility {
+   my ($self) = @_;
+
+   if ($self->{visible}) {
+      $self->hide;
+   } else {
+      $self->show;
+   }
+}
+
 sub destroy {
    my ($self) = @_;
 
@@ -2594,28 +2604,13 @@
       @_
    );
 
-   if ($self->{state}) {
-      $self->{state} = 0;
-      $self->toggle_flopper;
-   }
-
    $self
 }
 
 sub toggle_flopper {
    my ($self) = @_;
 
-   # TODO: use animation
-   if ($self->{state} = !$self->{state}) {
-      $CFClient::UI::ROOT->add ($self->{other});
-      $self->{other}->move ($self->coord2global (0, $self->{h}));
-      $self->_emit ("open");
-   } else {
-      $CFClient::UI::ROOT->remove ($self->{other});
-      $self->_emit ("close");
-   }
-
-   $self->_emit (changed => $self->{state});
+   $self->{other}->toggle_visibility;
 }
 
 #############################################################################