[hooks.scm] deprecate hooks.scm

this module has a single function which is used only once. inline it.
This commit is contained in:
Christopher Lam 2019-02-10 18:53:53 +08:00
parent f64586b873
commit 4a2b5e9641
3 changed files with 3 additions and 2 deletions

View File

@ -126,7 +126,7 @@
(gnc-add-scm-extension business-menu)
;; run report-hook danglers
(gnc:hook-run-danglers HOOK-REPORT)
(gnc-hook-run HOOK-REPORT '())
;; push reports (new items added on top of menu)
(gnc:add-report-template-menu-items)

View File

@ -265,7 +265,7 @@
(export gnc:get-three-months-ahead)
;; hooks
(export gnc:hook-run-danglers) ;; from hooks.scm
(export gnc:hook-run-danglers) ;; from hooks.scm- deprecated
(re-export gnc-hook-add-scm-dangler)
(re-export HOOK-REPORT)

View File

@ -16,6 +16,7 @@
;; Boston, MA 02110-1301, USA gnu@gnu.org
(define (gnc:hook-run-danglers hook . args)
(issue-deprecation-warning "gnc:hook-run-danglers is now deprecated.")
(if (null? args)
(set! args '())
(set! args (car args)))