Allow new guile to be specified through GNC_GUILE env var.

git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@5717 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
Dave Peticolas 2001-10-24 08:39:08 +00:00
parent 1c34e80fda
commit 8328f0c8fe
2 changed files with 13 additions and 4 deletions

View File

@ -103,6 +103,7 @@ bin_SCRIPTS = gnucash-run-script gnucash-make-guids
gnucash-run-script: gnucash-run-script.in
rm -f $@.tmp
sed < $@.in > $@.tmp \
-e 's:@-GUILE-@:${GUILE}:' \
-e 's:@-GNC_GUILE_MODULE_DIR-@:${GNC_SHAREDIR}/guile-modules:' \
-e 's:@-GNC_LIB_INSTALLDIR-@:${libdir}:' \
-e 's:@-GNC_PKGLIB_INSTALLDIR-@:${pkglibdir}:' \

View File

@ -1,11 +1,17 @@
#!/bin/sh
export GNC_MODULE_PATH="@-GNC_LIB_INSTALLDIR-@:@-GNC_PKGLIB_INSTALLDIR-@"
export GUILE_LOAD_PATH="@-G_WRAP_MODULE_DIR-@:@-GNC_GUILE_MODULE_DIR-@:@-GNC_SCM_INSTALL_DIR-@"
export GNC_MODULE_PATH="${GNC_MODULE_PATH}:@-GNC_LIB_INSTALLDIR-@:@-GNC_PKGLIB_INSTALLDIR-@"
export GUILE_LOAD_PATH="${GUILE_LOAD_PATH}:@-G_WRAP_MODULE_DIR-@:@-GNC_GUILE_MODULE_DIR-@:@-GNC_SCM_INSTALL_DIR-@"
export LTDL_LIBRARY_PATH="${LTDL_LIBRARY_PATH}:${GNC_MODULE_PATH}"
export LD_LIBRARY_PATH="${LD_LIBRARY_PATH}:${GNC_MODULE_PATH}"
exec guile -s "$0" "$@"
GUILE="@-GUILE-@"
if test "${GNC_GUILE}"x != x; then
GUILE="${GNC_GUILE}"
fi
export GUILE
exec ${GUILE} -s "$0" "$@"
!#
(if (null? (cdr (program-arguments)))
@ -13,7 +19,9 @@ exec guile -s "$0" "$@"
(car (program-arguments))
" script [arg ...]")))
(apply execlp "guile" "guile" "--debug" "-s" (cdr (program-arguments)))
(define guile (getenv "GUILE"))
(apply execlp guile guile "--debug" "-s" (cdr (program-arguments)))
;; Local Variables:
;; mode: scheme