comment out debug messages left in

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@4250 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
lissav 2009-09-28 17:14:07 +00:00
parent d33eb736f1
commit 2685de1e1a
2 changed files with 4 additions and 4 deletions

View File

@ -180,7 +180,7 @@ sub runbeginpre
}
if ($err_code != 0) {
$rsp = {};
$rsp->{error}->[0]="$localhostname: $s: return code=$err_code.";
$rsp->{error}->[0]="$localhostname: $s: return code=$err_code. Error message=$ret";
$callback->($rsp);
last;
}
@ -233,7 +233,7 @@ sub runendpre
}
if ($err_code != 0) {
$rsp = {};
$rsp->{error}->[0]="$localhostname: $s: return code=$err_code.";
$rsp->{error}->[0]="$localhostname: $s: return code=$err_code. Error message=$ret";
$callback->($rsp);
last;
}

View File

@ -295,9 +295,9 @@ sub tabrestore
$cb->({error => "The header line indicates that column '$tcol' should exist, which is not defined in the schema for '$table'",errorcode=>1});
return;
}
print Dumper(grep /^$tcol\z/,@{$xCAT::Schema::tabspec{$table}->{cols}});
#print Dumper(grep /^$tcol\z/,@{$xCAT::Schema::tabspec{$table}->{cols}});
}
print "We passed it!\n";
#print "We passed it!\n";
my $line;
my $rollback = 0;