Changeset 15360
- Timestamp:
- 2008-05-07T17:43:32+12:00 (16 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
gsdl/trunk/perllib/plugouts/FedoraMETSPlugout.pm
r15013 r15360 513 513 else 514 514 { 515 my $gsdlhome = $ENV{'GSDLHOME'}; 515 my $collectparent; 516 if (defined $ENV{'GSDL3HOME'}) { 517 $collectparent = &util::filename_cat($ENV{'GSDL3HOME'},"sites","localsite"); 518 } 519 else { 520 # greenstone 2 521 $collectparent = $ENV{'GSDLHOME'}; 522 } 523 516 524 my $gsdl_href = "$working_dir/$fname"; 517 525 518 $gsdl_href =~ s/^$ gsdlhome(\/)?//;526 $gsdl_href =~ s/^$collectparent(\/)?//; 519 527 $gsdl_href = "/gsdl/$gsdl_href"; 520 528 … … 627 635 else 628 636 { 629 my $gsdlhome = $ENV{'GSDLHOME'}; 637 my $collectparent; 638 if (defined $ENV{'GSDL3HOME'}) { 639 $collectparent = &util::filename_cat($ENV{'GSDL3HOME'},"sites","localsite"); 640 } 641 else { 642 # greenstone 2 643 $collectparent = $ENV{'GSDLHOME'}; 644 } 645 630 646 my $gsdl_href = "$working_dir/$assfilePath"; 631 647 632 $gsdl_href =~ s/^$ gsdlhome(\/)?//;648 $gsdl_href =~ s/^$collectparent(\/)?//; 633 649 $gsdl_href = "/gsdl/$gsdl_href"; 634 650
Note:
See TracChangeset
for help on using the changeset viewer.