[ic] Payment.pm not pgp-ing online checks

[tom friedel]

The latest version I found 2.14 of Payment.pm, does not seem to do 
anything with PGP, etc/report when online checks are used.  I am not on 
the developer mailing list, if anyone has input please let me know.  I 
will try and change, but am thinking my changes will not be done in the 
best possible way (since I didn't write the code)
thank you in advance for any input,
tom friedel
http://www.readyink.com



    if($encrypt and $CGI::values{mv_credit_card_number} and 
$Vend::Cfg->{EncryptKey}) {
        my $prog = charge_param('encrypt_program') || 
$Vend::Cfg->{EncryptProgram};
        if($prog =~ /pgp|gpg/) {
            $CGI::values{mv_credit_card_force} = 1;
            (
                undef,
                $::Values->{mv_credit_card_info},
                $::Values->{mv_credit_card_exp_month},
                $::Values->{mv_credit_card_exp_year},
                $::Values->{mv_credit_card_exp_all},
                $::Values->{mv_credit_card_type},
                $::Values->{mv_credit_card_error}
            )    = encrypt_standard_cc(\%CGI::values);
        }