Permalink
Browse files

Merge pull request #6 from mjg17/mjg17/qw_paren_deprecation

Use of qw(...) as parentheses is deprecated.

Thanks for the patch!
  • Loading branch information...
awwaiid committed Oct 12, 2015
2 parents bcac4f5 + 9602d16 commit 10ba280b77db3571000b51e6beaaeb57d45f64cd
Showing with 2 additions and 2 deletions.
  1. +1 −1 bin/squatting
  2. +1 −1 lib/Squatting/With/MockRequest.pm
View
@@ -111,7 +111,7 @@ if ($app) {
$self->{status} = 200;
$self;
};
foreach my $method qw(get post put delete) {
foreach my $method ( qw(get post put delete) ) {
*{$app."::$method" } = sub {
my $cc = ${$app."::Controllers::C"}{$_[1]}->clone->mock_init(@_[2..$#_]);
$cc->env->{REQUEST_METHOD} = $method;
@@ -18,7 +18,7 @@ sub mock_controller_init {
$cc;
};
foreach my $method qw(get post put delete head) {
foreach my $method ( qw(get post put delete head) ) {
*{$method} = sub {
my ($app, $controller, @args) = @_;
my $cc = ${$app."::Controllers::C"}{$controller}->clone;

0 comments on commit 10ba280

Please sign in to comment.