From 2b049f0f6d1972e445829a2503eaf6d306896e9d Mon Sep 17 00:00:00 2001
From: Francois Pons <fpons@mandriva.com>
Date: Fri, 29 Oct 1999 16:37:52 +0000
Subject: *** empty log message ***

---
 perl-install/fs.pm | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'perl-install/fs.pm')

diff --git a/perl-install/fs.pm b/perl-install/fs.pm
index 7e9b460a4..d77a0dc0d 100644
--- a/perl-install/fs.pm
+++ b/perl-install/fs.pm
@@ -233,10 +233,12 @@ sub write_fstab($;$$) {
 	  #- keep in mind the new line for fstab.
 	  @new{($_->{mntpoint}, $_->{"$dir$_->{device}"})} = undef;
 
+	  #- tested? devices::make("$prefix/$dir$_->{device}") if $_->{device} && $dir && !$_->{noMakeDevice};
 	  eval { devices::make("$prefix/$dir$_->{device}") } if $_->{device} && $dir;
 	  mkdir "$prefix/$_->{mntpoint}", 0755 if $_->{mntpoint};
 
-	  [ "$dir$_->{device}", $_->{mntpoint}, type2fs($_->{type}), $options, $freq, $passno ];
+	  [ ( $_->{device} =~ /^\// ? $_->{device} : "$dir$_->{device}" ),
+	    $_->{mntpoint}, type2fs($_->{type}), $options, $freq, $passno ];
 
       } grep { $_->{mntpoint} && type2fs($_->{type}) &&
 		 ! exists $new{$_->{mntpoint}} && ! exists $new{"/dev/$_->{device}"} } @$fstab;
-- 
cgit v1.2.1