--- deliantra/Deliantra-Client/bin/cfplus	2006/06/28 10:37:19	1.82
+++ deliantra/Deliantra-Client/bin/cfplus	2006/06/28 18:48:48	1.83
@@ -1238,7 +1238,7 @@
          my $mask = $_->[1];
          $table->add ($x  , $y, new CFClient::UI::Label text => $_->[0], align => 1, expand => 1);
          $table->add ($x+1, $y, new CFClient::UI::CheckBox
-            state => $CFG->{pickup} & $mask,
+            state => $::CFG->{pickup} & $mask,
             on_changed => sub {
                my ($box, $value) = @_;
 
@@ -1257,16 +1257,18 @@
    }
 
    $table->add (2, 18, new CFClient::UI::ValSlider
-      range => [0, 0, 16, 1, 1],
+      range => [$::CFG->{pickup} & 0xF, 0, 16, 1, 1],
+      template => ">= 99",
       to_value => sub { ">= " . 5 * $_[0] },
       on_changed => sub {
          my ($slider, $value) = @_;
 
-         $::CFG->{pickup} &= ~0x7;
+         $::CFG->{pickup} &= ~0xF;
          $::CFG->{pickup} |= int $value
             if $value;
          1;
       });
+
    $table->add (3, 18, new CFClient::UI::Button 
       text => "set",
       on_activate => sub {