152 |
|
return $self->{content}->{LIB}; |
153 |
|
} |
154 |
|
if (!$self->{archflag}){return;} |
155 |
< |
my $libname; |
156 |
< |
|
157 |
< |
if (exists($attributes{'position'})) |
158 |
< |
{ |
159 |
< |
if ($attributes{'position'} eq 'first') |
160 |
< |
{ |
161 |
< |
$libname = "F:".$attributes{'name'}; |
162 |
< |
} |
163 |
< |
else |
164 |
< |
{ |
165 |
< |
# There was a position entry but it didn't make sense: |
166 |
< |
$libname = $attributes{'name'}; |
167 |
< |
} |
168 |
< |
} |
169 |
< |
else |
170 |
< |
{ |
171 |
< |
$libname = $attributes{'name'}; |
172 |
< |
} |
155 |
> |
my $libname = $attributes{'name'}; |
156 |
|
# We have a libname, add it to the list: |
157 |
|
$self->{nested} == 1 ? push(@{$self->{tagcontent}->{LIB}}, $libname) |
158 |
|
: push(@{$self->{content}->{LIB}}, $libname); |