--- deliantra/Deliantra-Client/DC/UI.pm	2007/07/21 14:01:35	1.397
+++ deliantra/Deliantra-Client/DC/UI.pm	2007/07/21 14:32:10	1.398
@@ -1136,7 +1136,6 @@
    }
 }
 
-
 sub start_dragging {
    my ($self, $ev) = @_;
 
@@ -1158,8 +1157,8 @@
 sub invoke_mouse_wheel {
    my ($self, $ev) = @_;
 
-   $self->{vslider}->emit (mouse_wheel => $ev);
-   $self->{hslider}->emit (mouse_wheel => $ev);
+   $self->{vslider}->emit (mouse_wheel => $ev) if $self->{vslider_visible};
+   $self->{hslider}->emit (mouse_wheel => $ev) if $self->{hslider_visible};
 
    1
 }
@@ -1167,9 +1166,12 @@
 sub invoke_button_down {
    my ($self, $ev, $x, $y) = @_;
 
-   $self->start_dragging ($ev);
+   if ($ev->{button} == 2) {
+      $self->start_dragging ($ev);
+      return 1;
+   }
 
-   1
+   0
 }
 
 sub invoke_button_up {