X-Git-Url: http://git.freeside.biz/gitweb/?a=blobdiff_plain;f=fs_sesmon%2FFS-SessionClient%2Fcgi%2Flogin.cgi;h=0307c5a3d0a445f6010129ccac741ff4a85c99ec;hb=35effa1bf4ac902547615c816960bbc8db8e7256;hp=ad964df757261b6ec19834a160ffa7120a1a0905;hpb=f83184464cc34d1c2a0a999cbf215414827b39a2;p=freeside.git diff --git a/fs_sesmon/FS-SessionClient/cgi/login.cgi b/fs_sesmon/FS-SessionClient/cgi/login.cgi index ad964df75..0307c5a3d 100644 --- a/fs_sesmon/FS-SessionClient/cgi/login.cgi +++ b/fs_sesmon/FS-SessionClient/cgi/login.cgi @@ -51,17 +51,42 @@ sub print_form { print $cgi->header( '-expires' => 'now' ), <login - + END print qq!Error: $error! if $error; print < +
-Username
-Password
- + + + + + + + + + + + + + + + +
+ Welcome +
+ Username + + +
+ Password + + +
+ +
@@ -78,13 +103,6 @@ sub print_okay { END } -my $error = login ( { - 'username' => $username, - 'portnum' => $portnum, -} ); - -warn $error if $error; - sub usage { die "Usage:\n\n freeside-login username ( portnum | ip | nasnum nasport )"; }