Bug 303088: MoreSQLData and FetchSQLData/FetchOneColumn may return wrong results...

diff --git a/Bugzilla/DB.pm b/Bugzilla/DB.pm
index 153c0a65151291aee448797b05b04f0f3af8ecf3..4f7b3b1f651e7f7b71a3e96c0bd085f3ecebb5cb 100644 (file)
--- a/Bugzilla/DB.pm
+++ b/Bugzilla/DB.pm
@@ -73,6 +73,9 @@ use constant BLOB_TYPE => DBI::SQL_BLOB;
 # Bugzilla.pm. See bug 192531 for details.
 our $_current_sth;
 our @SQLStateStack = ();
+
+my $_fetchahead;
+
 sub SendSQL {
     my ($str) = @_;
 
@@ -83,6 +86,8 @@ sub SendSQL {
     # This is really really ugly, but its what we get for not doing
     # error checking for 5 years. See bug 189446 and bug 192531
     $_current_sth->{RaiseError} = 0;
+
+    undef $_fetchahead;
 }
 
 # Its much much better to use bound params instead of this
@@ -99,8 +104,6 @@ sub SqlQuote {
     return $res;
 }
 
-# XXX - mod_perl
-my $_fetchahead;
 sub MoreSQLData {
     return 1 if defined $_fetchahead;