fix sh/dx

diff --git a/cmd/show/dx.pl b/cmd/show/dx.pl
index c3806f8795f801f73551384fc69c44c457ffc172..aac5fdaf27dde51d5f614642f274fef62d4f0e83 100644 (file)
--- a/cmd/show/dx.pl
+++ b/cmd/show/dx.pl
@@ -154,7 +154,8 @@ if (@freq) {
                $expr .= "(\$f0 >= $freq[$i] && \$f0 <= $freq[$i+1]) ||";
                my $r = Spot::ftor($freq[$i], $freq[$i+1]);
 #              $hint .= "m{$r\\.} ||" if $r;
-               $hint .= "m{\d+\.} ||";
+#              $hint .= "m{\d+\.} ||";
+               $hint .= "1 ||";
        }
        chop $expr;     chop $expr;
        chop $hint;     chop $hint;