From e70b108df25fc8ae329b6cbad819b766f50fa22e Mon Sep 17 00:00:00 2001 From: Pascal Rigaux Date: Sat, 2 Feb 2002 19:08:09 +0000 Subject: fix dropping samba sections which don't have any "path=" --- perl-install/standalone/fileshareset | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'perl-install') diff --git a/perl-install/standalone/fileshareset b/perl-install/standalone/fileshareset index 8013477aa..d74930e35 100755 --- a/perl-install/standalone/fileshareset +++ b/perl-install/standalone/fileshareset @@ -281,7 +281,7 @@ sub read { #- first line in the category my ($label) = $s =~ /^\s*\[(.*)\]/; my ($mntpoint) = $s =~ /^\s*path\s*=\s*(.*)/m; - push @l, { mntpoint => $mntpoint, raw => $s, label => $label } if $label && $mntpoint; + push @l, { mntpoint => $mntpoint, raw => $s, label => $label }; $s = ''; } $s .= $_; -- cgit v1.2.1