Changeset 6543
- Timestamp:
- 2004-01-19T15:36:20+13:00 (20 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/gsdl/perllib/mgbuilder.pm
r6407 r6543 558 558 $not = 1; 559 559 } 560 foreach $lang (@{$self->{'collect_cfg'}->{'languages'}}) { 561 if ($lang eq $language) { 562 if($not) { 563 push (@$indexexparr, "!Language/$language/"); 564 } else { 565 push (@$indexexparr, "Language/$language/"); 566 } 567 last; 568 } 560 if($not) { 561 push (@$indexexparr, "!Language/$language/"); 562 } else { 563 push (@$indexexparr, "Language/$language/"); 569 564 } 570 565 }
Note:
See TracChangeset
for help on using the changeset viewer.