From 10eb8eaf9bc1aefd90eef0330fc1aed7751427b7 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Sat, 28 Aug 1999 21:16:44 +0000
Subject: no_comment

---
 perl-install/fs.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

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

diff --git a/perl-install/fs.pm b/perl-install/fs.pm
index 4c7cbc469..b891f5f10 100644
--- a/perl-install/fs.pm
+++ b/perl-install/fs.pm
@@ -170,7 +170,7 @@ sub mount_all($;$) {
     log::l("mounting all filesystems");
 
     # order mount by alphabetical ordre, that way / < /home < /home/httpd...
-    foreach (sort { $a->{mntpoint} cmp $b->{mntpoint} } @$fstab) {
+    foreach (sort { ($a->{mntpoint} || '') cmp ($b->{mntpoint} || '') } @$fstab) {
 	mount_part($_, $prefix) if ($_->{mntpoint} || isSwap($_));
     }
 }
-- 
cgit v1.2.1