diff options
Diffstat (limited to 'client_wizard/scripts')
| -rw-r--r-- | client_wizard/scripts/Clientconf.pm | 9 |
1 files changed, 7 insertions, 2 deletions
diff --git a/client_wizard/scripts/Clientconf.pm b/client_wizard/scripts/Clientconf.pm index 44a72482..f2454dba 100644 --- a/client_wizard/scripts/Clientconf.pm +++ b/client_wizard/scripts/Clientconf.pm @@ -1,8 +1,8 @@ #!/usr/bin/perl package Clientconf; -require "__WIZ_HOME__/common/scripts/Vareqval.pm"; -require "__WIZ_HOME__/common/scripts/DrakconnectConf.pm"; +require "/home/logarno/soft/wizard_perl/test/common/scripts/Vareqval.pm"; +require "/home/logarno/soft/wizard_perl/test/common/scripts/DrakconnectConf.pm"; use MDK::Common; use strict; use standalone; @@ -19,6 +19,11 @@ sub ip { $wiz_ip_server; } +sub check { + $> and return 1; + $o->is_dhcp() and return 2; + 0; +} sub up_serial { my ($file) = @_; |