* src/gnc-module/test/test-scm-init: convert to shell script that

invokes contents as guile script.


git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@5539 57a11ea4-9604-0410-9ed3-97b8803252fd
This commit is contained in:
Rob Browning 2001-10-10 23:26:54 +00:00
parent 7bf73fc4a2
commit a06c60eb7a

View File

@ -1,5 +1,13 @@
#! /bin/sh
echo " test-scm-init: testing Scheme-only module system init. ";
guile -c "(set! %load-path (cons \"..\" %load-path))
(set! %load-path (cons \"/usr/local/g-wrap/share/guile\" %load-path))
(use-modules (gnucash gnc-module)) (gnc:module-system-init)"
exec guile -s $0 "$@"
!#
(set! %load-path (cons ".." %load-path))
(set! %load-path (cons "/usr/local/g-wrap/share/guile" %load-path))
(use-modules (gnucash gnc-module))
(gnc:module-system-init)
;; LocalVariables:
;; mode: scheme
;; End: