mirror of
https://github.com/Gnucash/gnucash.git
synced 2025-02-25 18:55:30 -06:00
[obsolete api] improve deprecation warnings
This commit is contained in:
parent
768ed09977
commit
c76ea30f3a
@ -94,7 +94,8 @@
|
|||||||
|
|
||||||
;; Helper for warnings below.
|
;; Helper for warnings below.
|
||||||
(define (gnc-commodity-numeric->string commodity numeric)
|
(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:monetary->string
|
||||||
(gnc:make-gnc-monetary commodity numeric)))
|
(gnc:make-gnc-monetary commodity numeric)))
|
||||||
|
|
||||||
|
@ -38,7 +38,8 @@
|
|||||||
;; pair is a list of one gnc:commodity and one gnc:numeric
|
;; pair is a list of one gnc:commodity and one gnc:numeric
|
||||||
;; value. Deprecated -- use <gnc-monetary> instead.
|
;; value. Deprecated -- use <gnc-monetary> instead.
|
||||||
(define (gnc-commodity-value->string pair)
|
(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
|
(xaccPrintAmount
|
||||||
(cadr pair) (gnc-commodity-print-info (car pair) #t)))
|
(cadr pair) (gnc-commodity-print-info (car pair) #t)))
|
||||||
|
|
||||||
|
Loading…
Reference in New Issue
Block a user