Apart from that, all the patch files seem to be running happily on
hlt.katipo.co.nz
}
my $cardnumber=$data->{'cardnumber'};
-my %sysemprefs=systemprefs();
+my %systemprefs=systemprefs();
# FIXME
# This logic should probably be moved out of the presentation code.
# Not tonight though.
printend
;
-
-print "<OPTION value=EEBF";
-if ($data->{'area'} eq 'EEBF'){
- print " Selected";
-}
-print ">EEBF - Delphi-E Flint
+print "
<OPTION value=L";
if ($data->{'area'} eq 'L'){
print " Selected";