diff options
| author | ivan <ivan> | 2001-10-26 10:24:56 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2001-10-26 10:24:56 +0000 |
| commit | 91387f8f489e561deaf1de052d80ef800a4970a3 (patch) | |
| tree | ada548d8be00671f6a39d3b41229410bdf2f1e31 /htetc | |
| parent | 1904d44bb20adf403e21513db7470153f751d605 (diff) | |
cache foo
*sigh*
Diffstat (limited to 'htetc')
| -rw-r--r-- | htetc/global.asa | 2 | ||||
| -rw-r--r-- | htetc/handler.pl | 2 |
2 files changed, 3 insertions, 1 deletions
diff --git a/htetc/global.asa b/htetc/global.asa index a5863c327..dc75822ff 100644 --- a/htetc/global.asa +++ b/htetc/global.asa @@ -23,7 +23,7 @@ sub Script_OnStart { sub Script_OnFlush { my $ref = $Response->{BinaryRef}; - $$ref = $cgi->header( '-expires' => 'now' ) . $$ref; + $$ref = $cgi->header( @FS::CGI::header ) . $$ref; if ( dbh->can('sprintProfile') ) { $$ref =~ s/<\/BODY>[\s\n]*<\/HTML>[\s\n]*$//i diff --git a/htetc/handler.pl b/htetc/handler.pl index e537d26fc..f01d3cd0b 100644 --- a/htetc/handler.pl +++ b/htetc/handler.pl @@ -75,6 +75,8 @@ sub handler } $r->content_type('text/html'); #eorar + + # @FS::CGI::@headers or some other way to set no-cache headers!!! my $status = $ah->handle_request($r); |