From 9ba6ea7a4a9b65dd48f5efacac95483e8036f9ee Mon Sep 17 00:00:00 2001
From: Francois Pons <fpons@mandriva.com>
Date: Fri, 8 Oct 1999 16:50:01 +0000
Subject: *** empty log message ***

---
 perl-install/install2.pm    | 2 +-
 perl-install/install_any.pm | 4 ++--
 2 files changed, 3 insertions(+), 3 deletions(-)

(limited to 'perl-install')

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}) };
 	}
 
-- 
cgit v1.2.1