oqapi/webgui
2
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

missed two places where getStatus is called in list context. fixed.

Browse source
This commit is contained in:
Colin Kuskie 2006-10-16 15:50:03 +00:00
parent c5e656c434
commit defef0767d
1 changed files with 6 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

10
lib/WebGUI/Session/Http.pm
View file

@ -211,8 +211,9 @@ sub sendHeader {
if ($self->{_http}{filename}) { if ($self->{_http}{filename}) {
$request->headers_out->set('Content-Disposition' => qq!attachment; filename="$self->{_http}{filename}"!); $request->headers_out->set('Content-Disposition' => qq!attachment; filename="$self->{_http}{filename}"!);
} }
$request->status($self->getStatus()); my ($status, $description) = $self->getStatus();
$request->status_line($self->getStatus().' '.$self->{_http}{statusDescription}); $request->status($status);
$request->status_line(join ' ', $status, $description);
} }
return; return;
} }
@ -223,8 +224,9 @@ sub _sendMinimalHeader {
$request->content_type('text/html; charset=UTF-8'); $request->content_type('text/html; charset=UTF-8');
$request->headers_out->set('Cache-Control' => 'private'); $request->headers_out->set('Cache-Control' => 'private');
$request->no_cache(1); $request->no_cache(1);
$request->status($self->getStatus()); my ($status, $description) = $self->getStatus();
$request->status_line($self->getStatus().' '.$self->{_http}{statusDescription}); $request->status($status);
$request->status_line(join ' ', $status, $description);
return; return;
} }