summaryrefslogtreecommitdiffstats
path: root/perl-install/install_any.pm
diff options
context:
space:
mode:
authorPascal Rigaux <pixel@mandriva.com>2005-09-02 14:20:54 +0000
committerPascal Rigaux <pixel@mandriva.com>2005-09-02 14:20:54 +0000
commit6640f9593094c2cb381eced96e2437a5f2a5e64f (patch)
treeee569db8b6ad16c705fe6fdb21cce7bef4b11aa2 /perl-install/install_any.pm
parent7de4191b23eec355fb316888a2f05210232ff270 (diff)
downloaddrakx-6640f9593094c2cb381eced96e2437a5f2a5e64f.tar
drakx-6640f9593094c2cb381eced96e2437a5f2a5e64f.tar.gz
drakx-6640f9593094c2cb381eced96e2437a5f2a5e64f.tar.bz2
drakx-6640f9593094c2cb381eced96e2437a5f2a5e64f.tar.xz
drakx-6640f9593094c2cb381eced96e2437a5f2a5e64f.zip
move code to create_minimal_files()
Diffstat (limited to 'perl-install/install_any.pm')
-rw-r--r--perl-install/install_any.pm12
1 files changed, 12 insertions, 0 deletions
diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm
index fde155b26..5f73d4a62 100644
--- a/perl-install/install_any.pm
+++ b/perl-install/install_any.pm
@@ -680,6 +680,18 @@ sub setPackages {
}
}
+sub create_minimal_files() {
+ mkdir "$::prefix/$_", 0755 foreach
+ qw(dev etc etc/profile.d etc/rpm etc/sysconfig etc/sysconfig/console
+ etc/sysconfig/network-scripts etc/sysconfig/console/consolefonts
+ etc/sysconfig/console/consoletrans
+ home mnt tmp var var/tmp var/lib var/lib/rpm var/lib/urpmi);
+ mkdir "$::prefix/$_", 0700 foreach qw(root root/tmp root/drakx);
+
+ devices::make("$::prefix/dev/null");
+ chmod 0666, "$::prefix/dev/null";
+}
+
sub count_files {
my ($dir) = @_;
-d $dir or return 0;