2002-01-11 12:34:21 +00:00
|
|
|
#! /bin/echo This file must be sourced inside (ba)sh using: .
|
1997-09-22 22:49:02 +00:00
|
|
|
#
|
2002-05-02 15:07:49 +00:00
|
|
|
# @configure_input@
|
1997-09-22 22:49:02 +00:00
|
|
|
#
|
|
|
|
# Shell initialization for the GNUstep environment.
|
|
|
|
#
|
2005-10-13 02:42:10 +00:00
|
|
|
# Copyright (C) 1997-2005 Free Software Foundation, Inc.
|
1997-09-22 22:49:02 +00:00
|
|
|
#
|
|
|
|
# Author: Scott Christley <scottc@net-community.com>
|
2002-02-24 15:45:14 +00:00
|
|
|
# Author: Adam Fedor <fedor@gnu.org>
|
|
|
|
# Author: Richard Frith-Macdonald <rfm@gnu.org>
|
|
|
|
# Author: Nicola Pero <n.pero@mi.flashnet.it>
|
1997-09-22 22:49:02 +00:00
|
|
|
#
|
|
|
|
# This file is part of the GNUstep Makefile Package.
|
|
|
|
#
|
|
|
|
# This library is free software; you can redistribute it and/or
|
|
|
|
# modify it under the terms of the GNU General Public License
|
|
|
|
# as published by the Free Software Foundation; either version 2
|
|
|
|
# of the License, or (at your option) any later version.
|
|
|
|
#
|
|
|
|
# You should have received a copy of the GNU General Public
|
|
|
|
# License along with this library; see the file COPYING.LIB.
|
|
|
|
# If not, write to the Free Software Foundation,
|
2005-05-22 03:20:14 +00:00
|
|
|
# 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
|
1997-09-22 22:49:02 +00:00
|
|
|
#
|
|
|
|
|
2002-04-04 14:27:57 +00:00
|
|
|
# Warning - this shell script is delicate, because it is sourced by
|
|
|
|
# using . rather than simply executed. It is sourced because that is
|
|
|
|
# the only way to change the shell variables in the calling
|
|
|
|
# environment.
|
|
|
|
#
|
|
|
|
# Sourcing makes the shell script more delicate for the following reasons:
|
|
|
|
#
|
|
|
|
# * temporary variables are automatically set in the calling
|
|
|
|
# environment! WORKAROUND: we need to unset all them after using
|
|
|
|
# them to avoid polluting the calling environment;
|
|
|
|
#
|
|
|
|
# * not only the exit value of the script, but the exit value of each
|
|
|
|
# command we execute, might be interpreted by the calling
|
|
|
|
# environment. Typically, the calling environment might be using the
|
|
|
|
# shell errexit option ('set -e') in bash parlance, which causes the
|
|
|
|
# shell to exit if any command returns an error value. If this were
|
|
|
|
# a normal script, this option would mean that the shell would exit
|
|
|
|
# if the return value of the whole script were an error value; but
|
|
|
|
# because we are sourced, it is as all the commands in this script
|
|
|
|
# were executed directly in the calling environment, so *all* values
|
|
|
|
# returned by *all* commands must be non-error. [this all typically
|
|
|
|
# happens in rpm builds, where scripts are run with the errexit
|
|
|
|
# option so that errors in scripts abort the build, and now if a
|
|
|
|
# script sources GNUstep.sh, then we are exactly in this situation -
|
|
|
|
# if any command inside GNUstep.sh returns an error value (even if
|
|
|
|
# GNUstep.sh as a whole would be happy and return succes), the whole
|
|
|
|
# rpm build process aborts!]. WORKAROUND: we must make sure all
|
|
|
|
# commands return success - last resorts hacks like 'command || :'
|
|
|
|
# which always returns success whatever command returns.
|
|
|
|
#
|
|
|
|
|
2004-06-15 10:39:10 +00:00
|
|
|
# If we're running in zsh (auch!) make sure we're using -y
|
|
|
|
# (SH_WORD_SPLIT) else our path manipulations won't work.
|
|
|
|
if [ -n "$ZSH_VERSION" ]; then
|
|
|
|
|
|
|
|
# If -y is not already set, set it and remember that we
|
|
|
|
# need to set it back to what it was at the end.
|
|
|
|
if ( setopt | grep shwordsplit > /dev/null ); then :; else
|
|
|
|
set -y
|
|
|
|
GS_ZSH_NEED_TO_RESTORE_SET=yes
|
|
|
|
fi
|
|
|
|
|
|
|
|
fi
|
|
|
|
|
1997-09-22 22:49:02 +00:00
|
|
|
#
|
|
|
|
# Set the GNUstep system root and local root
|
|
|
|
#
|
2005-10-12 16:46:34 +00:00
|
|
|
|
|
|
|
#
|
2005-10-13 02:42:10 +00:00
|
|
|
# Read our configuration files
|
2005-10-12 16:46:34 +00:00
|
|
|
#
|
2005-10-13 02:42:10 +00:00
|
|
|
|
|
|
|
# Determine the location of the system configuration file
|
|
|
|
if [ -z "$GNUSTEP_CONFIG_FILE" ]; then
|
2005-11-28 20:53:37 +00:00
|
|
|
GNUSTEP_CONFIG_FILE=@GNUSTEP_SHELL_CONFIG_FILE@
|
2005-10-13 02:42:10 +00:00
|
|
|
fi
|
|
|
|
|
|
|
|
# Determine the location of the user configuration file
|
|
|
|
if [ -z "$GNUSTEP_USER_CONFIG_FILE" ]; then
|
2005-11-28 20:53:37 +00:00
|
|
|
GNUSTEP_USER_CONFIG_FILE=@GNUSTEP_SHELL_USER_CONFIG_FILE@
|
2005-10-13 02:42:10 +00:00
|
|
|
fi
|
|
|
|
|
|
|
|
# Read the system configuration file
|
|
|
|
if [ -f "$GNUSTEP_CONFIG_FILE" ]; then
|
|
|
|
. "$GNUSTEP_CONFIG_FILE"
|
|
|
|
fi
|
|
|
|
|
|
|
|
# FIXME: determining GNUSTEP_HOME
|
|
|
|
GNUSTEP_HOME=~
|
|
|
|
|
|
|
|
# Read the user configuration file ... unless it is disabled (ie, set
|
|
|
|
# to an empty string)
|
|
|
|
if [ -n "$GNUSTEP_USER_CONFIG_FILE" ]; then
|
|
|
|
case "$GNUSTEP_USER_CONFIG_FILE" in
|
|
|
|
/*) # An absolute path
|
|
|
|
if [ -f "$GNUSTEP_USER_CONFIG_FILE" ]; then
|
|
|
|
. "$GNUSTEP_USER_CONFIG_FILE"
|
|
|
|
fi;;
|
|
|
|
*) # Something else
|
|
|
|
if [ -f "$GNUSTEP_HOME/$GNUSTEP_USER_CONFIG_FILE" ]; then
|
|
|
|
. "$GNUSTEP_HOME/$GNUSTEP_USER_CONFIG_FILE"
|
|
|
|
fi;;
|
|
|
|
esac
|
|
|
|
fi
|
|
|
|
|
|
|
|
# Now, set any essential variable (that is not already set) to the
|
|
|
|
# built-in values.
|
|
|
|
if [ -z "$GNUSTEP_SYSTEM_ROOT" ]; then
|
2005-11-28 20:53:37 +00:00
|
|
|
GNUSTEP_SYSTEM_ROOT=@GNUSTEP_SHELL_SYSTEM_ROOT@
|
2005-10-13 02:42:10 +00:00
|
|
|
fi
|
|
|
|
|
|
|
|
if [ -z "$GNUSTEP_LOCAL_ROOT" ]; then
|
2005-11-28 20:53:37 +00:00
|
|
|
GNUSTEP_LOCAL_ROOT=@GNUSTEP_SHELL_LOCAL_ROOT@
|
2005-10-13 02:42:10 +00:00
|
|
|
fi
|
|
|
|
|
|
|
|
if [ -z "$GNUSTEP_NETWORK_ROOT" ]; then
|
2005-11-28 20:53:37 +00:00
|
|
|
GNUSTEP_NETWORK_ROOT=@GNUSTEP_SHELL_NETWORK_ROOT@
|
2005-10-13 02:42:10 +00:00
|
|
|
fi
|
|
|
|
|
|
|
|
export GNUSTEP_SYSTEM_ROOT GNUSTEP_LOCAL_ROOT GNUSTEP_NETWORK_ROOT
|
|
|
|
|
2000-12-05 16:11:55 +00:00
|
|
|
GNUSTEP_FLATTENED=@GNUSTEP_FLATTENED@
|
1999-04-23 02:54:45 +00:00
|
|
|
if [ -z "$LIBRARY_COMBO" ]; then
|
|
|
|
LIBRARY_COMBO=@ac_cv_library_combo@
|
|
|
|
fi
|
2005-10-13 02:42:10 +00:00
|
|
|
export GNUSTEP_FLATTENED LIBRARY_COMBO
|
1997-10-28 02:34:11 +00:00
|
|
|
|
2005-10-13 02:42:10 +00:00
|
|
|
if [ -z "$GNUSTEP_MAKEFILES" ]; then
|
|
|
|
GNUSTEP_MAKEFILES=$GNUSTEP_SYSTEM_ROOT/Library/Makefiles
|
|
|
|
fi
|
2001-10-17 03:22:41 +00:00
|
|
|
export GNUSTEP_MAKEFILES
|
|
|
|
|
2005-10-13 02:42:10 +00:00
|
|
|
if [ -z "$GNUSTEP_USER_DIR" ]; then
|
2005-11-28 20:53:37 +00:00
|
|
|
GNUSTEP_USER_DIR=@GNUSTEP_SHELL_USER_DIR@
|
2005-10-13 02:42:10 +00:00
|
|
|
fi
|
|
|
|
|
|
|
|
#
|
|
|
|
# Set GNUSTEP_USER_ROOT which is the variable used in practice
|
|
|
|
#
|
|
|
|
case "$GNUSTEP_USER_DIR" in
|
|
|
|
/*) # An absolute path
|
|
|
|
GNUSTEP_USER_ROOT="$GNUSTEP_USER_DIR";;
|
|
|
|
*) # Something else
|
|
|
|
GNUSTEP_USER_ROOT="$GNUSTEP_HOME/$GNUSTEP_USER_DIR";;
|
|
|
|
esac
|
|
|
|
|
2005-10-14 10:25:48 +00:00
|
|
|
export GNUSTEP_USER_ROOT
|
|
|
|
|
2005-10-13 02:42:10 +00:00
|
|
|
# No longer needed
|
|
|
|
unset GNUSTEP_HOME
|
2001-10-17 03:22:41 +00:00
|
|
|
|
2003-01-26 04:01:10 +00:00
|
|
|
# If multi-platform support is disabled, just use the hardcoded cpu,
|
|
|
|
# vendor and os determined when gnustep-make was configured. The
|
|
|
|
# reason using the hardcoded ones might be better is that config.guess
|
|
|
|
# and similar scripts might even require compiling test files to
|
|
|
|
# determine the platform - but then you can't source GNUstep.sh
|
|
|
|
# without having gcc, binutils, libc6-dev installed. Which can be a
|
|
|
|
# problem for end-users who are not developers and have no development
|
|
|
|
# tools installed. To prevent this problem, unless we were configured
|
|
|
|
# to determine the platform at run time, by default we use the
|
|
|
|
# hardcoded values of GNUSTEP_HOST*.
|
|
|
|
if [ -z "@GNUSTEP_MULTI_PLATFORM@" ]; then
|
|
|
|
GNUSTEP_HOST=@target@
|
|
|
|
GNUSTEP_HOST_CPU=@clean_target_cpu@
|
|
|
|
GNUSTEP_HOST_VENDOR=@clean_target_vendor@
|
|
|
|
GNUSTEP_HOST_OS=@clean_target_os@
|
|
|
|
fi
|
|
|
|
|
1997-09-22 22:49:02 +00:00
|
|
|
#
|
|
|
|
# Determine the host information
|
|
|
|
#
|
1999-09-09 02:56:20 +00:00
|
|
|
if [ -z "$GNUSTEP_HOST" ]; then
|
2002-01-11 12:34:21 +00:00
|
|
|
# Not all shells (e.g. /bin/sh on FreeBSD < 4.0 or ash) have pushd/popd
|
2000-03-20 18:46:29 +00:00
|
|
|
tmpdir=`pwd`; cd /tmp
|
2000-02-19 00:40:47 +00:00
|
|
|
GNUSTEP_HOST=`$GNUSTEP_MAKEFILES/config.guess`
|
|
|
|
GNUSTEP_HOST=`$GNUSTEP_MAKEFILES/config.sub $GNUSTEP_HOST`
|
2002-04-04 14:19:13 +00:00
|
|
|
cd "$tmpdir"
|
2002-01-11 12:34:21 +00:00
|
|
|
unset tmpdir
|
1999-09-09 02:56:20 +00:00
|
|
|
fi
|
1997-09-22 22:49:02 +00:00
|
|
|
|
2001-03-15 01:02:27 +00:00
|
|
|
if [ -z "$GNUSTEP_HOST_CPU" ]; then
|
|
|
|
GNUSTEP_HOST_CPU=`$GNUSTEP_MAKEFILES/cpu.sh $GNUSTEP_HOST`
|
|
|
|
GNUSTEP_HOST_CPU=`$GNUSTEP_MAKEFILES/clean_cpu.sh $GNUSTEP_HOST_CPU`
|
|
|
|
fi
|
|
|
|
|
|
|
|
if [ -z "$GNUSTEP_HOST_VENDOR" ]; then
|
|
|
|
GNUSTEP_HOST_VENDOR=`$GNUSTEP_MAKEFILES/vendor.sh $GNUSTEP_HOST`
|
|
|
|
GNUSTEP_HOST_VENDOR=`$GNUSTEP_MAKEFILES/clean_vendor.sh $GNUSTEP_HOST_VENDOR`
|
|
|
|
fi
|
|
|
|
|
|
|
|
if [ -z "$GNUSTEP_HOST_OS" ]; then
|
|
|
|
GNUSTEP_HOST_OS=`$GNUSTEP_MAKEFILES/os.sh $GNUSTEP_HOST`
|
|
|
|
GNUSTEP_HOST_OS=`$GNUSTEP_MAKEFILES/clean_os.sh $GNUSTEP_HOST_OS`
|
|
|
|
fi
|
1997-09-22 22:49:02 +00:00
|
|
|
|
|
|
|
export GNUSTEP_HOST GNUSTEP_HOST_CPU GNUSTEP_HOST_VENDOR GNUSTEP_HOST_OS
|
|
|
|
|
|
|
|
#
|
2002-06-19 03:46:08 +00:00
|
|
|
# GNUSTEP_PATHLIST is like an abstract path-like shell
|
2002-04-04 15:18:20 +00:00
|
|
|
# variable, which can be used to search the gnustep directories - and
|
|
|
|
# in these scripts, it is also used to set up other shell variables
|
1997-09-22 22:49:02 +00:00
|
|
|
#
|
2002-06-19 03:46:08 +00:00
|
|
|
if [ -z "$GNUSTEP_PATHLIST" ]; then
|
2002-01-22 00:50:41 +00:00
|
|
|
|
2002-04-04 14:27:57 +00:00
|
|
|
# If we need to convert win32 paths, this is the time!
|
|
|
|
if [ -z "`echo $GNUSTEP_SYSTEM_ROOT | sed 's|^[a-zA-Z]:/.*$||'`" ]; then
|
2002-03-11 08:06:16 +00:00
|
|
|
G_U_R=`$GNUSTEP_MAKEFILES/fixpath.sh -u "$GNUSTEP_USER_ROOT"`
|
|
|
|
G_L_R=`$GNUSTEP_MAKEFILES/fixpath.sh -u "$GNUSTEP_LOCAL_ROOT"`
|
|
|
|
G_N_R=`$GNUSTEP_MAKEFILES/fixpath.sh -u "$GNUSTEP_NETWORK_ROOT"`
|
|
|
|
G_S_R=`$GNUSTEP_MAKEFILES/fixpath.sh -u "$GNUSTEP_SYSTEM_ROOT"`
|
2001-10-17 03:22:41 +00:00
|
|
|
else
|
2002-04-04 15:18:20 +00:00
|
|
|
G_U_R="$GNUSTEP_USER_ROOT"
|
|
|
|
G_L_R="$GNUSTEP_LOCAL_ROOT"
|
|
|
|
G_N_R="$GNUSTEP_NETWORK_ROOT"
|
|
|
|
G_S_R="$GNUSTEP_SYSTEM_ROOT"
|
2001-10-17 03:22:41 +00:00
|
|
|
fi
|
2002-04-04 14:27:57 +00:00
|
|
|
|
2002-04-04 15:18:20 +00:00
|
|
|
# Now we basically want to build
|
2002-06-19 03:46:08 +00:00
|
|
|
# GNUSTEP_PATHLIST="$G_U_R:$G_L_R:$G_N_R:$G_S_R"
|
2002-04-04 15:18:20 +00:00
|
|
|
# but we want to remove duplicates.
|
|
|
|
|
|
|
|
# Start with $G_U_R:$G_L_R - or $G_U_R if they are the same
|
|
|
|
if [ "$G_L_R" != "$G_U_R" ]; then
|
2002-06-19 03:46:08 +00:00
|
|
|
GNUSTEP_PATHLIST="$G_U_R:$G_L_R"
|
2002-04-04 15:18:20 +00:00
|
|
|
else
|
2002-06-19 03:46:08 +00:00
|
|
|
GNUSTEP_PATHLIST="$G_U_R"
|
2002-04-04 15:18:20 +00:00
|
|
|
fi
|
|
|
|
|
|
|
|
# Now append $G_N_R but only if different from what already there
|
|
|
|
if [ "$G_N_R" != "$G_U_R" ]; then
|
|
|
|
if [ "$G_N_R" != "$G_L_R" ]; then
|
2002-06-19 03:46:08 +00:00
|
|
|
GNUSTEP_PATHLIST="$GNUSTEP_PATHLIST:$G_N_R"
|
2002-04-04 15:18:20 +00:00
|
|
|
fi
|
|
|
|
fi
|
|
|
|
|
|
|
|
# Now append $G_S_R but only if different from what already there
|
|
|
|
if [ "$G_S_R" != "$G_U_R" ]; then
|
|
|
|
if [ "$G_S_R" != "$G_L_R" ]; then
|
|
|
|
if [ "$G_S_R" != "$G_N_R" ]; then
|
2002-06-19 03:46:08 +00:00
|
|
|
GNUSTEP_PATHLIST="$GNUSTEP_PATHLIST:$G_S_R"
|
2002-04-04 15:18:20 +00:00
|
|
|
fi
|
|
|
|
fi
|
|
|
|
fi
|
|
|
|
|
|
|
|
unset G_U_R
|
|
|
|
unset G_L_R
|
|
|
|
unset G_N_R
|
|
|
|
unset G_S_R
|
|
|
|
|
2002-06-19 03:46:08 +00:00
|
|
|
export GNUSTEP_PATHLIST
|
2000-06-13 15:14:23 +00:00
|
|
|
fi
|
2001-10-17 03:22:41 +00:00
|
|
|
|
2002-04-04 15:18:20 +00:00
|
|
|
#
|
|
|
|
# Add path to Tools to PATH
|
|
|
|
#
|
1999-07-26 20:35:09 +00:00
|
|
|
tmp_IFS="$IFS"
|
1999-06-02 03:16:12 +00:00
|
|
|
IFS=:
|
1999-06-04 04:26:07 +00:00
|
|
|
temp_path=
|
2002-06-19 03:46:08 +00:00
|
|
|
for dir in $GNUSTEP_PATHLIST; do
|
2002-04-04 15:52:35 +00:00
|
|
|
|
|
|
|
# Prepare the path_fragment
|
2000-12-05 16:11:55 +00:00
|
|
|
if [ -z "$GNUSTEP_FLATTENED" ]; then
|
2002-04-04 15:52:35 +00:00
|
|
|
path_fragment="$dir/Tools:$dir/Tools/${GNUSTEP_HOST_CPU}/${GNUSTEP_HOST_OS}/${LIBRARY_COMBO}:$dir/Tools/${GNUSTEP_HOST_CPU}/${GNUSTEP_HOST_OS}"
|
|
|
|
else
|
|
|
|
path_fragment="$dir/Tools"
|
|
|
|
fi
|
|
|
|
|
|
|
|
# Add it to temp_path
|
|
|
|
if [ -z "$temp_path" ]; then
|
|
|
|
temp_path="$path_fragment"
|
|
|
|
else
|
|
|
|
temp_path="$temp_path:$path_fragment"
|
2000-12-05 16:11:55 +00:00
|
|
|
fi
|
2002-04-04 15:52:35 +00:00
|
|
|
|
|
|
|
unset path_fragment
|
|
|
|
|
1999-06-02 03:16:12 +00:00
|
|
|
done
|
1999-07-26 20:35:09 +00:00
|
|
|
IFS="$tmp_IFS"
|
2002-01-11 12:34:21 +00:00
|
|
|
unset tmp_IFS
|
|
|
|
unset dir
|
2001-03-01 06:24:32 +00:00
|
|
|
if [ -z "$PATH" ]; then
|
|
|
|
PATH="$temp_path"
|
|
|
|
else
|
|
|
|
if ( echo ${PATH}| grep -v "${temp_path}" >/dev/null ); then
|
2002-04-04 15:52:35 +00:00
|
|
|
PATH="${temp_path}:${PATH}"
|
2001-03-01 06:24:32 +00:00
|
|
|
fi
|
|
|
|
fi
|
2002-01-11 12:34:21 +00:00
|
|
|
unset temp_path
|
2000-06-13 15:14:23 +00:00
|
|
|
export PATH
|
1999-07-15 15:31:42 +00:00
|
|
|
|
1998-09-03 14:35:49 +00:00
|
|
|
. $GNUSTEP_MAKEFILES/ld_lib_path.sh
|
1997-09-22 22:49:02 +00:00
|
|
|
|
2002-04-04 14:27:57 +00:00
|
|
|
tmp_IFS="$IFS"
|
|
|
|
IFS=:
|
|
|
|
gnustep_class_path=
|
2002-06-19 03:46:08 +00:00
|
|
|
for dir in $GNUSTEP_PATHLIST; do
|
2002-04-04 15:52:35 +00:00
|
|
|
|
|
|
|
if [ -z "$gnustep_class_path" ]; then
|
2003-04-28 02:29:49 +00:00
|
|
|
gnustep_class_path="$dir/Library/Libraries/Java"
|
2002-04-04 15:52:35 +00:00
|
|
|
else
|
2003-04-28 02:29:49 +00:00
|
|
|
gnustep_class_path="$gnustep_class_path:$dir/Library/Libraries/Java"
|
2002-04-04 15:52:35 +00:00
|
|
|
fi
|
|
|
|
|
2002-04-04 14:27:57 +00:00
|
|
|
done
|
|
|
|
IFS="$tmp_IFS"
|
|
|
|
unset tmp_IFS
|
2002-04-08 01:56:17 +00:00
|
|
|
unset dir
|
2001-05-05 10:44:11 +00:00
|
|
|
|
|
|
|
if [ -z "$CLASSPATH" ]; then
|
|
|
|
CLASSPATH="$gnustep_class_path"
|
|
|
|
else
|
|
|
|
if ( echo ${CLASSPATH}| grep -v "${gnustep_class_path}" >/dev/null ); then
|
|
|
|
CLASSPATH="$CLASSPATH:$gnustep_class_path"
|
|
|
|
fi
|
|
|
|
fi
|
|
|
|
|
2002-01-11 12:34:21 +00:00
|
|
|
unset gnustep_class_path
|
2001-05-05 10:44:11 +00:00
|
|
|
export CLASSPATH
|
|
|
|
|
2002-10-05 00:11:53 +00:00
|
|
|
#
|
|
|
|
# Setup path for loading guile modules too.
|
|
|
|
#
|
|
|
|
old_IFS="$IFS"
|
|
|
|
IFS=:
|
|
|
|
guile_paths=
|
|
|
|
for dir in $GNUSTEP_PATHLIST; do
|
|
|
|
|
|
|
|
if [ -z "$guile_paths" ]; then
|
2003-04-28 02:29:49 +00:00
|
|
|
guile_paths="$dir/Library/Libraries/Guile"
|
2002-10-05 00:11:53 +00:00
|
|
|
else
|
2003-04-28 02:29:49 +00:00
|
|
|
guile_paths="$guile_paths:$dir/Library/Libraries/Guile"
|
2002-10-05 00:11:53 +00:00
|
|
|
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
|
|
|
|
|
|
|
|
|
1997-09-22 22:49:02 +00:00
|
|
|
#
|
|
|
|
# Perform any user initialization
|
|
|
|
#
|
2002-04-04 14:15:31 +00:00
|
|
|
if [ -f "$GNUSTEP_USER_ROOT/GNUstep.sh" ]; then
|
2002-01-25 11:46:23 +00:00
|
|
|
. "$GNUSTEP_USER_ROOT/GNUstep.sh"
|
1997-09-22 22:49:02 +00:00
|
|
|
fi
|
1998-09-03 14:35:49 +00:00
|
|
|
|
2004-06-15 10:39:10 +00:00
|
|
|
if [ -n "$GS_ZSH_NEED_TO_RESTORE_SET" ]; then
|
|
|
|
set +y
|
2004-08-24 14:39:49 +00:00
|
|
|
fi
|
2005-05-22 03:20:14 +00:00
|
|
|
# EOF
|