From 2269c4cd5159b7fdad038ffc57a4314d4df81624 Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Thu, 30 Sep 2010 16:27:20 -0700
Subject: [PATCH] Remove use of ->get('property')

---
 lib/WebGUI/Shop/PayDriver.pm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/lib/WebGUI/Shop/PayDriver.pm b/lib/WebGUI/Shop/PayDriver.pm
index 63336ad3d..ab71a02ae 100644
--- a/lib/WebGUI/Shop/PayDriver.pm
+++ b/lib/WebGUI/Shop/PayDriver.pm
@@ -197,7 +197,7 @@ A user object that will be used directly.
 
 sub canUse {
     my $self = shift;
-    return 0 unless $self->get('enabled');
+    return 0 unless $self->enabled;
     my $user = shift;
     my $userObject;
     if (!defined $user or ref($user) ne 'HASH') {
@@ -214,7 +214,7 @@ sub canUse {
             WebGUI::Error::InvalidParam->throw(error => q{Must provide user information})
         }
     }
-    return $userObject->isInGroup($self->get('groupToUse'));
+    return $userObject->isInGroup($self->groupToUse);
 }
 
 #-------------------------------------------------------------------
@@ -631,7 +631,7 @@ sub www_getCredentials {
     };
     $self->appendCartVariables($var);
 
-    my $output   = $self->processTemplate($self->get("summaryTemplateId"), $var);
+    my $output   = $self->processTemplate($self->summaryTemplateId, $var);
     return $session->style->userStyle($output);
 }