Convert Shop::Pay to use Moose instead of Class::InsideOut. Update tests, and core usages to Moose syntax. Provide a shim so the old, base ->new($session) syntax.
This commit is contained in:
parent
3fbc109429
commit
9678c3d8a7
5 changed files with 39 additions and 62 deletions
|
|
@ -177,7 +177,7 @@ sub www_pay {
|
|||
my $session = shift;
|
||||
my $output = undef;
|
||||
my $method = "www_".$session->form->get("method");
|
||||
my $pay = WebGUI::Shop::Pay->new($session);
|
||||
my $pay = WebGUI::Shop::Pay->new(session => $session);
|
||||
if ($method ne "www_" && $pay->can($method)) {
|
||||
$output = $pay->$method();
|
||||
}
|
||||
|
|
|
|||
Loading…
Add table
Add a link
Reference in a new issue