summaryrefslogtreecommitdiff
path: root/FS
diff options
context:
space:
mode:
authorivan <ivan>2000-12-03 10:09:35 +0000
committerivan <ivan>2000-12-03 10:09:35 +0000
commite966cec8367fbc5f21b366f9c497fc0260292407 (patch)
tree7c19d41d91fb26a0497afa997978a87e0160bcb8 /FS
parent2cdaa48390786a61eb9973b66ef771430351c8f8 (diff)
bad caches!
Diffstat (limited to 'FS')
-rw-r--r--FS/FS/CGIwrapper.pm17
-rw-r--r--FS/MANIFEST1
2 files changed, 18 insertions, 0 deletions
diff --git a/FS/FS/CGIwrapper.pm b/FS/FS/CGIwrapper.pm
new file mode 100644
index 000000000..863193e94
--- /dev/null
+++ b/FS/FS/CGIwrapper.pm
@@ -0,0 +1,17 @@
+package FS::CGIwrapper;
+
+use vars qw(@ISA);
+
+use CGI;
+
+@ISA = qw( CGI );
+
+sub header {
+ my $self = shift;
+ $self->SUPER::header(
+ @_,
+ '-expires' => 'now',
+ '-pragma' => 'No-Cache',
+ '-cache-control' => 'No-Cache',
+ );
+}
diff --git a/FS/MANIFEST b/FS/MANIFEST
index 91d2e2fc0..a66c5ced7 100644
--- a/FS/MANIFEST
+++ b/FS/MANIFEST
@@ -53,3 +53,4 @@ bin/freeside-print-batch
FS/domain_record.pm
FS/prepay_credit.pm
FS/svc_www.pm
+FS/CGIwrapper.pm