Ignore:
Timestamp:
01/11/08 20:53:41 (13 years ago)
Author:
davidb
Message:

Modification to support extensions. BEGIN block now adds perllib/ perllib/cpan to @INC for each extension.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • gsdl/trunk/bin/script/pluginfo.pl

    r12640 r14942  
    3737    unshift (@INC, "$ENV{'GSDLHOME'}/perllib/cpan");
    3838    unshift (@INC, "$ENV{'GSDLHOME'}/perllib/plugins");
     39
     40    if (defined $ENV{'GSDLEXTS'}) {
     41    my @extensions = split(/:/,$ENV{'GSDLEXTS'});
     42    foreach my $e (@extensions) {
     43        my $ext_prefix = "$ENV{'GSDLHOME'}/ext/$e";
     44
     45        unshift (@INC, "$ext_prefix/perllib");
     46        unshift (@INC, "$ext_prefix/perllib/cpan");
     47    }
     48    }
    3949}
    4050
Note: See TracChangeset for help on using the changeset viewer.