[freeside-commits] freeside/fs_selfservice/FS-SelfService/cgi/misc states.cgi, NONE, 1.1 counties.cgi, NONE, 1.1
Ivan,,,
ivan at wavetail.420.am
Sun May 24 18:49:36 PDT 2009
Update of /home/cvs/cvsroot/freeside/fs_selfservice/FS-SelfService/cgi/misc
In directory wavetail.420.am:/tmp/cvs-serv15684/fs_selfservice/FS-SelfService/cgi/misc
Added Files:
states.cgi counties.cgi
Log Message:
international self-service payments, RT#1592
--- NEW FILE: counties.cgi ---
#!/usr/bin/perl -w
use strict;
use CGI;
use FS::SelfService qw( mason_comp );
my $cgi = new CGI;
my $rv = mason_comp( 'comp' => '/misc/counties.cgi',
'query_string' => $cgi->query_string, #pass CGI params...
);
#hmm.
my $output = $rv->{'error'} || $rv->{'output'};
print $cgi->header( '-expires' => 'now' ).
$output;
--- NEW FILE: states.cgi ---
#!/usr/bin/perl -w
use strict;
use CGI;
use FS::SelfService qw( mason_comp );
my $cgi = new CGI;
my $rv = mason_comp( 'comp' => '/misc/states.cgi',
'query_string' => $cgi->query_string, #pass CGI params...
);
#hmm.
my $output = $rv->{'error'} || $rv->{'output'};
print $cgi->header( '-expires' => 'now' ).
$output;
More information about the freeside-commits
mailing list