Changeset 14733
- Timestamp:
- 2007-10-26T16:27:46+13:00 (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
gsdl/trunk/bin/script/export.pl
r13169 r14733 472 472 $export_info -> load_info ($export_info_filename); 473 473 474 if ($saveas !~ /^(GA|METS|DSpace|MARCXML)$/) { 475 if (defined $collectcfg->{'plugout'} && $collectcfg->{'plugout'}[0] =~ /^(GAPlugout|METSPlugout)$/) { 476 $saveas = $collectcfg->{'plugout'}[0]; 477 } else { 478 $saveas ="GAPlugout"; 479 } 480 } 481 482 483 ####Use Plugout#### 484 my ($plugout_name); 485 if ($saveas !~ /^(GA|METS|DSpace|MARCXML)Plugout$/ ){ 486 $plugout_name = $saveas."Plugout"; 487 } 488 else { 489 $plugout_name = $saveas; 490 } 491 492 my $opts=[]; 493 494 push @$opts,("-output_info",$export_info) if (defined $export_info); 495 push @$opts,("-verbosity",$verbosity) if (defined $verbosity); 496 push @$opts,("-debug") if ($debug); 497 push @$opts,("-gzip_output",$gzip) if (defined $gzip); 498 push @$opts,("-group_size",$groupsize) if (defined $groupsize); 499 push @$opts,("-output_handle",$out) if (defined $out); 500 push @$opts,("-xslt_file",$xsltfile) if (defined $xsltfile); 501 push @$opts,("-group") if ($group_marc && $plugout_name =~ /^MARCXMLPlugout$/); 502 push @$opts,("-mapping_file",$mapping_file) if (defined $mapping_file && $plugout_name =~ /^MARCXMLPlugout$/); 503 push @$opts,("-saveas_version",$saveas_version) if (defined $saveas_version && $plugout_name =~ /^METSPlugout$/); 504 push @$opts,("-xslt_mets",$xslt_mets) if (defined $xslt_mets && $plugout_name =~ /^METSPlugout$/); 505 push @$opts,("-xslt_txt",$xslt_txt) if (defined $xslt_txt && $plugout_name =~ /^METSPlugout$/); 506 $processor = &plugout::load_plugout($plugout_name,$opts); 474 my ($plugout); 475 if (defined $collectcfg->{'plugout'}) { 476 $plugout = $collectcfg->{'plugout'}; 477 } 478 else{ 479 if ($saveas !~ /^(GA|METS|DSpace|MARCXML)$/) { 480 push @$plugout,"GAPlugout"; 481 } 482 else{ 483 push @$plugout,$saveas."Plugout"; 484 } 485 } 486 487 my $plugout_name = $plugout->[0]; 488 489 push @$plugout,("-output_info",$export_info) if (defined $export_info); 490 push @$plugout,("-verbosity",$verbosity) if (defined $verbosity); 491 push @$plugout,("-debug") if ($debug); 492 push @$plugout,("-gzip_output",$gzip) if (defined $gzip); 493 push @$plugout,("-group_size",$groupsize) if (defined $groupsize); 494 push @$plugout,("-output_handle",$out) if (defined $out); 495 push @$plugout,("-xslt_file",$xsltfile) if (defined $xsltfile); 496 push @$plugout,("-group") if ($group_marc && $plugout_name =~ /^MARCXMLPlugout$/); 497 push @$plugout,("-mapping_file",$mapping_file) if (defined $mapping_file && $plugout_name =~ /^MARCXMLPlugout$/); 498 push @$plugout,("-saveas_version",$saveas_version) if (defined $saveas_version && $plugout_name =~ /^METSPlugout$/); 499 push @$plugout,("-xslt_mets",$xslt_mets) if (defined $xslt_mets && $plugout_name =~ /^METSPlugout$/); 500 push @$plugout,("-xslt_txt",$xslt_txt) if (defined $xslt_txt && $plugout_name =~ /^METSPlugout$/); 501 $processor = &plugout::load_plugout($plugout); 507 502 508 503 $processor->setoutputdir ($exportdir);
Note:
See TracChangeset
for help on using the changeset viewer.