--- db/prgsrc/db.cgi 2001/12/31 00:57:07 1.55 +++ db/prgsrc/db.cgi 2001/12/31 18:05:16 1.56 @@ -585,7 +585,7 @@ sub PrintList { (" "x4). a({href=>url."?".$qs."\&first=1"},"<<").(" "x4). a({href=>(url."?".$qs."\&first=".($first-$kvo))},"<").(" "x4) - } + } else {$nav.=' 'x15;} @@ -668,7 +668,7 @@ sub PrintSearch { $sth->execute; my ($q,$nf); ($sstr, $q,$nf)=($sth->fetchrow); - @Questions=unpack 'S*',$q; + @Questions=unpack 'S*',$q; @allnf=unpack 'S*',$nf; $sth->finish; } else