https://bugs.koha-community.org/bugzilla3/show_bug.cgi?id=33832
--- Comment #8 from David Cook <[email protected]> --- (In reply to Marcel de Rooy from comment #7) > Seeing this: > if ( $op eq 'cud-update' && $newpassword.defined and not @errors ) { > > What is $newpassword.defined ?? > Wondering why perl does compile that? > Please explain. It looks like a copy/paste error from the template toolkit where scalar values can have methods. It looks like Perl compiles it because "." is used to concatenate things together. It looks like $newpassword.defined is equivalent to $newpassword . defined $_ "Returns a Boolean value telling whether EXPR has a value other than the undefined value undef. If EXPR is not present, $_ is checked." https://perldoc.perl.org/functions/defined Yikes! -- You are receiving this mail because: You are watching all bug changes. _______________________________________________ Koha-bugs mailing list [email protected] https://lists.koha-community.org/cgi-bin/mailman/listinfo/koha-bugs website : http://www.koha-community.org/ git : http://git.koha-community.org/ bugs : http://bugs.koha-community.org/
