arif/xcat-core
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

fixed bug 3309, remove the comments line which begins with ##

Browse Source 
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@14954 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
jjhua 2013-01-23 07:14:53 +00:00
parent 1225448e75
commit 8ec0fc9c97
1 changed files with 7 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
xCAT-server/lib/perl/xCAT/Template.pm
View File

@ -859,16 +859,19 @@ sub subvars_for_mypostscript {
my %dump_results;
#First load input into memory..
while (<$inh>) {
$t_inc.=$_;
my $line = $_;
if ($line !~/^##/ ) {
$t_inc.=$line;
}
if( $_ =~ /#TABLE:([^:]+):([^:]+):([^#]+)#/ ) {
if( $line =~ /#TABLE:([^:]+):([^:]+):([^#]+)#/ ) {
my $tabname=$1;
my $key=$2;
my $attrib = $3;
$table{$tabname}{$key}{$attrib} = 1;
}
if( $_ =~ /^tabdump\(([\w]+)\)/) {
if( $line =~ /^tabdump\(([\w]+)\)/) {
my $tabname = $1;
if( $tabname !~ /^(auditlog|bootparams|chain|deps|domain|eventlog|firmware|hypervisor|iscsi|kvm_nodedata|mac|nics|ipmi|mp|ppc|ppcdirect|site|websrv|zvm|statelite|rack|hosts|prodkey|switch|node)/) {
push @tabs, $tabname;