diff options
author | ivan <ivan> | 2000-12-03 14:29:15 +0000 |
---|---|---|
committer | ivan <ivan> | 2000-12-03 14:29:15 +0000 |
commit | 65dea21c4088a0dbf3e8863a6dadc39aed67d4db (patch) | |
tree | aaaa284759715a8610a0c53b4bcd16292daa7704 /fs_signup/FS-SignupClient | |
parent | 9951dac925264910d664b50d2fc33cf3dc1c734e (diff) |
template bugfix from Jason Spence <thalakan@frys.com>
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 7576b8b42..a3fa9e788 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.8 2000-08-24 07:26:50 ivan Exp $ +# $Id: signup.cgi,v 1.9 2000-12-03 14:29:15 ivan Exp $ use strict; use vars qw( @payby $cgi $locales $packages $pops $r $error @@ -313,7 +313,7 @@ sub print_okay { my $pop = pop_info($cgi->param('popnum')) or die "fatal: invalid popnum got past FS::SignupClient::new_customer"; - my ( $ac, $exch, $loc ) = ( $pop->{'ac'}, $pop->{'exch'}, $pop->{'loc'} ); + ( $ac, $exch, $loc ) = ( $pop->{'ac'}, $pop->{'exch'}, $pop->{'loc'} ); if ( $ieak_template && $user_agent->platform eq 'ia32' |