diff options
-rw-r--r-- | fs_selfservice/FS-SelfService/cgi/make_payment.html | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/fs_selfservice/FS-SelfService/cgi/make_payment.html b/fs_selfservice/FS-SelfService/cgi/make_payment.html index a1cda6d..40cd83c 100644 --- a/fs_selfservice/FS-SelfService/cgi/make_payment.html +++ b/fs_selfservice/FS-SelfService/cgi/make_payment.html @@ -53,7 +53,7 @@ <TD> / </TD> <TD> <SELECT NAME="year"> - <%= for ( 2003 .. 2012 ) { + <%= my @a = localtime; for ( $a[5]+1900 .. $a[5]+1915 ) { $OUT .= '<OPTION'. ($_ eq $year ? ' SELECTED' : ''). ">$_\n"; } %> </SELECT> |