change URL in sh/425

diff --git a/Changes b/Changes
index 671307d0ad762a222afa515b3d802bb570512fed..b1407c9dcf58eae0a025fea0048ccb7838c1c75d 100644 (file)
--- a/Changes
+++ b/Changes
@@ -1,3 +1,5 @@
+18Mar07=======================================================================
+1. change URL in show/425.
 04Mar07=======================================================================
 1. add CTY 1702 prefix data files
 22Feb07=======================================================================

diff --git a/cmd/show/425.pl b/cmd/show/425.pl
index 44ad0a30b89f7eb6a2d8df12ec22c9e73b40fdd0..c825b91bded67e6e7c8f1e7e6d4799dcc10e6e4b 100644 (file)
--- a/cmd/show/425.pl
+++ b/cmd/show/425.pl
@@ -38,7 +38,7 @@ if (!$t || $@) {
         else {
                 $op="op=search&query=".$list[0];
         }
-        my $s = "GET $url/hf/dx-news/iz5fsa/spider.php?$op HTTP/1.0\n"
+       my $s = "GET $url/hf/dx-news/spider.php?$op HTTP/1.0\n" 
         ."User-Agent:DxSpider;$main::version;$main::build;$^O;$main::mycall;$call;$list[0]\n\n";
         dbg($s) if isdbg('425');
         $t->print($s);