|
Lines 100-107
if ( $op eq "" ) {
Link Here
|
| 100 |
my @bad_item_titles; |
100 |
my @bad_item_titles; |
| 101 |
my @missing_branches; |
101 |
my @missing_branches; |
| 102 |
foreach my $item (@import_items) { |
102 |
foreach my $item (@import_items) { |
| 103 |
push @bad_item_titles, $item->{title}; |
103 |
push @bad_item_titles, $item->{title} if ( $item->{title} ); |
| 104 |
push @missing_branches, $item->{branch}; |
104 |
push @missing_branches, $item->{branch} if ( $item->{title} ); |
| 105 |
} |
105 |
} |
| 106 |
@bad_item_titles = uniq @bad_item_titles; |
106 |
@bad_item_titles = uniq @bad_item_titles; |
| 107 |
@missing_branches = uniq @missing_branches; |
107 |
@missing_branches = uniq @missing_branches; |
| 108 |
- |
|
|