Files
modules/init/perl.in
rkowen 2aca9b1251 Fixed where it needs to reference $ENV{...}
[ 705033 ] Bug in init/perl
2006-02-04 08:36:12 +00:00

28 lines
804 B
Plaintext

@VERSIONING@if (! defined $ENV{MODULE_VERSION} ) {
@VERSIONING@ $ENV{"MODULE_VERSION_STACK"}="@VERSION@";
@VERSIONING@ $ENV{"MODULE_VERSION"}="@VERSION@";
@VERSIONING@} else {
@VERSIONING@ $ENV{"MODULE_VERSION_STACK"}=$ENV{"$MODULE_VERSION"};
@VERSIONING@}
sub module {
local ($exec_prefix);
@VERSIONING@ $exec_prefix = "@BASEPREFIX@/Modules/".$ENV{"MODULE_VERSION"};
@VERSIONING@ eval `$exec_prefix/bin/modulecmd perl @_`;
@NOTVERSIONING@ $exec_prefix = "@bindir@";
@NOTVERSIONING@ eval `$exec_prefix/modulecmd perl @_`;
}
$ENV{"MODULESHOME"} = "@prefix@";
if (! defined $ENV{"MODULEPATH"} ) {
$ENV{"MODULEPATH"} = `sed 's/#.*$//' $ENV{"MODULESHOME"}/init/.modulespath | awk 'NF==1{printf("%s:",$1)}'`
}
if (! defined $ENV{"LOADEDMODULES"} ) {
$ENV{"LOADEDMODULES"} = "";
}
1;