Changeset 21341 for main/trunk/greenstone2/perllib/printusage.pm

Timestamp:

2009-12-14T12:46:40+13:00 (14 years ago)

Author:

kjdon

Message:

can add internal => 'true' to plugin/classifier option, and it won't get printed out with pluginfo. use for internal options

File:

• main/trunk/greenstone2/perllib/printusage.pm (modified) (2 diffs)

main/trunk/greenstone2/perllib/printusage.pm

@@ -71 +71 @@
 
     foreach my $option (@$options) {
+    next if defined($option->{'internal'});
+    
     my $optionname = $option->{'name'};
     my $displayname = $option->{'disp'};
@@ -226 +228 @@
 
     foreach my $option (@$options) {
+    next if defined($option->{'internal'});
+
     # Display option name
     my $optionname = $option->{'name'};