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

Added internal redirect

Browse source 
(Is there a way to get content_type that wouldn't require File::MMagic?)
Apache2::SubRequest's method lookup_file coused segfault in apache, so I scrapped that and used File::MMagic to to content type determing
Also fixed credit and added a currentPage.rankIsN variable to navigation
This commit is contained in:
Jukka Raimovaara 2006-04-30 13:07:00 +00:00
parent a9c3387cb1
commit 1f78c2b077
8 changed files with 58 additions and 5 deletions
Download patch file Download diff file Expand all files Collapse all files

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

@ -101,7 +101,6 @@ sub getMimeType {
return $self->{_http}{mimetype} || "text/html";
}
#-------------------------------------------------------------------
=head2 getStatus ( ) {
@ -117,6 +116,20 @@ sub getStatus {
}
#-------------------------------------------------------------------
=head2 getStreamedFile ( ) {
Returns the location of a file to be streamed thru mod_perl, if one has been set.
=cut
sub getStreamedFile {
my $self = shift;
return $self->{_http}{streamlocation} || undef;
}
#-------------------------------------------------------------------
=head2 isRedirect ( )
@ -377,5 +390,19 @@ sub setStatus {
$self->{_http}{statusDescription} = shift;
}
#-------------------------------------------------------------------
=head2 setStreamedFile ( ) {
Set a file to be streamed thru mod_perl.
=cut
sub setStreamedFile {
my $self = shift;
$self->{_http}{streamlocation} = shift;
}
1;