more various changes

This commit is contained in:
JT Smith 2006-04-18 21:01:30 +00:00
parent 5da0204a28
commit 19f0f7fd72
6 changed files with 23 additions and 2 deletions

View file

@ -169,6 +169,7 @@ sub sendHeader {
$self->session->request->status(301);
} else {
$self->session->request->content_type($self->{_http}{mimetype} || "text/html");
$self->session->request->set_last_modified($self->{_http}{lastModified} || time());
if ($self->session->setting->get("preventProxyCache")) {
$self->session->request->headers_out->set(Expires => "-1d");
}
@ -251,7 +252,6 @@ sub setCookie {
my $cookie = Apache2::Cookie->new($self->session->request,
-name=>$name,
-value=>$value,
# -domain=>'.'.$self->session->env->get("HTTP_HOST"),
-expires=>$ttl,
-path=>'/'
);
@ -285,6 +285,18 @@ sub setFilename {
#-------------------------------------------------------------------
=head2 setLastModified ( epoch )
=cut
sub setLastModified {
my $self = shift;
my $epoch = shift;
$self->{_htt}{lastModified} = $epoch;
}
#-------------------------------------------------------------------
=head2 setMimeType ( mimetype )