Changeset 25957 for main/trunk/greenstone2/bin/script/pluginfo.pl
- Timestamp:
- 2012-07-17T15:17:30+12:00 (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/bin/script/pluginfo.pl
r25499 r25957 77 77 'type' => "string", 78 78 'reqd' => "no" }, 79 { 'name' => "gs_version", 80 'desc' => "{pluginfo.gs_version}", 81 'type' => "string", 82 'reqd' => "no", 83 'hiddengli' => "yes" }, 79 84 { 'name' => "xml", 80 85 'desc' => "{scripts.xml}", … … 107 112 my $site = ""; 108 113 my $collection = ""; 114 my $gs_version = ""; 109 115 my $xml = 0; 110 116 my $listall = 0; … … 121 127 die "\n"; 122 128 } 123 124 129 foreach my $strVariable (keys %$hashParsingResult) 125 130 { … … 188 193 if ($site ne "") { 189 194 # assume Greenstone 3 195 $gs_version = "3" if $gs_version eq ""; 190 196 if ($collection ne "") { 191 197 $ENV{'GSDLCOLLECTDIR'} = &util::filename_cat ($ENV{'GSDL3HOME'}, "sites", $site, "collect", $collection); … … 196 202 } 197 203 else { 204 $gs_version = "2" if $gs_version eq ""; 198 205 if ($collection ne "") { 199 206 $ENV{'GSDLCOLLECTDIR'} = &util::filename_cat ($ENV{'GSDLHOME'}, "collect", $collection); … … 247 254 foreach my $plugin (@plugin_list) { 248 255 $plugin =~ s/\.pm$//; 249 my $plugobj = &plugin::load_plugin_for_info ($plugin );256 my $plugobj = &plugin::load_plugin_for_info ($plugin, $gs_version); 250 257 push (@plugobj_list, $plugobj); 251 258 } … … 267 274 } 268 275 else { 269 &print_single_plugin($plugin, $ xml, 1);276 &print_single_plugin($plugin, $gs_version, $xml, 1); 270 277 } 271 278 } … … 273 280 274 281 sub print_single_plugin { 275 my ($plugin, $ xml, $header) = @_;276 my $plugobj = &plugin::load_plugin_for_info ($plugin );282 my ($plugin, $gs_version, $xml, $header) = @_; 283 my $plugobj = &plugin::load_plugin_for_info ($plugin, $gs_version); 277 284 if ($xml) { 278 285 &gsprintf::set_print_xml_tags();
Note:
See TracChangeset
for help on using the changeset viewer.