diff options
author | Guillaume Cottenceau <gc@mandriva.com> | 2000-09-20 15:39:16 +0000 |
---|---|---|
committer | Guillaume Cottenceau <gc@mandriva.com> | 2000-09-20 15:39:16 +0000 |
commit | 418d6478a76ed48bc5815f09823d0110b68d03cd (patch) | |
tree | 790d21bcc3140f9ae5eaca7d93e7a057bcb6cdf1 /perl-install | |
parent | e5e7a63469dfb1555761f09e072afb38281eeb4b (diff) | |
download | drakx-backup-do-not-use-418d6478a76ed48bc5815f09823d0110b68d03cd.tar drakx-backup-do-not-use-418d6478a76ed48bc5815f09823d0110b68d03cd.tar.gz drakx-backup-do-not-use-418d6478a76ed48bc5815f09823d0110b68d03cd.tar.bz2 drakx-backup-do-not-use-418d6478a76ed48bc5815f09823d0110b68d03cd.tar.xz drakx-backup-do-not-use-418d6478a76ed48bc5815f09823d0110b68d03cd.zip |
fixed install_rpm for every last rpm's
Diffstat (limited to 'perl-install')
-rwxr-xr-x | perl-install/standalone/drakgw | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/perl-install/standalone/drakgw b/perl-install/standalone/drakgw index 535c9bbc4..6865d16b8 100755 --- a/perl-install/standalone/drakgw +++ b/perl-install/standalone/drakgw @@ -442,7 +442,7 @@ close SYSCONF_NETWORK; $f = "/usr/sbin/dhcpd"; -e $f or install_rpm("dhcp"); --e $f or ($in->ask_warn('', _("Could not install dhcp RPM with urpmi.")) and $in->exit(0)); +-e $f or fatal_quit(_("Could not install dhcp RPM with urpmi.")); -f $dhcpd_conf and rename($dhcpd_conf, "$dhcpd_conf.old"); local *DHCPDCONF; open DHCPDCONF, ">$dhcpd_conf" or die "Can't open $dhcpd_conf"; @@ -466,7 +466,7 @@ close DHCPDCONF; #- put the interface for the dhcp server in linuxconf config, for the /etc script of dhcpd -f $conf_linuxconf or install_rpm("linuxconf"); --f $conf_linuxconf or ($in->ask_warn('', _("Could not install linuxconf RPM with urpmi.")) and $in->exit(0)); +-f $conf_linuxconf or fatal_quit(_("Could not install linuxconf RPM with urpmi.")); open CONF_LINUXCONF, "$conf_linuxconf" or die "Can't open $conf_linuxconf"; my @conf_linuxconf_content = <CONF_LINUXCONF>; @@ -482,11 +482,11 @@ close CONF_LINUXCONF; $f = "/usr/sbin/named"; -e $f or install_rpm("bind"); --e $f or ($in->ask_warn('', _("Could not install bind RPM with urpmi.")) and $in->exit(0)); +-e $f or fatal_quit(_("Could not install bind RPM with urpmi.")); $f = "/var/named/named.local"; -e $f or install_rpm("caching-nameserver"); --e $f or ($in->ask_warn('', _("Could not install caching-nameserver RPM with urpmi.")) and $in->exit(0)); +-e $f or fatal_quit(_("Could not install caching-nameserver RPM with urpmi.")); #- start the daemons |