[options.scm] move gnc:options-fancy-date to business-options.scm

it needs gnc:fancy-date-info which is defined in business-options
pull/819/head
Christopher Lam 6 years ago
parent de63a79527
commit 0630c214f0

@ -27,6 +27,12 @@
(use-modules (gnucash engine))
(use-modules (gnucash utilities))
(define (gnc:options-fancy-date book)
(let ((date-format (gnc:fancy-date-info book gnc:*fancy-date-format*)))
(if (boolean? date-format) ;; date-format does not exist
(qof-date-format-get-string (qof-date-format-get))
date-format)))
(define (gnc:make-invoice-option
section
name

@ -1944,12 +1944,6 @@ the option '~a'."))
(define (gnc:generate-restore-forms options options-string)
((options 'generate-restore-forms) options-string))
(define (gnc:options-fancy-date book)
(let ((date-format (gnc:fancy-date-info book gnc:*fancy-date-format*)))
(if (boolean? date-format) ;; date-format does not exist
(qof-date-format-get-string (qof-date-format-get))
date-format)))
(define (gnc:options-scm->kvp options book clear-option?)
(if clear-option?
(qof-book-options-delete book '()))

Loading…
Cancel
Save