diff options
| -rw-r--r-- | globals.pl | 13 |
1 files changed, 8 insertions, 5 deletions
diff --git a/globals.pl b/globals.pl index 5ad624f9a..8162b9d21 100644 --- a/globals.pl +++ b/globals.pl @@ -474,12 +474,15 @@ sub AnyEntryGroups { $query .= " AND product_id = $product_id" if ($product_id); $query .= " LIMIT 1"; SendSQL($query); - $::CachedAnyEntryGroups{$product_id} = MoreSQLData(); - FetchSQLData(); - PopGlobalSQLState(); - return $::CachedAnyEntryGroups{$product_id}; + if (MoreSQLData()) { + $::CachedAnyEntryGroups{$product_id} = MoreSQLData(); + FetchSQLData(); + PopGlobalSQLState(); + return $::CachedAnyEntryGroups{$product_id}; + } else { + return undef; + } } - # # This function checks if there are any default groups defined. # If so, then groups may have to be changed when bugs move from |