diff options
author | Francois Pons <fpons@mandriva.com> | 1999-10-08 16:50:01 +0000 |
---|---|---|
committer | Francois Pons <fpons@mandriva.com> | 1999-10-08 16:50:01 +0000 |
commit | 9ba6ea7a4a9b65dd48f5efacac95483e8036f9ee (patch) | |
tree | e0fa35b5c9f5599d4bdc1609ce6017372088e9f6 /perl-install | |
parent | 72609c6930a5a3e00df243247ca3f19c4c4c06da (diff) | |
download | drakx-backup-do-not-use-9ba6ea7a4a9b65dd48f5efacac95483e8036f9ee.tar drakx-backup-do-not-use-9ba6ea7a4a9b65dd48f5efacac95483e8036f9ee.tar.gz drakx-backup-do-not-use-9ba6ea7a4a9b65dd48f5efacac95483e8036f9ee.tar.bz2 drakx-backup-do-not-use-9ba6ea7a4a9b65dd48f5efacac95483e8036f9ee.tar.xz drakx-backup-do-not-use-9ba6ea7a4a9b65dd48f5efacac95483e8036f9ee.zip |
*** empty log message ***
Diffstat (limited to 'perl-install')
-rw-r--r-- | perl-install/install2.pm | 2 | ||||
-rw-r--r-- | perl-install/install_any.pm | 4 |
2 files changed, 3 insertions, 3 deletions
diff --git a/perl-install/install2.pm b/perl-install/install2.pm index cd03399d5..0c47f513f 100644 --- a/perl-install/install2.pm +++ b/perl-install/install2.pm @@ -121,7 +121,7 @@ $o = $::o = { autoSCSI => 0, mkbootdisk => 1, #- no mkbootdisk if 0 or undef, find a floppy with 1 #- packages => [ qw() ], - partitioning => { clearall => 0, eraseBadPartitions => 0, auto_allocate => 0, autoformat => 0, readonly => 1 }, + partitioning => { clearall => 0, eraseBadPartitions => 0, auto_allocate => 0, autoformat => 0, readonly => 0 }, #- partitions => [ #- { mntpoint => "/boot", size => 16 << 11, type => 0x83 }, #- { mntpoint => "/", size => 256 << 11, type => 0x83 }, diff --git a/perl-install/install_any.pm b/perl-install/install_any.pm index 9f503bbce..a2864957f 100644 --- a/perl-install/install_any.pm +++ b/perl-install/install_any.pm @@ -216,14 +216,14 @@ sub searchAndMount4Upgrade { my $r; unless ($r = $root->{realMntpoint}) { $r = $o->{prefix}; $root->{mntpoint} = "/"; - log::l("trying to mount root partition $root->{device}"); + log::l("trying to mount partition $root->{device}"); eval { fs::mount_part($root, $o->{prefix}, 'readonly') }; $r = "/*ERROR*" if $@; } $found = -d "$r/etc/sysconfig" && [ fs::read_fstab("$r/etc/fstab") ]; unless ($root->{realMntpoint}) { - log::l("umounting non root partition $root->{device}"); + log::l("umounting partition $root->{device}"); eval { fs::umount_part($root, $o->{prefix}) }; } |