bah

[technostate.git] / cgi / persons.cgi

diff --git a/cgi/persons.cgi b/cgi/persons.cgi
index d011913..1f1501c 100755 (executable)
--- a/cgi/persons.cgi
+++ b/cgi/persons.cgi
@@ -1,5 +1,5 @@
 #!/usr/bin/perl -Tw
-# $Id: persons.cgi,v 1.7 1999-04-22 05:58:06 ivan Exp $
+# $Id: persons.cgi,v 1.8 1999-04-22 06:06:16 ivan Exp $
 # Copyright (c) 1999 Ivan Kohler.  All rights reserved.
 # This program is free software; you can redistribute it and/or modify it under
 # the same terms as perl itself
@@ -104,7 +104,7 @@ unless ( $cgi->param('magic') ) { #first time through
 sub print_form {
   my $cgi = shift;
   my $action = shift;
-  print $cgi->header( '-expires' => 'now' ),
+  print $cgi->header,
         $cgi->start_html($action),
         $cgi->h1($action),
         $cgi->start_form,