From: minima <minima>
Date: Mon, 14 Jun 2004 12:52:29 +0000 (+0000)
Subject: fix sh/dx
X-Git-Tag: R_1_51B~43
X-Git-Url: http://dxspider.org/gitweb/gitweb.cgi?a=commitdiff_plain;h=51baf8947ebd93dcfb097a041d9c16e5efe9a8cf;p=spider.git

fix sh/dx
---

diff --git a/cmd/show/dx.pl b/cmd/show/dx.pl
index c3806f87..aac5fdaf 100644
--- 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;