Skipping comments in pkglist and ospkglist before processing
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@13433 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
parent
8efc881946
commit
45492244fd
@ -65,6 +65,11 @@ sub include_file
|
||||
chomp($_);
|
||||
s/\s+$//; #remove trailing spaces
|
||||
next if /^\s*$/; #-- skip empty lines
|
||||
next
|
||||
if ( /^\s*#/
|
||||
&& !/^\s*#INCLUDE:[^#^\n]+#/
|
||||
&& !/^\s*#NEW_INSTALL_LIST#/
|
||||
&& !/^\s*#ENV:[^#^\n]+#/); #-- skip comments
|
||||
push(@text, $_);
|
||||
}
|
||||
|
||||
@ -86,6 +91,11 @@ sub get_package_names {
|
||||
chomp;
|
||||
s/\s+$//; #remove trailing white spaces
|
||||
next if /^\s*$/; #-- skip empty lines
|
||||
next
|
||||
if ( /^\s*#/
|
||||
&& !/^\s*#INCLUDE:[^#^\n]+#/
|
||||
&& !/^\s*#NEW_INSTALL_LIST#/
|
||||
&& !/^\s*#ENV:[^#^\n]+#/); #-- skip comments
|
||||
push(@tmp_array,$_);
|
||||
}
|
||||
close($pkgfile);
|
||||
|
Loading…
Reference in New Issue
Block a user