Merge pull request #1328 from suraia/fix-recursive-module-load
Fix recursive module loading
This commit is contained in:
		| @@ -117,19 +117,19 @@ function spack { | ||||
|             # If spack module command comes back with an error, do nothing. | ||||
|             case $_sp_subcommand in | ||||
|                 "use") | ||||
|                     if _sp_full_spec=$(command spack $_sp_flags module find $_sp_subcommand_args --module-type dotkit $_sp_spec); then | ||||
|                     if _sp_full_spec=$(command spack $_sp_flags module loads --input-only $_sp_subcommand_args --module-type dotkit $_sp_spec); then | ||||
|                         use $_sp_module_args $_sp_full_spec | ||||
|                     fi ;; | ||||
|                 "unuse") | ||||
|                     if _sp_full_spec=$(command spack $_sp_flags module find $_sp_subcommand_args --module-type dotkit $_sp_spec); then | ||||
|                     if _sp_full_spec=$(command spack $_sp_flags module loads --input-only $_sp_subcommand_args --module-type dotkit $_sp_spec); then | ||||
|                         unuse $_sp_module_args $_sp_full_spec | ||||
|                     fi ;; | ||||
|                 "load") | ||||
|                     if _sp_full_spec=$(command spack $_sp_flags module find $_sp_subcommand_args --module-type tcl $_sp_spec); then | ||||
|                     if _sp_full_spec=$(command spack $_sp_flags module loads --input-only $_sp_subcommand_args --module-type tcl $_sp_spec); then | ||||
|                         module load $_sp_module_args $_sp_full_spec | ||||
|                     fi ;; | ||||
|                 "unload") | ||||
|                     if _sp_full_spec=$(command spack $_sp_flags module find $_sp_subcommand_args --module-type tcl $_sp_spec); then | ||||
|                     if _sp_full_spec=$(command spack $_sp_flags module loads --input-only $_sp_subcommand_args --module-type tcl $_sp_spec); then | ||||
|                         module unload $_sp_module_args $_sp_full_spec | ||||
|                     fi ;; | ||||
|             esac | ||||
|   | ||||
		Reference in New Issue
	
	Block a user
	 Todd Gamblin
					Todd Gamblin