From: plobbes <plobbes>
Date: Thu, 31 Aug 2006 20:15:35 +0000 (+0000)
Subject: - remove extra block in code that redefines submit for subclass
X-Git-Tag: BUSINESS_ONLINEPAYMENT_3_00_04~5
X-Git-Url: http://git.freeside.biz/gitweb/?p=Business-OnlinePayment.git;a=commitdiff_plain;h=dda73c9d6b5fb43424c980323e10ceb92269c103

- remove extra block in code that redefines submit for subclass
---

diff --git a/OnlinePayment.pm b/OnlinePayment.pm
index 874176d..7c7287c 100644
--- a/OnlinePayment.pm
+++ b/OnlinePayment.pm
@@ -54,20 +54,16 @@ sub new {
         $self->$key($value);
     }
 
-    {
-	no strict 'refs';
-	no warnings 'redefine';
-	my $submit = qualify_to_ref('submit', $subclass);
-	unless ( $subclass->can('submit') eq
-		 $class->can('submit'))
-	{
-	    
-	    $self->{_child_submit} = \&$submit;
-	    *{"${subclass}::submit"} = sub {
-		my $self = shift;
-		$self->_pre_submit();
-	    }
-	}
+    unless ( $subclass->can('submit') eq $class->can('submit') ) {
+        no strict 'refs';
+        no warnings 'redefine';
+        my $submit = qualify_to_ref('submit', $subclass);
+
+        $self->{_child_submit} = \&$submit;
+        *{"${subclass}::submit"} = sub {
+            my $self = shift;
+            $self->_pre_submit();
+        }
     }
 
     return $self;