--- db/prgsrc/db.cgi	2001/11/19 01:31:47	1.30
+++ db/prgsrc/db.cgi	2001/11/19 01:52:25	1.31
@@ -991,7 +991,7 @@ sub PrintAuthors
            if (!$name || !$surname) {#print "Opanki at $id\n"
                                     } else
            {
-             my $add=Tr(td([a({href=>"/cgi-bin/db.cgi?qofauthor=$id"},'[Q] ')."$name $surname", $kvo]))."\n";
+             my $add=Tr(td([a({href=>url."?qofauthor=$id"},'[Q] ')."$name $surname", $kvo]))."\n";
              print STDERR $add;
              $output.=$add;
            }