Changeset 25167
- Timestamp:
- 2012-03-01T12:42:18+13:00 (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/bin/script/pluginfo.pl
r24748 r25167 238 238 } 239 239 240 print STDERR "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n"; 241 print STDERR "<PluginList length=\"" . scalar(@plugin_list) . "\">\n"; 240 # load up the plugins before writing out the xml so that any error 241 # messages are not inside the XML output (can cause parsing to fail) 242 my @plugobj_list; 242 243 foreach my $plugin (@plugin_list) { 243 244 $plugin =~ s/\.pm$//; 244 245 my $plugobj = &plugin::load_plugin_for_info ($plugin); 246 push (@plugobj_list, $plugobj); 247 } 248 print STDERR "<?xml version=\"1.0\" encoding=\"UTF-8\"?>\n"; 249 print STDERR "<PluginList length=\"" . scalar(@plugin_list) . "\">\n"; 250 foreach my $plugobj (@plugobj_list) { 245 251 if ($describeall) { 246 252 $plugobj->print_xml_usage(0); … … 251 257 } 252 258 print STDERR "</PluginList>\n"; 259 260 253 261 } 254 262 else {
Note:
See TracChangeset
for help on using the changeset viewer.