Files
gnucash/gnucash/gnome-utils/test/test-load-gnome-utils-module.scm
Geert Janssens 88706e5657 bindings/guile - remove gnc-module wrapper
Emit appropriate deprecation warnings in case code tries to invoke the removed functions.
Only for gnc:module-load a more elaborate compat function has
been written which should allow code using this obsolete function
to continue to function. The emitted deprecation warning will
guide the user to update his/her code for future compatibility.
2019-12-06 20:38:21 +01:00

22 lines
562 B
Scheme
Executable File

(define exit-code 0)
(setenv "GNC_UNINSTALLED" "1")
(display " testing gnome-utils module load ... ")
(use-modules (gnucash gnome-utils))
(cond
((defined? 'gnc:make-menu)
(display "Procedure gnc:make-menu found\n"))
(else
(display "Failed - procedure gnc:make-menu not found\n")
(set! exit-code -1)))
(cond
((defined? 'gnc:set-ui-status)
(display "Procedure gnc:set-ui-status found\n"))
(else
(display "Failed - procedure gnc:set-ui-status not found\n")
(set! exit-code -1)))
(exit exit-code)