From 2fdb87beec3aa440b1e2071b0f80c6fe44cece3b Mon Sep 17 00:00:00 2001 From: Yanick Champoux Date: Sat, 1 Oct 2016 13:30:01 -0400 Subject: [PATCH] Use a defined owner Commit af13adb1f489f88a4 is breaking the tests. I've switched $owner-> for $self->{OWNER}-> and now things are passing. Big warning: I'm not sure of the fix af13adb1f489f88a4 was trying to do in the first place, so my own patch could be flawed. --- lib/SQL/Statement/Function.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lib/SQL/Statement/Function.pm b/lib/SQL/Statement/Function.pm index 1467dac..2c73a05 100644 --- a/lib/SQL/Statement/Function.pm +++ b/lib/SQL/Statement/Function.pm @@ -223,7 +223,7 @@ sub value($) map { _INSTANCE( $_, 'SQL::Statement::Term' ) ? $_->value($eval) : $_ } @{ $self->{PARAMS} }; foreach my $val (@vals) { - return $owner->do_err(qq~Bad numeric expression '$val'!~) + return $self->{OWNER}->do_err(qq~Bad numeric expression '$val'!~) unless ( defined( _NUMBER($val) ) ); } $expr =~ s/\?(\d+)\?/$vals[$1]/g;