Commerce changes:

Credit Card failures now bounce user back to checkout screen with error there
Added Check commerce plugin and removed select box from Cash plugin.  Users now don't have to chose twice.
Added label to each payment plugin.  ITransact module now defaults to "Credit Card" for display purposes.

lib/WebGUI/Commerce/Payment/Check.pm

@@ -0,0 +1,84 @@
+package WebGUI::Commerce::Payment::Check;
+
+=head1 LEGAL
+
+ -------------------------------------------------------------------
+  WebGUI is Copyright 2001-2007 Plain Black Corporation.
+ -------------------------------------------------------------------
+  Please read the legal notices (docs/legal.txt) and the license
+  (docs/license.txt) that came with this distribution before using
+  this software.
+ -------------------------------------------------------------------
+  http://www.plainblack.com                     info@plainblack.com
+ -------------------------------------------------------------------
+
+=head1 NAME
+
+Package WebGUI::Commerce::Payment::Check
+
+=head1 DESCRIPTION
+
+Payment plug-in for check transactions.
+
+=cut
+
+use strict;
+use WebGUI::HTMLForm;
+use WebGUI::Commerce::Payment;
+use WebGUI::Commerce::Item;
+use Tie::IxHash;
+use WebGUI::International;
+use WebGUI::SQL;
+use base 'WebGUI::Commerce::Payment::Cash';
+
+#-------------------------------------------------------------------
+sub getPaymentMethod {
+	my $self = shift;
+    unless($self->{_paymentMethod}) { 
+        $self->{_paymentMethod} = "check";
+    }
+    return $self->{_paymentMethod};
+}
+
+#-------------------------------------------------------------------
+sub i18n {
+	my $self = shift;
+    unless (exists $self->{_i18n}) {
+       $self->{_i18n} = WebGUI::International->new($self->session,'CommercePaymentCheck');
+    }
+    return $self->{_i18n};
+}
+
+#-------------------------------------------------------------------
+
+=head2 init ( namespace )
+
+Constructor for the Check plugin.
+
+=head3 session
+
+A copy of the session object
+
+=head3 namespace
+
+The namespace of the plugin.
+
+=cut
+
+sub init {
+	my ($class, $self);
+	$class = shift;
+	my $session   = shift;
+    my $namespace = shift || 'Check';
+	$self = $class->SUPER::init($session,$namespace);
+	return $self;
+}
+
+#-------------------------------------------------------------------
+sub name {
+	return 'Check';
+}
+
+
+1;
+