package Unleashed::AuthorizeCard;

use strict;
use base qw/ Business::OnlinePayment /;

sub new {
        my $class = shift;
        my $obj = bless( {}, $class );
        my $realObj = $obj->SUPER::new( "AuthorizeNet"  );

        return $realObj;
}