diff options
author | ivan <ivan> | 2002-03-23 16:16:00 +0000 |
---|---|---|
committer | ivan <ivan> | 2002-03-23 16:16:00 +0000 |
commit | 8fe83dcb8807a86209625a5aab7e574073f0a907 (patch) | |
tree | 95f5de468804a2266fbfe9b5cdb9472b280df430 /FS/FS/part_export.pm | |
parent | 4fb679b29788a552a1ce33a0cdf293d648e797bc (diff) |
group editing seems to be working... everything except defaults... oh and
export...
Diffstat (limited to 'FS/FS/part_export.pm')
-rw-r--r-- | FS/FS/part_export.pm | 8 |
1 files changed, 5 insertions, 3 deletions
diff --git a/FS/FS/part_export.pm b/FS/FS/part_export.pm index 3f184be..9aedd9f 100644 --- a/FS/FS/part_export.pm +++ b/FS/FS/part_export.pm @@ -505,9 +505,11 @@ sub _export_replace { } my @del = grep { !exists $new{$_} } keys %old; - my $error = $self->sqlradius_queue( $new->svcnum, 'sqlradius_attrib_delete', - $table, $new->username, @del ); - return $error if $error; + if ( @del ) { + my $error = $self->sqlradius_queue( $new->svcnum, 'attrib_delete', + $table, $new->username, @del ); + return $error if $error; + } } ''; |