Changeset 21292 for main/trunk/greenstone2/bin/script/classinfo.pl
- Timestamp:
- 2009-12-07T14:41:25+13:00 (14 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
main/trunk/greenstone2/bin/script/classinfo.pl
r16787 r21292 44 44 unshift (@INC, "$ext_prefix/perllib"); 45 45 unshift (@INC, "$ext_prefix/perllib/cpan"); 46 unshift (@INC, "$ext_prefix/perllib/plugins");47 unshift (@INC, "$ext_prefix/perllib/plugouts");48 46 unshift (@INC, "$ext_prefix/perllib/classify"); 49 47 } 50 48 } 49 if (defined $ENV{'GSDL3EXTS'}) { 50 my @extensions = split(/:/,$ENV{'GSDL3EXTS'}); 51 foreach my $e (@extensions) { 52 my $ext_prefix = "$ENV{'GSDL3SRCHOME'}/ext/$e"; 53 54 unshift (@INC, "$ext_prefix/perllib"); 55 unshift (@INC, "$ext_prefix/perllib/cpan"); 56 unshift (@INC, "$ext_prefix/perllib/classify"); 57 58 } 59 } 60 51 61 } 52 62
Note:
See TracChangeset
for help on using the changeset viewer.