From c76ea30f3a07f164d0cf9ce8c9561bf7386176f3 Mon Sep 17 00:00:00 2001 From: Christopher Lam Date: Sun, 9 Sep 2018 18:41:13 +0800 Subject: [PATCH] [obsolete api] improve deprecation warnings --- gnucash/report/report-system/commodity-utilities.scm | 3 ++- gnucash/report/report-system/report-utilities.scm | 3 ++- 2 files changed, 4 insertions(+), 2 deletions(-) diff --git a/gnucash/report/report-system/commodity-utilities.scm b/gnucash/report/report-system/commodity-utilities.scm index 3946b98a2b..238fb79a6d 100644 --- a/gnucash/report/report-system/commodity-utilities.scm +++ b/gnucash/report/report-system/commodity-utilities.scm @@ -94,7 +94,8 @@ ;; Helper for warnings below. (define (gnc-commodity-numeric->string commodity numeric) - (issue-deprecation-warning "gnc-commodity-numeric->string deprecated.") + (issue-deprecation-warning "gnc-commodity-numeric->string deprecated. \ +construct with gnc:make-gnc-monetary and gnc:monetary->string instead.") (gnc:monetary->string (gnc:make-gnc-monetary commodity numeric))) diff --git a/gnucash/report/report-system/report-utilities.scm b/gnucash/report/report-system/report-utilities.scm index e0baf4d19e..58aeaf6b05 100644 --- a/gnucash/report/report-system/report-utilities.scm +++ b/gnucash/report/report-system/report-utilities.scm @@ -38,7 +38,8 @@ ;; pair is a list of one gnc:commodity and one gnc:numeric ;; value. Deprecated -- use instead. (define (gnc-commodity-value->string pair) - (issue-deprecation-warning "gnc-commodity-value->string deprecated") + (issue-deprecation-warning "gnc-commodity-value->string deprecated. \ +construct gnc:make-gnc-monetary and use gnc:monetary->string instead.") (xaccPrintAmount (cadr pair) (gnc-commodity-print-info (car pair) #t)))