From f20886b99e4b9c77baec231dc9a5fbdfe9faef59 Mon Sep 17 00:00:00 2001
From: "lpsolit%gmail.com" <>
Date: Fri, 8 Jul 2005 01:33:45 +0000
Subject: Bug 299211: whine.pl fails if derive_groups is required - Patch by
 Marc Schumann <wurblzap@gmail.com> r=LpSolit a=justdave

---
 whine.pl | 8 +++++---
 1 file changed, 5 insertions(+), 3 deletions(-)

(limited to 'whine.pl')

diff --git a/whine.pl b/whine.pl
index 8be68f42c..259195720 100755
--- a/whine.pl
+++ b/whine.pl
@@ -228,9 +228,10 @@ sub get_next_event {
 
         $dbh->bz_lock_tables('whine_schedules WRITE',
                              'whine_events READ',
-                             'profiles READ',
+                             'profiles WRITE',
                              'groups READ',
-                             'user_group_map READ');
+                             'group_group_map READ',
+                             'user_group_map WRITE');
 
         # Get the event ID for the first pending schedule
         $sth_next_scheduled_event->execute;
@@ -239,7 +240,8 @@ sub get_next_event {
         return undef unless $fetched;
         my ($eventid, $owner_id, $subject, $body) = @{$fetched};
 
-        my $owner = Bugzilla::User->new($owner_id);
+        my $owner = Bugzilla::User->new($owner_id,
+                                        DERIVE_GROUPS_TABLES_ALREADY_LOCKED);
 
         my $whineatothers = $owner->in_group('bz_canusewhineatothers');
 
-- 
cgit v1.2.3-24-g4f1b