From c47996a4234f8891786b38aaa164344f677d7bea Mon Sep 17 00:00:00 2001 From: Christian Belisle Date: Mon, 21 Jan 2002 16:35:01 +0000 Subject: Fix folder name in /mnt --- transfugdrake.pm | 11 +++++------ 1 file changed, 5 insertions(+), 6 deletions(-) (limited to 'transfugdrake.pm') diff --git a/transfugdrake.pm b/transfugdrake.pm index fb0522a..beef26d 100644 --- a/transfugdrake.pm +++ b/transfugdrake.pm @@ -115,7 +115,7 @@ sub get_windows_partition { sub mount_partition { my $fstype = $_[0]; my $win_partition = $_[1]; - my $mountpoint = "/mnt/windows"; + my $mountpoint = "/mnt/transfug"; my @mounts; my $mounted = 0; my @tmp; @@ -124,14 +124,13 @@ sub mount_partition { foreach (@mounts) { @tmp = split(' ', $_); - if($tmp[0] eq $win_partition) { $mounted = 1; } - $mountpoint = $tmp[1]; + if($tmp[0] eq $win_partition) { + $mounted = 1; + $mountpoint = $tmp[1]; + } } if(!$mounted) { - if(-e $mountpoint) { - $mountpoint .= '2'; - } mkdir($mountpoint); print "mount -t $fstype $win_partition $mountpoint\n"; -- cgit v1.2.1