diff options
author | Jonathan Prykop <jonathan@freeside.biz> | 2015-07-27 18:27:11 -0500 |
---|---|---|
committer | Jonathan Prykop <jonathan@freeside.biz> | 2015-07-27 18:31:47 -0500 |
commit | 81b805c3f2a64d4ebde9c2497c6118af1bd418a0 (patch) | |
tree | 8cbd01d61e4a25ef07b1cd99e76e652c36591d3e /FS/FS | |
parent | 3d08f2f858a899bbc0b443db86cd0f19aa6bd367 (diff) |
RT#37163: Disconnect Users via Radclient [got rid of ignore_error]
Diffstat (limited to 'FS/FS')
-rw-r--r-- | FS/FS/part_export/sqlradius.pm | 10 |
1 files changed, 1 insertions, 9 deletions
diff --git a/FS/FS/part_export/sqlradius.pm b/FS/FS/part_export/sqlradius.pm index 048a24485..f0ef3fca9 100644 --- a/FS/FS/part_export/sqlradius.pm +++ b/FS/FS/part_export/sqlradius.pm @@ -80,10 +80,6 @@ tie %options, 'Tie::IxHash', 'disconnect_port' => { label => 'Port to send disconnection requests to, default 1700', }, - 'disconnect_ignore_error' => { - label => 'Ignore disconnection request errors', - type => 'checkbox', - }, ; $notes1 = <<'END'; @@ -270,7 +266,6 @@ sub _export_replace { 'disconnect_ssh' => $self->option('disconnect_ssh'), 'svc_acct_username' => $old->username, 'disconnect_port' => $self->option('disconnect_port'), - 'ignore_error' => $self->option('disconnect_ignore_error'), ); unless ( ref($err_or_queue) ) { $dbh->rollback if $oldAutoCommit; @@ -418,7 +413,6 @@ sub _export_delete { 'disconnect_ssh' => $self->option('disconnect_ssh'), 'svc_acct_username' => $svc_x->username, 'disconnect_port' => $self->option('disconnect_port'), - 'ignore_error' => $self->option('disconnect_ignore_error'), ); return $err_or_queue unless ref($err_or_queue); if ( $jobnum ) { @@ -1258,8 +1252,6 @@ I<svc_acct_username> - the user to be disconnected (required) I<disconnect_port> - the port (on the nas) to send disconnect requests to (defaults to 1700) -I<ignore_error> - do not die on error with the disconnect request - Note this is NOT the opposite of sqlradius_connect. =cut @@ -1294,7 +1286,7 @@ sub sqlradius_user_disconnect { if $error && (@$nas > 1); $error = "No clients found" unless @$nas; - die $error if $error && !$opt{'ignore_error'}; + die $error if $error; return ''; } |