From cbec6a11b4b0f12cfd025e7ac424e8aa67b4349d Mon Sep 17 00:00:00 2001 From: Arnaud Desmons Date: Tue, 3 Sep 2002 15:12:10 +0000 Subject: fill func --- client_wizard/scripts/Clientconf.pm | 11 ++++++++++- 1 file changed, 10 insertions(+), 1 deletion(-) (limited to 'client_wizard/scripts/Clientconf.pm') diff --git a/client_wizard/scripts/Clientconf.pm b/client_wizard/scripts/Clientconf.pm index 6c567a16..44a72482 100644 --- a/client_wizard/scripts/Clientconf.pm +++ b/client_wizard/scripts/Clientconf.pm @@ -11,6 +11,15 @@ my $o = DrakconnectConf->new(); my $wiz_domain_name = $o->get("DomainName"); my $wiz_ip_server = $o->get_from_known_dev("IP"); +sub name { + $o->get("SystemName"); +} + +sub ip { + $wiz_ip_server; +} + + sub up_serial { my ($file) = @_; @@ -43,7 +52,7 @@ sub test { !$s_trunc and return 1; ($s_trunc != $sc_trunc) and return 1; ($dc == $ds || $dc < 0 || $dc > 255) and return 1; - return 10; + 10; } sub do_it { -- cgit v1.2.1