--- db/prgsrc/db.cgi	2003/06/23 02:09:35	1.121
+++ db/prgsrc/db.cgi	2003/07/05 00:32:03	1.122
@@ -250,6 +250,12 @@ sub tourhref {
    	$res.=$a?"-a":"-q" unless $gr;
    	$res.=".html";
    	$res=~s/(\#\d+)(.*)$/$2$1/;
+        my $t=$res;
+        $t=~s/\#.*$//;
+   	$res=~s/\.1// unless -e "$realHTMLDIR$t";
+        $t=$res;
+        $t=~s/\#.*$//;
+   	$res=~s/\.html/-q\.html/ unless -e "$realHTMLDIR$t";
    	$res="$HTMLDIR$res" unless $opt_z;
       	return $res;
    } else {