From e7d014319ef21a963557473ce45adfe5b4e22131 Mon Sep 17 00:00:00 2001
From: Thierry Vignaud <thierry.vignaud@gmail.com>
Date: Fri, 14 Feb 2020 15:30:37 +0100
Subject: simplify

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

(limited to 'perl-install/fs')

diff --git a/perl-install/fs/type.pm b/perl-install/fs/type.pm
index 0492420e8..b9f4b48d6 100644
--- a/perl-install/fs/type.pm
+++ b/perl-install/fs/type.pm
@@ -320,7 +320,7 @@ sub isRecovery {
     );
 }
 
-sub isTrueFS { isTrueLocalFS($_[0]) || member($_[0]{fs_type}, qw(nfs)) }
+sub isTrueFS { isTrueLocalFS($_[0]) || $_[0]{fs_type} eq 'nfs' }
 sub isTrueLocalFS { member($_[0]{fs_type}, true_local_fs_types()) }
 
 sub isOtherAvailableFS { isESP($_[0]) || isFat_or_NTFS($_[0]) || member($_[0]{fs_type}, 'ufs', 'hfs', 'iso9660') } #- other OS that linux can access its filesystem
-- 
cgit v1.2.1