diff options
author | Arnaud Desmons <adesmons@mandriva.com> | 2002-09-20 11:06:03 +0000 |
---|---|---|
committer | Arnaud Desmons <adesmons@mandriva.com> | 2002-09-20 11:06:03 +0000 |
commit | 3deedd8cfcb55bde89687dca84b3130f1439f62b (patch) | |
tree | ab8b2d558e086f06a4acd9f5c83057c01b2d061c /client_wizard/scripts/Clientconf.pm | |
parent | 20ec97c86e17cc7a392ea49483f13b133b7576a4 (diff) | |
download | drakwizard-3deedd8cfcb55bde89687dca84b3130f1439f62b.tar drakwizard-3deedd8cfcb55bde89687dca84b3130f1439f62b.tar.gz drakwizard-3deedd8cfcb55bde89687dca84b3130f1439f62b.tar.bz2 drakwizard-3deedd8cfcb55bde89687dca84b3130f1439f62b.tar.xz drakwizard-3deedd8cfcb55bde89687dca84b3130f1439f62b.zip |
__WIZ_HOME__ fix
Diffstat (limited to 'client_wizard/scripts/Clientconf.pm')
-rw-r--r-- | client_wizard/scripts/Clientconf.pm | 13 |
1 files changed, 11 insertions, 2 deletions
diff --git a/client_wizard/scripts/Clientconf.pm b/client_wizard/scripts/Clientconf.pm index f2454dba..d7bceb64 100644 --- a/client_wizard/scripts/Clientconf.pm +++ b/client_wizard/scripts/Clientconf.pm @@ -1,8 +1,8 @@ #!/usr/bin/perl package Clientconf; -require "/home/logarno/soft/wizard_perl/test/common/scripts/Vareqval.pm"; -require "/home/logarno/soft/wizard_perl/test/common/scripts/DrakconnectConf.pm"; +require "__WIZ_HOME__/common/scripts/Vareqval.pm"; +require "__WIZ_HOME__/common/scripts/DrakconnectConf.pm"; use MDK::Common; use strict; use standalone; @@ -25,6 +25,15 @@ sub check { 0; } +sub get_root { + my $file = "/etc/sysconfig/named"; + if (-f $file) { + my %mdk = Vareqval->get($file); + return $mdk{ROOTDIR}; + } + ""; +} + sub up_serial { my ($file) = @_; |