--- deliantra/Deliantra/Deliantra.pm	2007/03/03 19:06:03	1.91
+++ deliantra/Deliantra/Deliantra.pm	2007/03/03 19:32:00	1.92
@@ -187,13 +187,18 @@
    my $mask;
    my $value;
 
-   for (split /\s+/, lc $string) {
-      if (s/^-//) {
-         $mask  |=  $MOVE_TYPE{$_};
-         $value &= ~$MOVE_TYPE{$_};
-      } else {
-         $mask  |=  $MOVE_TYPE{$_};
-         $value |=  $MOVE_TYPE{$_};
+   if ($string =~ /^\s*\d+\s*$/) {
+      $mask = MOVE_ALL;
+      $value = $string+0;
+   } else {
+      for (split /\s+/, lc $string) {
+         if (s/^-//) {
+            $mask  |=  $MOVE_TYPE{$_};
+            $value &= ~$MOVE_TYPE{$_};
+         } else {
+            $mask  |=  $MOVE_TYPE{$_};
+            $value |=  $MOVE_TYPE{$_};
+         }
       }
    }