|
Lines 88-96
sub existing_statuses {
Link Here
|
| 88 |
} |
88 |
} |
| 89 |
); |
89 |
); |
| 90 |
while ( my $request = $ill_requests->next ) { |
90 |
while ( my $request = $ill_requests->next ) { |
| 91 |
my $status_data = $request->strings_map; |
91 |
my $status_data = $request->status_alias ? $request->strings_map : undef; |
| 92 |
|
92 |
|
| 93 |
if ( $status_data->{status_alias} ) { |
93 |
if ( $status_data && $status_data->{status_alias} ) { |
| 94 |
push @data, { |
94 |
push @data, { |
| 95 |
$status_data->{status_alias}->{str} ? ( str => $status_data->{status_alias}->{str} ) |
95 |
$status_data->{status_alias}->{str} ? ( str => $status_data->{status_alias}->{str} ) |
| 96 |
: $status_data->{status_alias}->{code} ? ( str => $status_data->{status_alias}->{code} ) |
96 |
: $status_data->{status_alias}->{code} ? ( str => $status_data->{status_alias}->{code} ) |
| 97 |
- |
|
|