diff --git a/Webperl/Auth.pm b/Webperl/Auth.pm index 8516daf..3e8e9c9 100644 --- a/Webperl/Auth.pm +++ b/Webperl/Auth.pm @@ -306,8 +306,7 @@ sub get_authmethod_module { $self -> clear_error(); - return $self -> {"methods"} -> load_method($moduleid) - or return $self -> self_error("Auth implementation load failed: ".$self -> {"methods"} -> errstr()); + return ($self -> {"methods"} -> load_method($moduleid) || $self -> self_error("Auth implementation load failed: ".$self -> {"methods"} -> errstr()))); }