From 5f71408bd0c50815eb4559444ab3724efdd75f19 Mon Sep 17 00:00:00 2001 From: Arnaud Desmons Date: Mon, 26 Aug 2002 11:00:46 +0000 Subject: s/system touch/MDK::Common::touch/ --- dhcp_wizard/scripts/Dhcpconf.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'dhcp_wizard') diff --git a/dhcp_wizard/scripts/Dhcpconf.pm b/dhcp_wizard/scripts/Dhcpconf.pm index 3f88e414..6fe5045f 100644 --- a/dhcp_wizard/scripts/Dhcpconf.pm +++ b/dhcp_wizard/scripts/Dhcpconf.pm @@ -81,7 +81,7 @@ sub do_it { } cat_ ("__WIZ_HOME__/dhcp_wizard/scripts/dhcpd.conf.default")); standalone::explanations("$file: hname = $wiz_host_name, net = $wiz_ip_net, ip = $wiz_ip_server, mask = $wiz_ip_netmask, rng1 = $wiz_ip_range1, rng2 = $wiz_ip_range2, dname = $wiz_domain_name"); - system("touch /var/dhcpd/dhcpd.leases") or die "can not touch /var/dhcpd/dhcd.leases: $!"; + MDK::Common::touch("/var/dhcpd/dhcpd.leases"); # modifying webmin config $file="/etc/webmin/dhcpd/config"; if (-f $file) { -- cgit v1.2.1