summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorFrederic Lepied <flepied@mandriva.com>2004-10-01 02:21:07 +0000
committerFrederic Lepied <flepied@mandriva.com>2004-10-01 02:21:07 +0000
commitbeac2966bbad446ef71df6e1d035a41d6976b946 (patch)
treeb32654bdc0ad48a72d64449b3b46b6ec4b215099 /perl-install
parente6497bc9efc7ac1e4725a72bd4199b2cb18ebc08 (diff)
downloaddrakx-beac2966bbad446ef71df6e1d035a41d6976b946.tar
drakx-beac2966bbad446ef71df6e1d035a41d6976b946.tar.gz
drakx-beac2966bbad446ef71df6e1d035a41d6976b946.tar.bz2
drakx-beac2966bbad446ef71df6e1d035a41d6976b946.tar.xz
drakx-beac2966bbad446ef71df6e1d035a41d6976b946.zip
call the scripts in /etc/sysconfig/network-scripts/hostname.d like the network
scripts are doing when changing the hostname.
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/network/network.pm4
1 files changed, 4 insertions, 0 deletions
diff --git a/perl-install/network/network.pm b/perl-install/network/network.pm
index 50f0b6612..3fa1359ed 100644
--- a/perl-install/network/network.pm
+++ b/perl-install/network/network.pm
@@ -213,6 +213,10 @@ sub sethostname {
my $text;
syscall_("sethostname", $netc->{HOSTNAME}, length $netc->{HOSTNAME}) ? ($text="set sethostname to $netc->{HOSTNAME}") : ($text="sethostname failed: $!");
log::explanations($text);
+
+ if (!$::isInstall) {
+ run_program::run("/usr/bin/run-parts", "--arg", $netc->{HOSTNAME}, "/etc/sysconfig/network-scripts/hostname.d");
+ }
}
sub resolv($) {