mirror of
https://github.com/Gnucash/gnucash.git
synced 2025-02-25 18:55:30 -06:00
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:
parent
1c34e80fda
commit
8328f0c8fe
@ -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}:' \
|
||||
|
@ -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
|
||||
|
Loading…
Reference in New Issue
Block a user