aboutsummaryrefslogtreecommitdiffstats
path: root/transfugdrake.pm
diff options
context:
space:
mode:
authorChristian Belisle <cbelisle@mandriva.com>2002-01-14 22:43:56 +0000
committerChristian Belisle <cbelisle@mandriva.com>2002-01-14 22:43:56 +0000
commita952d0ffc8010970c5a51a90d6ec58d5ee03001a (patch)
treee2ada8e177adcf87afac4f92eb9bdc7af5201e24 /transfugdrake.pm
parent772239905abe0ec28498e2c5d7b0c439cbbfe750 (diff)
downloadtransfugdrake-a952d0ffc8010970c5a51a90d6ec58d5ee03001a.tar
transfugdrake-a952d0ffc8010970c5a51a90d6ec58d5ee03001a.tar.gz
transfugdrake-a952d0ffc8010970c5a51a90d6ec58d5ee03001a.tar.bz2
transfugdrake-a952d0ffc8010970c5a51a90d6ec58d5ee03001a.tar.xz
transfugdrake-a952d0ffc8010970c5a51a90d6ec58d5ee03001a.zip
update
Diffstat (limited to 'transfugdrake.pm')
-rw-r--r--transfugdrake.pm13
1 files changed, 8 insertions, 5 deletions
diff --git a/transfugdrake.pm b/transfugdrake.pm
index 57e7277..8b5cba6 100644
--- a/transfugdrake.pm
+++ b/transfugdrake.pm
@@ -115,6 +115,13 @@ sub mount_partition {
my $fstype = $_[0];
my $win_partition = $_[1];
my $mountpoint = "/mnt/windows";
+ my @mounts;
+
+ (@mounts) = cat_('/proc/mounts');
+
+ foreach (@mounts) {
+ print "$_\n";
+ }
if(-e $mountpoint) {
$mountpoint .= '2';
@@ -122,15 +129,11 @@ sub mount_partition {
mkdir($mountpoint);
print "mount -t $fstype $win_partition $mountpoint\n";
- if(`mount -t $fstype $win_partition $mountpoint`) { print "Error\n:"; }
+ #if(`mount -t $fstype $win_partition $mountpoint`) { print "Error\n:"; }
return $mountpoint;
}
-sub get_windows_version {
-
-}
-
sub get_windows_config {
my %config;
my $in = $_[0];