diff options
| author | Pascal Rigaux <pixel@mandriva.com> | 2000-12-08 16:20:26 +0000 |
|---|---|---|
| committer | Pascal Rigaux <pixel@mandriva.com> | 2000-12-08 16:20:26 +0000 |
| commit | da22fd04fe09e06bf86b146d1ac66dda45c03f0c (patch) | |
| tree | 6189987f5aa84040380a04b93e379aab2da4f0b7 /perl-install/install2.pm | |
| parent | 72f50dd4f1f871dd01cb0701f1de2694d5714a8f (diff) | |
| download | drakx-backup-do-not-use-da22fd04fe09e06bf86b146d1ac66dda45c03f0c.tar drakx-backup-do-not-use-da22fd04fe09e06bf86b146d1ac66dda45c03f0c.tar.gz drakx-backup-do-not-use-da22fd04fe09e06bf86b146d1ac66dda45c03f0c.tar.bz2 drakx-backup-do-not-use-da22fd04fe09e06bf86b146d1ac66dda45c03f0c.tar.xz drakx-backup-do-not-use-da22fd04fe09e06bf86b146d1ac66dda45c03f0c.zip | |
(main): warn if VERSION file doesn't exist
(formatPartitions): call rotate_logs after mounting the partitions
Diffstat (limited to 'perl-install/install2.pm')
| -rw-r--r-- | perl-install/install2.pm | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/perl-install/install2.pm b/perl-install/install2.pm index c927e0ac1..8963f6971 100644 --- a/perl-install/install2.pm +++ b/perl-install/install2.pm @@ -23,6 +23,7 @@ use partition_table qw(:types); use modules; use detect_devices; use run_program; +use any; use log; use fs; @@ -289,6 +290,8 @@ sub formatPartitions { home mnt tmp var var/tmp var/lib var/lib/rpm var/lib/urpmi); mkdir "$o->{prefix}/$_", 0700 foreach qw(root root/tmp); + any::rotate_logs($o->{prefix}); + require raid; raid::prepare_prefixed($o->{raid}, $o->{prefix}); @@ -606,7 +609,7 @@ sub main { $o->{allowFB} = listlength(cat_("/proc/fb")); - my $VERSION = cat__(install_any::getFile("VERSION")); + my $VERSION = cat__(install_any::getFile("VERSION")) or do { print "VERSION file missing\n"; sleep 5 }; $o->{lnx4win} = 1 if $VERSION =~ /lnx4win/i; $o->{meta_class} = 'desktop' if $VERSION =~ /desktop/i; if ($o->{meta_class} eq 'desktop') { |