Commit ec15f539 authored by Yadd's avatar Yadd
Browse files

Perl warning

parent 5d8b8668
......@@ -146,8 +146,7 @@ sub userBind {
PE_PP_PASSWORD_TOO_SHORT,
PE_PP_PASSWORD_TOO_YOUNG,
PE_PP_PASSWORD_IN_HISTORY,
]->[$pp_error]
or PE_ERROR;
]->[$pp_error];
}
elsif ( $mesg->code == 0 ) {
return PE_OK;
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment