diff options
| author | ivan <ivan> | 2001-09-27 21:37:57 +0000 |
|---|---|---|
| committer | ivan <ivan> | 2001-09-27 21:37:57 +0000 |
| commit | e8116f5d849f479f03294232e25c41c3d82b50f2 (patch) | |
| tree | 3c16c5342914b95ea4d4ed573186fa928310ca07 /fs_signup/FS-SignupClient | |
| parent | 0df810cde18282c08271a87c50568dd75b61a578 (diff) | |
it's 2001 now.
Diffstat (limited to 'fs_signup/FS-SignupClient')
| -rwxr-xr-x | fs_signup/FS-SignupClient/cgi/signup.cgi | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/fs_signup/FS-SignupClient/cgi/signup.cgi b/fs_signup/FS-SignupClient/cgi/signup.cgi index 573cf5d65..b236e6fb2 100755 --- a/fs_signup/FS-SignupClient/cgi/signup.cgi +++ b/fs_signup/FS-SignupClient/cgi/signup.cgi @@ -1,6 +1,6 @@ #!/usr/bin/perl -Tw # -# $Id: signup.cgi,v 1.14 2001-09-27 21:32:36 ivan Exp $ +# $Id: signup.cgi,v 1.15 2001-09-27 21:37:57 ivan Exp $ use strict; use vars qw( @payby $cgi $locales $packages $pops $error @@ -314,7 +314,7 @@ sub expselect { $return .= ">$_"; } $return .= qq!</SELECT>/<SELECT NAME="$prefix!. qq!_year" SIZE="1">!; - for ( 1999 .. 2037 ) { + for ( 2001 .. 2037 ) { $return .= "<OPTION"; $return .= " SELECTED" if $_ == $y; $return .= ">$_"; |