--- deliantra/Deliantra-Client/DC/UI.pm	2007/07/15 22:07:48	1.371
+++ deliantra/Deliantra-Client/DC/UI.pm	2007/07/15 22:13:43	1.372
@@ -1063,7 +1063,8 @@
    ;
 
    $self = $class->SUPER::new (
-      vp         => (new CFPlus::UI::ViewPort expand => 1),
+      scroll_x   => 0,
+      scroll_y   => 1,
       can_events => 1,
       hslider    => $hslider,
       vslider    => $vslider,
@@ -1072,9 +1073,15 @@
       %arg,
    );
 
+   $self->{vp} = new CFPlus::UI::ViewPort
+      expand   => 1,
+      scroll_x => $self->{scroll_x},
+      scroll_y => $self->{scroll_y},
+   ;
+
    $self->SUPER::add (0, 0, $self->{vp});
-   $self->SUPER::add (1, 0, $self->{vslider});
-   $self->SUPER::add (0, 1, $self->{hslider});
+   $self->SUPER::add (1, 0, $self->{vslider}) if $self->{scroll_y};
+   $self->SUPER::add (0, 1, $self->{hslider}) if $self->{scroll_x};
 
    $self->add ($child) if $child;