X-Git-Url: http://dxcluster.net/gitweb/gitweb.cgi?a=blobdiff_plain;f=cmd%2Fshow%2Fdx.pl;h=380328ee9486eeb76ab51b6246cac31e3846bdff;hb=08ef12723f860ed402ddb5f80ff163b1851e17ad;hp=675fb8d0fa14c830f2890aa4399ff60e031db60b;hpb=d07b38eed1044b3b88876a53b8e5870386f38a20;p=spider.git

diff --git a/cmd/show/dx.pl b/cmd/show/dx.pl
index 675fb8d0..380328ee 100644
--- a/cmd/show/dx.pl
+++ b/cmd/show/dx.pl
@@ -89,7 +89,7 @@ if ($pre) {
 	$pre .= '*' unless $pre =~ /[\*\?\[]/o;
 	$pre = shellregex($pre);
 	$expr = "\$f1 =~ m{$pre}";
-	$pre =~ s/\^//;
+	$pre =~ s/[\^\$]//g;
 	$hint = "m{\U$pre}";
 }
   
@@ -122,9 +122,10 @@ if ($info) {
 if ($spotter) {
 	$expr .= " && " if $expr;
 	$spotter = shellregex($spotter);
-	$expr .= "\$f4 =~ m{$spotter}";
+	$expr .= "\$f4 =~ m{\U$spotter}";
 	$hint .= " && " if $hint;
-	$hint .= "m{$spotter}";
+	$spotter =~ s/[\^\$]//g;
+	$hint .= "m{\U$spotter}";
 }
 
 # qsl requests