From: Eric Bollengier <eric@eb.homelinux.org>
Date: Mon, 19 Nov 2007 14:11:42 +0000 (+0000)
Subject: ebl  Fix a mysql DBI bug in group delete action
X-Git-Tag: Release-3.0.0~2224
X-Git-Url: https://git.sur5r.net/?a=commitdiff_plain;h=e396ac4a791251317e403275f21a11f28761674f;p=bacula%2Fbacula

ebl  Fix a mysql DBI bug in group delete action


git-svn-id: https://bacula.svn.sourceforge.net/svnroot/bacula/trunk@5961 91ce42f0-d328-0410-95d8-f526ca767f89
---

diff --git a/gui/bweb/lib/Bweb.pm b/gui/bweb/lib/Bweb.pm
index 9589b30ca9..0a5fbd001b 100644
--- a/gui/bweb/lib/Bweb.pm
+++ b/gui/bweb/lib/Bweb.pm
@@ -2639,26 +2639,25 @@ sub groups_del
 
     $self->{dbh}->begin_work();
 
-    my $query = "
+    $self->dbh_do("
 DELETE FROM client_group_member 
       WHERE client_group_id IN 
            (SELECT client_group_id 
               FROM client_group 
-             WHERE client_group_name = $arg->{qclient_group});
+             WHERE client_group_name = $arg->{qclient_group})");
 
+    $self->dbh_do("
 DELETE FROM bweb_client_group_acl
       WHERE client_group_id IN
            (SELECT client_group_id 
               FROM client_group 
-             WHERE client_group_name = $arg->{qclient_group});
+             WHERE client_group_name = $arg->{qclient_group})");
 
+    $self->dbh_do("
 DELETE FROM client_group
-      WHERE client_group_name = $arg->{qclient_group};
-";
-    $self->dbh_do($query);
+      WHERE client_group_name = $arg->{qclient_group}");
 
     $self->{dbh}->commit();
-    
     $self->display_groups();
 }