NumericEval: fix typo on error handling

Sandy_Bio_Perl figured out a bug while using DBD::CSV which has been proven
by Tux (Merjin) as a real bug in SQL::Statement.

http://www.perlmonks.org/?node_id=1167381

Thanks to both!

Signed-off-by: Jens Rehsack <[email protected]>

Author: rehsack

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 $self->do_err(qq~Bad numeric expression '$val'!~)
+        return $owner->do_err(qq~Bad numeric expression '$val'!~)
           unless ( defined( _NUMBER($val) ) );
     }
     $expr =~ s/\?(\d+)\?/$vals[$1]/g;