From 6c61ec6ac89c6aea07291a81c6fdee8079031772 Mon Sep 17 00:00:00 2001 From: Nicola Pero Date: Sat, 5 Oct 2002 00:11:53 +0000 Subject: [PATCH] Moved setting the GUILE_LOAD_PATH from ld_lib_path.sh to GNUstep.sh git-svn-id: svn+ssh://svn.gna.org/svn/gnustep/tools/make/trunk@14651 72102866-910b-0410-8b05-ffd578937521 --- GNUstep.sh.in | 30 ++++++++++++++++++++++++++++++ ld_lib_path.sh | 28 ---------------------------- 2 files changed, 30 insertions(+), 28 deletions(-) diff --git a/GNUstep.sh.in b/GNUstep.sh.in index 094d92ed..001f711e 100755 --- a/GNUstep.sh.in +++ b/GNUstep.sh.in @@ -235,6 +235,36 @@ fi unset gnustep_class_path export CLASSPATH +# +# Setup path for loading guile modules too. +# +old_IFS="$IFS" +IFS=: +guile_paths= +for dir in $GNUSTEP_PATHLIST; do + + if [ -z "$guile_paths" ]; then + guile_paths="$dir/Libraries/Guile" + else + guile_paths="$guile_paths:$dir/Libraries/Guile" + fi + +done +IFS="$old_IFS" +unset old_IFS +unset dir + +if [ -z "$GUILE_LOAD_PATH" ]; then + GUILE_LOAD_PATH="$guile_paths" +else + if ( echo ${GUILE_LOAD_PATH}| grep -v "${guile_paths}" >/dev/null ); then + GUILE_LOAD_PATH="$guile_paths:$GUILE_LOAD_PATH" + fi +fi +export GUILE_LOAD_PATH +unset guile_paths + + # # Perform any user initialization # diff --git a/ld_lib_path.sh b/ld_lib_path.sh index bdf27ab5..f8f892b9 100755 --- a/ld_lib_path.sh +++ b/ld_lib_path.sh @@ -127,31 +127,3 @@ esac unset host_os unset lib_paths -# -# Setup path for loading guile modules too. -# -old_IFS="$IFS" -IFS=: -guile_paths= -for dir in $GNUSTEP_PATHLIST; do - - if [ -z "$guile_paths" ]; then - guile_paths="$dir/Libraries/Guile" - else - guile_paths="$guile_paths:$dir/Libraries/Guile" - fi - -done -IFS="$old_IFS" -unset old_IFS -unset dir - -if [ -z "$GUILE_LOAD_PATH" ]; then - GUILE_LOAD_PATH="$guile_paths" -else - if ( echo ${GUILE_LOAD_PATH}| grep -v "${guile_paths}" >/dev/null ); then - GUILE_LOAD_PATH="$guile_paths:$GUILE_LOAD_PATH" - fi -fi -export GUILE_LOAD_PATH -unset guile_paths