From 3b8c0f93707436f84149d17731d9b70aa486dedc Mon Sep 17 00:00:00 2001 From: Guillaume Cottenceau Date: Tue, 13 Mar 2001 16:23:29 +0000 Subject: fix for bind --- perl-install/standalone/drakgw | 6 +++++- 1 file changed, 5 insertions(+), 1 deletion(-) (limited to 'perl-install') diff --git a/perl-install/standalone/drakgw b/perl-install/standalone/drakgw index e4a862977..386676c40 100755 --- a/perl-install/standalone/drakgw +++ b/perl-install/standalone/drakgw @@ -68,7 +68,8 @@ sub start_daemons() sys("/etc/rc.d/init.d/cups stop"); } } - grep(/is running/, `/etc/rc.d/init.d/$_ status 2> /dev/null`) and sys("/etc/rc.d/init.d/$_ stop") foreach 'named', 'dhcpd'; + grep(/is running/, `/etc/rc.d/init.d/dhcpd status 2> /dev/null`) and sys("/etc/rc.d/init.d/dhcpd stop"); + grep(/connection refused/, `/etc/rc.d/init.d/named status 2> /dev/null`) or sys("/etc/rc.d/init.d/named stop"); sys("/etc/rc.d/init.d/network restart"); sys("sh $rc_firewall_generic"); @@ -519,6 +520,9 @@ sub quit_global { #------------------------------------------------- #- $Log$ +#- Revision 1.27 2001/03/13 16:23:29 gc +#- fix for bind +#- #- Revision 1.26 2001/03/13 15:31:05 gc #- - fix destructive parts of pixelization #- - fix some own bugs -- cgit v1.2.1