diff options
| author | damien <damien@mandriva.com> | 2001-09-05 21:50:01 +0000 |
|---|---|---|
| committer | damien <damien@mandriva.com> | 2001-09-05 21:50:01 +0000 |
| commit | e0c29e40dc830315f3adba09b09dc703d267c3f5 (patch) | |
| tree | 089a6a88384f60d6b6a7eecc98f4174aa7eb443a /perl-install/standalone/net_monitor | |
| parent | 61e2d7e398f7ac6861b81f4c91ce73b8aaae8d4f (diff) | |
| download | drakx-e0c29e40dc830315f3adba09b09dc703d267c3f5.tar drakx-e0c29e40dc830315f3adba09b09dc703d267c3f5.tar.gz drakx-e0c29e40dc830315f3adba09b09dc703d267c3f5.tar.bz2 drakx-e0c29e40dc830315f3adba09b09dc703d267c3f5.tar.xz drakx-e0c29e40dc830315f3adba09b09dc703d267c3f5.zip | |
corrected opeions
Diffstat (limited to 'perl-install/standalone/net_monitor')
| -rwxr-xr-x | perl-install/standalone/net_monitor | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/perl-install/standalone/net_monitor b/perl-install/standalone/net_monitor index 09fb02114..6dc90d224 100755 --- a/perl-install/standalone/net_monitor +++ b/perl-install/standalone/net_monitor @@ -30,7 +30,8 @@ use network::netconnect; use network::tools; use MDK::Common::Globals "network", qw($in $prefix $connect_file $disconnect_file $connect_prog); -"@ARGV" =~ /--help/ and print q(Network & Internet connection and monitoring application +if ("@ARGV" =~ /--help|-h/) { + print q(Network & Internet connection and monitoring application --defaultintf interface : show this interface by default --connect : connect to internet if not already connected @@ -39,6 +40,8 @@ use MDK::Common::Globals "network", qw($in $prefix $connect_file $disconnect_fil --status : returns 1 if connected 0 otherwise, then exit. --quiet : don't be interactive. To be used with (dis)connect. ); + exit(0); +} if ("@ARGV" =~ /--status/) { print connected(); exit(0) } my $force = "@ARGV" =~ /--force/; |