diff --git a/bindings/guile/engine.scm b/bindings/guile/engine.scm index da91cf47cf..6b74ed3b59 100644 --- a/bindings/guile/engine.scm +++ b/bindings/guile/engine.scm @@ -81,20 +81,24 @@ ;; A few account related utility functions which used to be in engine-utilities.scm (define (gnc:account-map-descendants thunk account) + (issue-deprecation-warning "gnc:account-map-descendants is deprecated.") (let ((descendants (or (gnc-account-get-descendants-sorted account) '()))) (map thunk descendants))) (define (gnc:account-map-children thunk account) + (issue-deprecation-warning "gnc:account-map-children is deprecated.") (let ((children (or (gnc-account-get-children-sorted account) '()))) (map thunk children))) ;; account related functions ;; helper for sorting of account list (define (account-full-name