IntenseFinance/gnucash
3
0
Fork 0
mirror of https://github.com/Gnucash/gnucash.git synced 2025-02-25 18:55:30 -06:00
Code Issues Packages Projects Releases Wiki Activity

* src/bin/gnucash-run-script.in: removed.

Browse Source 
git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@6110 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
Rob Browning 2001-11-28 22:51:29 +00:00
parent 89ebeee6fa
commit cc5547711f
1 changed files with 0 additions and 32 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

32
src/bin/gnucash-run-script.in
View File

@ -1,32 +0,0 @@
#!/bin/sh
export GNC_MODULE_PATH="${GNC_MODULE_PATH}:@-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}:@-GNC_LIB_INSTALLDIR-@"
export LD_LIBRARY_PATH="${LD_LIBRARY_PATH}:${GNC_MODULE_PATH}:@-GNC_LIB_INSTALLDIR-@:@-GNC_MODULE_DIR-@"
GUILE="@-GUILE-@"
if test "${GNC_GUILE}"x != x; then
GUILE="${GNC_GUILE}"
fi
export GUILE
if test "${GNC_SCRIPT}"x != x; then
exec ${GNC_SCRIPT} "$@"
fi
exec ${GUILE} -s "$0" "$@"
!#
(if (null? (cdr (program-arguments)))
(error (string-append "Usage: "
(car (program-arguments))
" script [arg ...]")))
(define guile (getenv "GUILE"))
(apply execlp guile guile "-s" (cdr (program-arguments)))
;; Local Variables:
;; mode: scheme
;; End: