diff options
Diffstat (limited to 'fs_sesmon/FS-SessionClient/bin')
| -rw-r--r-- | fs_sesmon/FS-SessionClient/bin/freeside-login | 2 | ||||
| -rw-r--r-- | fs_sesmon/FS-SessionClient/bin/freeside-logout (renamed from fs_sesmon/FS-SessionClient/bin/freeside-logoff) | 7 |
2 files changed, 4 insertions, 5 deletions
diff --git a/fs_sesmon/FS-SessionClient/bin/freeside-login b/fs_sesmon/FS-SessionClient/bin/freeside-login index 6ca4455..a6d4751 100644 --- a/fs_sesmon/FS-SessionClient/bin/freeside-login +++ b/fs_sesmon/FS-SessionClient/bin/freeside-login @@ -1,6 +1,6 @@ #!/usr/bin/perl -Tw -#false-laziness hack w freeside-logoff +#false-laziness hack w freeside-logout use strict; use FS::SessionClient qw( login portnum ); diff --git a/fs_sesmon/FS-SessionClient/bin/freeside-logoff b/fs_sesmon/FS-SessionClient/bin/freeside-logout index f7b876b..9b4ecfe 100644 --- a/fs_sesmon/FS-SessionClient/bin/freeside-logoff +++ b/fs_sesmon/FS-SessionClient/bin/freeside-logout @@ -3,7 +3,7 @@ #false-laziness hack w freeside-login use strict; -use FS::SessionClient qw( logoff portnum ); +use FS::SessionClient qw( logout portnum ); my $username = shift; @@ -24,7 +24,7 @@ if ( scalar(@ARGV) == 1 ) { &usage; } -my $error = login ( { +my $error = logout ( { 'username' => $username, 'portnum' => $portnum, } ); @@ -32,6 +32,5 @@ my $error = login ( { warn $error if $error; sub usage { - die "Usage:\n\n freeside-logoff username ( portnum | ip | nasnum nasport )"; + die "Usage:\n\n freeside-logout username ( portnum | ip | nasnum nasport )"; } - |