feature.pm (677600b0) | feature.pm (d62abd1a) |
---|---|
1#************************************************************** 2# 3# Licensed to the Apache Software Foundation (ASF) under one 4# or more contributor license agreements. See the NOTICE file 5# distributed with this work for additional information 6# regarding copyright ownership. The ASF licenses this file 7# to you under the Apache License, Version 2.0 (the 8# "License"); you may not use this file except in compliance --- 358 unchanged lines hidden (view full) --- 367{ 368 my ($modules, $language, $variables) = @_; 369 370 my $features = []; 371 372 foreach my $onefeature (@$modules) 373 { 374 # Java and Ada only, if the correct settings are set | 1#************************************************************** 2# 3# Licensed to the Apache Software Foundation (ASF) under one 4# or more contributor license agreements. See the NOTICE file 5# distributed with this work for additional information 6# regarding copyright ownership. The ASF licenses this file 7# to you under the Apache License, Version 2.0 (the 8# "License"); you may not use this file except in compliance --- 358 unchanged lines hidden (view full) --- 367{ 368 my ($modules, $language, $variables) = @_; 369 370 my $features = []; 371 372 foreach my $onefeature (@$modules) 373 { 374 # Java and Ada only, if the correct settings are set |
375 my $styles = $onefeature->{'Styles'} // ""; | 375 my $styles = $onefeature->{'Styles'}; 376 $styles = "" unless defined $styles; |
376 if (( $styles =~ /\bJAVAMODULE\b/ ) && ( ! ($variables->{'JAVAPRODUCT'} ))) { next; } 377 378 # Controlling the language! 379 # Only language independent feature or feature with the correct language will be included into the table 380 381 next if $onefeature->{'ismultilingual'} && ($onefeature->{'specificlanguage'} ne $language); 382 383 my $feature_gid =get_feature_gid($onefeature); --- 119 unchanged lines hidden --- | 377 if (( $styles =~ /\bJAVAMODULE\b/ ) && ( ! ($variables->{'JAVAPRODUCT'} ))) { next; } 378 379 # Controlling the language! 380 # Only language independent feature or feature with the correct language will be included into the table 381 382 next if $onefeature->{'ismultilingual'} && ($onefeature->{'specificlanguage'} ne $language); 383 384 my $feature_gid =get_feature_gid($onefeature); --- 119 unchanged lines hidden --- |