mirror/guile
mirror/guile
1
Fork 0
mirror of https://git.savannah.gnu.org/git/guile.git synced 2025-06-09 13:30:26 +02:00
Code Activity

modify to handle move of readline.scm to

Browse source 
ice-9 subdir of guile-readline.
This commit is contained in:
Rob Browning 2004-06-16 17:13:27 +00:00
parent 5ae51dad0b
commit 4cacadc1d3
2 changed files with 18 additions and 9 deletions
Download patch file Download diff file Expand all files Collapse all files

14
pre-inst-guile-env.in
View file

@ -45,15 +45,19 @@ top_builddir="@top_builddir_absolute@"
exit 1
}
# handle GUILE_LOAD_PATH (no clobber)
if [ x"$GUILE_LOAD_PATH" = x ] ; then
GUILE_LOAD_PATH="${top_srcdir}"
if [ x"$GUILE_LOAD_PATH" = x ]
then
GUILE_LOAD_PATH="${top_srcdir}/guile-readline:${top_srcdir}"
else
for d in "${top_srcdir}" "${top_srcdir}/guile-readline"
do
# This hair prevents double inclusion.
# The ":" prevents prefix aliasing.
case x"$GUILE_LOAD_PATH" in x*${top_srcdir}:*) ;;
*) GUILE_LOAD_PATH="${top_srcdir}:$GUILE_LOAD_PATH" ;;
case x"$GUILE_LOAD_PATH" in
x*${d}:*) ;;
*) GUILE_LOAD_PATH="${d}:$GUILE_LOAD_PATH" ;;
esac
done
fi
export GUILE_LOAD_PATH

13
pre-inst-guile.in
View file

@ -58,14 +58,19 @@ top_builddir="@top_builddir_absolute@"
}
# handle GUILE_LOAD_PATH (no clobber)
if [ x"$GUILE_LOAD_PATH" = x ] ; then
GUILE_LOAD_PATH="${top_srcdir}"
if [ x"$GUILE_LOAD_PATH" = x ]
then
GUILE_LOAD_PATH="${top_srcdir}/guile-readline:${top_srcdir}"
else
for d in "${top_srcdir}" "${top_srcdir}/guile-readline"
do
# This hair prevents double inclusion.
# The ":" prevents prefix aliasing.
case x"$GUILE_LOAD_PATH" in x*${top_srcdir}:*) ;;
*) GUILE_LOAD_PATH="${top_srcdir}:$GUILE_LOAD_PATH" ;;
case x"$GUILE_LOAD_PATH" in
x*${d}:*) ;;
*) GUILE_LOAD_PATH="${d}:$GUILE_LOAD_PATH" ;;
esac
done
fi
export GUILE_LOAD_PATH