|
Lines 56-63
Link Here
|
| 56 |
|
56 |
|
| 57 |
package OpenCA::User; |
57 |
package OpenCA::User; |
| 58 |
|
58 |
|
| 59 |
## $Revision: 1.4 $ |
59 |
## $Revision: 1.5 $ |
| 60 |
($OpenCA::User::VERSION = '$Revision: 1.4 $' )=~ s/(?:^.*: (\d+))|(?:\s+\$$)/defined $1?"0\.0":""/eg; |
60 |
($OpenCA::User::VERSION = '$Revision: 1.5 $' )=~ s/(?:^.*: (\d+))|(?:\s+\$$)/defined $1?"0\.0":""/eg; |
| 61 |
|
61 |
|
| 62 |
our ($errno, $errval); |
62 |
our ($errno, $errval); |
| 63 |
|
63 |
|
|
Lines 369-375
Link Here
|
| 369 |
} elsif ( $user->{STATUS} =~ /UNCONFIRMED/i ) { |
369 |
} elsif ( $user->{STATUS} =~ /UNCONFIRMED/i ) { |
| 370 |
return UNCONFIRMED_STATUS; |
370 |
return UNCONFIRMED_STATUS; |
| 371 |
} else { |
371 |
} else { |
| 372 |
$self->set_error( ERR_USER_STATUS_UNKNOWN, $user->{STATUS} ); |
372 |
$self->set_error( UNKNOWN_STATUS, $user->{STATUS} ); |
| 373 |
return UNKNOWN_STATUS; |
373 |
return UNKNOWN_STATUS; |
| 374 |
} |
374 |
} |
| 375 |
} |
375 |
} |
