X-Git-Url: http://git.freeside.biz/gitweb/?p=Business-OnlinePayment-InternetSecure.git;a=blobdiff_plain;f=InternetSecure.pm;h=cde38d3f02bafa1a9be737bdce12e337048b32e7;hp=b6632edaca0bccbc994058ecae7046ac809f4a3a;hb=1e4d0e5efa809ecb0480d9040e8b373bcb4f2480;hpb=df677a47383944a67d88371a83d18d557602f3cd diff --git a/InternetSecure.pm b/InternetSecure.pm index b6632ed..cde38d3 100755 --- a/InternetSecure.pm +++ b/InternetSecure.pm @@ -151,7 +151,7 @@ sub to_xml { croak "Unsupported transaction type: $content{type}" if $content{type} && ! grep lc($content{type}) eq lc($_), - values %{+CARD_TYPES}; + values %{+CARD_TYPES}, 'CC'; croak 'Unsupported action' unless $content{action} =~ /^Normal Authori[zs]ation$/i; @@ -434,6 +434,8 @@ Transaction type, being one of the following: =item - JCB +=item - CC + =back (This is actually ignored for the moment, and can be left blank or undefined.)