diff --git a/bindings/guile/gnc-module.scm b/bindings/guile/gnc-module.scm index 129974360c..883a094dda 100644 --- a/bindings/guile/gnc-module.scm +++ b/bindings/guile/gnc-module.scm @@ -64,7 +64,7 @@ this module in your code or not.") been deprecated. Use '(use-modules (" mod-name-str "))' instead.") (module-use! (current-module) (resolve-interface scm-mod-name))) - ((or "gnucash/gnome-utils" "gnucash/html" "gnucash/report/report-system") + ((or "gnucash/gnome-utils" "gnucash/report/report-system") (when (string=? gnc-mod-name "gnucash/report/report-system") (set! mod-name-str "gnucash report")) (set! scm-mod-name '(gnucash report)) @@ -76,6 +76,12 @@ or not you use functions from this module in your code or not.") (use-modules (gnucash engine) (gnucash app-utils)) (module-use! (current-module) (resolve-interface scm-mod-name))) + ("gnucash/html" + (deprecate "* WARNING * '(gnc:module-load \"gnucash/html\" 0)' has \ +been deprecated. Use '(use-modules (gnucash html))' instead.") + (use-modules (gnucash html)) + (module-use! (current-module) (resolve-interface scm-mod-name))) + (_ (deprecate "* WARNING * '(gnc:module-load \"" gnc-mod-name "\" 0)' \ has been deprecated. Use '(use-modules (" mod-name-str "))' instead. \ Additional guile modules may have to be loaded depending on your specific code.")