--- deliantra/Deliantra-Client/DC/UI.pm	2006/05/08 20:40:31	1.187
+++ deliantra/Deliantra-Client/DC/UI.pm	2006/05/08 21:16:09	1.188
@@ -532,18 +532,21 @@
 }
 
 sub add {
-   my ($self, $child) = @_;
+   my ($self, @widgets) = @_;
 
-   $child->set_parent ($self);
+   $_->set_parent ($self)
+      for @widgets;
 
    use sort 'stable';
 
    $self->{children} = [
       sort { $a->{z} <=> $b->{z} }
-         @{$self->{children}}, $child
+         @{$self->{children}}, @widgets
    ];
 
-   $child->check_size;
+   $_->check_size
+      for @widgets;
+
    $self->update;
 }