Subject: | Possible precedence issue with control flow operator |
Date: | Sun, 16 Jul 2017 08:44:49 +0200 |
To: | bug-DBIx-Cursor [...] rt.cpan.org |
From: | Christian Drauch <cdr [...] jeka.com> |
Hi,
@perl v5.24.1 (Debian stretch):
*Possible precedence issue with control flow operator at
/usr/local/share/perl/5.24.1/DBIx/Cursor.pm line 100*
My easy workaround ;-)
100,104c100
< if ($self->{type}{$colname}) {
< return $self->{type}{$colname};
< } else {
< croak ("column $colname not found");
< }
---
Show quoted text
> return $self->{type}{$colname} or croak ("column $colname not found");
best regards,
Chris