db/prgsrc/db.cgi - diff

Return to db.cgi CVS log

Up to [Local Repository] / db / prgsrc

version 1.121, 2003/06/23 02:09:35	version 1.122, 2003/07/05 00:32:03
Line 250 sub tourhref {	Line 250 sub tourhref {
$res.=$a?"-a":"-q" unless $gr;	$res.=$a?"-a":"-q" unless $gr;
$res.=".html";	$res.=".html";
$res=~s/(\#\d+)(.*)$/$2$1/;	$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;	$res="$HTMLDIR$res" unless $opt_z;
return $res;	return $res;
} else {	} else {