From 6866bdda26d1feb152af991388113e2e9309fafb Mon Sep 17 00:00:00 2001 From: ivan Date: Wed, 17 Apr 2002 20:43:45 +0000 Subject: [PATCH] fix usergroup_delete DELETE syntax --- FS/FS/part_export/sqlradius.pm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/FS/FS/part_export/sqlradius.pm b/FS/FS/part_export/sqlradius.pm index fa2153f31..7337b5aa9 100644 --- a/FS/FS/part_export/sqlradius.pm +++ b/FS/FS/part_export/sqlradius.pm @@ -143,10 +143,10 @@ sub sqlradius_usergroup_delete { #subroutine, not method my( $username, @groups ) = @_; my $sth = $dbh->prepare( - "DELETE FROM usergroup ( id, UserName, GroupName ) VALUES ( ?, ?, ? )" + "DELETE FROM usergroup WHERE UserName = ? AND GroupName = ?" ) or die $dbh->errstr; foreach my $group ( @groups ) { - $sth->execute( '', $username, $group ) + $sth->execute( $username, $group ) or die "can't delete from groupname table: ". $sth->errstr; } $dbh->disconnect; -- 2.11.0