--- db/prgsrc/db.cgi	2003/04/09 23:31:54	1.95
+++ db/prgsrc/db.cgi	2003/04/10 00:05:04	1.96
@@ -766,7 +766,7 @@ sub PrintList {
             a({href=>url."?".$qs."\&first=$llprint"},">>").(" "x4)
         }
 	$Output.= "$nav".br."\n";
-	my @q=@$Questions[$first..$last];
+	my @q=@$Questions[$first-1..$last-1];
 	my %q=();
 	my $sth=SelectQuestions($dbh,\@q,1);
 	for (my $i = $first; $i <= $last; $i++) {