fix range over different sized numbers in sh/dx
authorminima <minima>
Thu, 3 Jun 2004 15:03:07 +0000 (15:03 +0000)
committerminima <minima>
Thu, 3 Jun 2004 15:03:07 +0000 (15:03 +0000)
cmd/show/dx.pl

index 57271e8f874a192713ee5e1ac5a1c731d3b50be2..c3806f8795f801f73551384fc69c44c457ffc172 100644 (file)
@@ -153,7 +153,8 @@ if (@freq) {
        for ($i = 0; $i < @freq; $i += 2) {
                $expr .= "(\$f0 >= $freq[$i] && \$f0 <= $freq[$i+1]) ||";
                my $r = Spot::ftor($freq[$i], $freq[$i+1]);
-               $hint .= "m{$r\\.} ||" if $r;
+#              $hint .= "m{$r\\.} ||" if $r;
+               $hint .= "m{\d+\.} ||";
        }
        chop $expr;     chop $expr;
        chop $hint;     chop $hint;