diff --git a/scripts/Bootstrap/Pmodules/bash b/scripts/Bootstrap/Pmodules/bash index 7aeaee6..121d92f 100644 --- a/scripts/Bootstrap/Pmodules/bash +++ b/scripts/Bootstrap/Pmodules/bash @@ -134,22 +134,22 @@ save_env() { # declare -x LOADEDMODULES='' declare -x _LMFILES_='' -declare -x PSI_LOADEDFAMILIES='' +declare -x PMODULES_USED_GROUPS='' declare -x MODULEPATH='' -for f in ${PSI_DEFAULT_FAMILIES//:/ }; do +for f in ${PMODULES_DEFAULT_GROUPS//:/ }; do append_path MODULEPATH "${PSI_PREFIX}/${PSI_MODULES_ROOT}/$f" - append_path PSI_LOADEDFAMILIES "${f}" + append_path PMODULES_USED_GROUPS "${f}" done declare -x USED_RELEASES='' -for r in ${PSI_DEFAULT_RELEASES//:/ }; do +for r in ${PMODULES_DEFAULT_RELEASES//:/ }; do append_path USED_RELEASES "${r}" done -eval $(save_env USED_RELEASES PSI_DEFAULT_RELEASES PSI_DEFAULT_FAMILIES PSI_DEFINED_RELEASES) +eval $(save_env USED_RELEASES PMODULES_DEFAULT_RELEASES PMODULES_DEFAULT_GROUPS PMODULES_DEFINED_RELEASES) unset USED_RELEASES -unset PSI_DEFAULT_RELEASES -unset PSI_DEFAULT_FAMILIES -unset PSI_DEFINED_RELEASES +unset PMODULES_DEFAULT_RELEASES +unset PMODULES_DEFAULT_GROUPS +unset PMODULES_DEFINED_RELEASES replace_path PATH "${PMODULES_HOME%/*}/.*" replace_path MANPATH "${PMODULES_HOME%/*}/.*" diff --git a/scripts/Bootstrap/Pmodules/environment.bash.in b/scripts/Bootstrap/Pmodules/environment.bash.in index 11a5623..240d3c5 100644 --- a/scripts/Bootstrap/Pmodules/environment.bash.in +++ b/scripts/Bootstrap/Pmodules/environment.bash.in @@ -11,6 +11,6 @@ declare -x PSI_CONFIG_DIR=$(basename $(cd $(dirname "${BASH_SOURCE}") && pwd)) declare -x PSI_MODULES_ROOT='modulefiles' declare -x PSI_TEMPLATES_DIR='templates' -declare -x PSI_DEFAULT_FAMILIES='Tools Programming' -declare -x PSI_DEFAULT_RELEASES='stable' -declare -x PSI_DEFINED_RELEASES=':unstable:stable:deprecated:' +declare -x PMODULES_DEFAULT_GROUPS='Tools Programming' +declare -x PMODULES_DEFAULT_RELEASES='stable' +declare -x PMODULES_DEFINED_RELEASES=':unstable:stable:deprecated:' diff --git a/scripts/Bootstrap/Pmodules/libmodules.tcl b/scripts/Bootstrap/Pmodules/libmodules.tcl index f1a355e..284ad9a 100644 --- a/scripts/Bootstrap/Pmodules/libmodules.tcl +++ b/scripts/Bootstrap/Pmodules/libmodules.tcl @@ -46,9 +46,9 @@ proc set-family { family } { if { [module-info mode load] } { debug "mode is load" append-path MODULEPATH ${::MODULE_ROOT_PATH}/${family}/${Implementation} - append-path PSI_LOADEDFAMILIES ${family} + append-path PMODULES_USED_GROUPS ${family} debug "mode=load: new MODULEPATH=$env(MODULEPATH)" - debug "mode=load: new PSI_LOADEDFAMILIES=$env(PSI_LOADEDFAMILIES)" + debug "mode=load: new PMODULES_USED_GROUPS=$env(PMODULES_USED_GROUPS)" } elseif { [module-info mode remove] } { # remove orphan modules debug "remove orphan modules" @@ -64,14 +64,14 @@ proc set-family { family } { } } remove-path MODULEPATH ${::MODULE_ROOT_PATH}/${family}/${Implementation} - remove-path PSI_LOADEDFAMILIES ${family} + remove-path PMODULES_USED_GROUPS ${family} debug "mode=remove: $env(MODULEPATH)" - debug "mode=remove: $env(PSI_LOADEDFAMILIES)" + debug "mode=remove: $env(PMODULES_USED_GROUPS)" } if { [module-info mode switch2] } { debug "mode=switch2" append-path MODULEPATH ${::MODULE_ROOT_PATH}/${family}/[module-info name] - append-path PSI_LOADEDFAMILIES ${family} + append-path PMODULES_USED_GROUPS ${family} } } diff --git a/scripts/Bootstrap/Pmodules/modulecmd.in b/scripts/Bootstrap/Pmodules/modulecmd.in index 9cbaa6a..3c52daf 100755 --- a/scripts/Bootstrap/Pmodules/modulecmd.in +++ b/scripts/Bootstrap/Pmodules/modulecmd.in @@ -48,7 +48,7 @@ export_env() { done } -trap 'save_env FAMILIES HIERARCHY_DEPTHS USED_RELEASES PSI_DEFAULT_FAMILIES PSI_DEFINED_RELEASES PSI_DEFAULT_RELEASES' EXIT +trap 'save_env FAMILIES HIERARCHY_DEPTHS USED_RELEASES PMODULES_DEFAULT_GROUPS PMODULES_DEFINED_RELEASES PMODULES_DEFAULT_RELEASES' EXIT print_version() { echo " @@ -423,19 +423,19 @@ get_release() { return 0 } -: ${PSI_DEFINED_RELEASES:=':unstable:stable:deprecated:'} +: ${PMODULES_DEFINED_RELEASES:=':unstable:stable:deprecated:'} declare used_releases=":${USED_RELEASES}:" is_release() { - [[ ${PSI_DEFINED_RELEASES} =~ :$1: ]] + [[ ${PMODULES_DEFINED_RELEASES} =~ :$1: ]] } is_used_release() { [[ ${used_releases} =~ :$1: ]] } -declare used_families=":${PSI_LOADEDFAMILIES}:" +declare used_families=":${PMODULES_USED_GROUPS}:" is_used_family() { [[ ${used_families} =~ :$1: ]] @@ -656,7 +656,7 @@ subcommand_load() { # Args: # none output_load_hints() { - local -ra rels=( ${PSI_DEFINED_RELEASES//:/ } ) + local -ra rels=( ${PMODULES_DEFINED_RELEASES//:/ } ) for rel in "${rels[@]}"; do eval $( subcommand_use "${rel}" ) if is_available "${m}"; then @@ -804,9 +804,10 @@ subcommand_avail() { cols=$(tput cols) output_header() { - let i=($cols-${#dir})/2-2 + local -r caption=${dir/${modulepath_root}\/} + let i=($cols-${#caption})/2-2 printf -- "%0.s-" $(seq 1 $i) 1>&2 - printf -- " %s " "${dir}" 1>&2 + printf -- " %s " "${caption}" 1>&2 printf -- "%0.s-" $(seq 1 $i) 1>&2 printf -- "\n" 1>&2 } @@ -978,11 +979,11 @@ subcommand_use() { print_info() { local f local r - info "Used families:" + info "Used groups:" for f in ${used_families//:/ }; do info "\t${f}" done - info "\nFamilies you may use in addition:" + info "\nUnused groups:" for family in "${FAMILIES[@]}"; do local -i depth=${HIERARCHY_DEPTHS[$family]} if ! is_used_family "${family}" && (( depth == 0 )); then @@ -994,8 +995,8 @@ subcommand_use() { for r in ${used_releases//:/ }; do info "\t${r}" done - info "\nReleases you may use in addition:" - for r in ${PSI_DEFINED_RELEASES//:/ }; do + info "\nUnused releases:" + for r in ${PMODULES_DEFINED_RELEASES//:/ }; do if ! is_used_release $r; then info "\t${r}" fi @@ -1032,7 +1033,7 @@ subcommand_use() { if (( ${HIERARCHY_DEPTHS[$arg]} != 0 )); then die 3 "${CMD} ${0##_}: cannot add family ${arg} to module path" fi - append_path PSI_LOADEDFAMILIES "${arg}" + append_path PMODULES_USED_GROUPS "${arg}" dirs_to_add+=( ${modulepath_root}/${arg} ) elif [[ ${arg} =~ ^${modulepath_root} ]]; then die 3 "${CMD} ${0##_}: illegal directory: ${arg}" @@ -1046,7 +1047,7 @@ subcommand_use() { fi shift done - echo "export PSI_LOADEDFAMILIES=${PSI_LOADEDFAMILIES}" + echo "export PMODULES_USED_GROUPS=${PMODULES_USED_GROUPS}" [[ ${#dirs_to_add[@]} == 0 ]] && return for dir in "${dirs_to_add[@]}"; do @@ -1172,18 +1173,18 @@ subcommand_clear() { esac done LOADEDMODULES='' - PSI_LOADEDFAMILIES='' + PMODULES_USED_GROUPS='' MODULEPATH='' _LMFILES_='' - for f in ${PSI_DEFAULT_FAMILIES}; do + for f in ${PMODULES_DEFAULT_GROUPS}; do append_path MODULEPATH "${PSI_PREFIX}/${PSI_MODULES_ROOT}/$f" - append_path PSI_LOADEDFAMILIES "${f}" + append_path PMODULES_USED_GROUPS "${f}" done USED_RELEASES='' - for r in ${PSI_DEFAULT_RELEASES//:/ }; do + for r in ${PMODULES_DEFAULT_RELEASES//:/ }; do append_path USED_RELEASES "${r}" done - export_env LOADEDMODULES PSI_LOADEDFAMILIES MODULEPATH _LMFILES_ + export_env LOADEDMODULES PMODULES_USED_GROUPS MODULEPATH _LMFILES_ } # @@ -1298,7 +1299,7 @@ subcommand_search() { shift ;; -a | --all-releases ) - use_releases="${PSI_DEFINED_RELEASES}" + use_releases="${PMODULES_DEFINED_RELEASES}" ;; --src ) src_prefix=$2 diff --git a/scripts/Tools/emacs/build b/scripts/Tools/emacs/build index 13774aa..06f595c 100755 --- a/scripts/Tools/emacs/build +++ b/scripts/Tools/emacs/build @@ -28,6 +28,7 @@ function em.configure() { --prefix="${PREFIX}" \ ${configure_args} \ || exit 1 + install -m 0755 -d "${PREFIX}" } function em.post_install() {