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

restapi print header format error

Browse Source 
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@11509 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
xq2005 2012-02-08 05:55:13 +00:00
parent 3bb744ae12
commit bebf2d2f32
1 changed files with 3 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
xCAT-server/xCAT-wsapi/xcatws.cgi
View File

@ -24,7 +24,7 @@ my $queryString = $ENV{'QUERY_STRING'};
my @path = split(/\//, $pathInfo);
shift(@path);
my $resource = $path[0];
print $q->header('text/html');
#print $q->header('text/html');
my $request = {clienttype =>'ws'};
#error status codes
@ -102,6 +102,7 @@ my %resources = (groups => \&groupsHandler,
#if no resource was specified
if($pathInfo =~ /^\/$/ || $pathInfo =~ /^$/){
print $q->header('text/html');
print $q->p("This is the root page for the xCAT Rest Web Service. Available resources are:");
foreach (sort keys %resources){
print $q->p($_);
@ -1466,6 +1467,7 @@ sub wrapHtml
{
$baseUri .= "/";
}
print $q->header('text/html');
#print $q->p("dumping in wrapHtml ".Dumper(@response));
foreach my $data (@response){
if(@$data[0]->{error}){