[options.scm API] yank canonically-tabbed parent-subtotal-mode

'canonically-tabbed option is buggy and has never graduated out of
experimental for 17 years. Time to put it to rest.

All previous saved reports with this option will be switched to 't
i.e. parent-subtotal-mode enabled..
This commit is contained in:
Christopher Lam
2021-02-12 17:36:16 +08:00
parent 974368c2b8
commit 779c0521e0
8 changed files with 26 additions and 39 deletions

View File

@@ -1057,12 +1057,18 @@ the option '~a'."))
section name sort-tag 'multichoice documentation-string
(lambda () value)
(lambda (x)
(if (multichoice-legal x ok-values)
(begin
(set! value x)
(if (procedure? setter-function-called-cb)
(setter-function-called-cb x)))
(rpterror-earlier "multichoice" x default-value)))
(cond
((and (equal? section "Display")
(equal? name "Parent account subtotals")
(equal? x 'canonically-tabbed))
(gnc:warn "canonically-tabbed obsolete. switching to 't")
(set! value 't))
((not (multichoice-legal x ok-values))
(rpterror-earlier "multichoice" x default-value))
(else
(set! value x)
(if (procedure? setter-function-called-cb)
(setter-function-called-cb x)))))
(lambda () default-value)
(gnc:restore-form-generator value->string)
(lambda (b p) (qof-book-set-option b (symbol->string value) p))