summaryrefslogtreecommitdiffstats
path: root/perl-install
diff options
context:
space:
mode:
authorAntoine Ginies <aginies@mandriva.com>2005-07-05 05:16:45 +0000
committerAntoine Ginies <aginies@mandriva.com>2005-07-05 05:16:45 +0000
commit4c3495611f7e3a647e9ca0657db9061b95dfe4d7 (patch)
treeeef7a1b13998623401332ca73e03d37cf60576b6 /perl-install
parent5383748a62707cec944c5c09c214ebdab28cacd7 (diff)
downloaddrakx-4c3495611f7e3a647e9ca0657db9061b95dfe4d7.tar
drakx-4c3495611f7e3a647e9ca0657db9061b95dfe4d7.tar.gz
drakx-4c3495611f7e3a647e9ca0657db9061b95dfe4d7.tar.bz2
drakx-4c3495611f7e3a647e9ca0657db9061b95dfe4d7.tar.xz
drakx-4c3495611f7e3a647e9ca0657db9061b95dfe4d7.zip
fix some comment
Diffstat (limited to 'perl-install')
-rw-r--r--perl-install/standalone/drakhosts7
1 files changed, 3 insertions, 4 deletions
diff --git a/perl-install/standalone/drakhosts b/perl-install/standalone/drakhosts
index c76762158..2cf717cca 100644
--- a/perl-install/standalone/drakhosts
+++ b/perl-install/standalone/drakhosts
@@ -1,4 +1,4 @@
-#!/usr/bin/perl -w
+#!/usr/bin/perl
#
# Copyright (C) 2005 by Mandriva aginies _ateuh_ mandriva.com
#
@@ -19,7 +19,7 @@
my $version = "0.1";
-# i18n: IMPORTANT: to get correct namespace (drakpxelinux instead of libDrakX)
+# i18n: IMPORTANT: to get correct namespace (drakhosts instead of libDrakX)
BEGIN { unshift @::textdomains, 'drakhosts' }
use lib qw(/usr/lib/libDrakX);
@@ -29,7 +29,6 @@ use common;
use network::network;
use interactive;
-# must come *after* definition of textdomains for proper initialisation
use ugtk2 qw(:ask :wrappers :create :dialogs);
use constant FALSE => 0;
@@ -69,7 +68,7 @@ sub get_host_data {
}
sub write_conf_hosts {
- output($HOSTS, "# generated by drakhosts.pl\n");
+ output($HOSTS, "# generated by drakhosts\n");
foreach my $a (@listhosts) {
append_to_file($HOSTS, "$a->{ip} $a->{hostname} $a->{alias}\n");
}