Revert "html-utilities.scm: simplify"

This reverts commit 4c55141d96.
and should fix the regression it caused as reported in
https://bugzilla.gnome.org/show_bug.cgi?id=796696
This commit is contained in:
Geert Janssens 2018-06-28 13:20:34 +02:00
parent f7ed46a35b
commit d865b14958

View File

@ -27,7 +27,9 @@
;; returns a list with n #f (empty cell) values
(define (gnc:html-make-empty-cell) #f)
(define (gnc:html-make-empty-cells n)
(make-list n #f))
(if (> n 0)
(cons #f (gnc:html-make-empty-cells (- n 1)))
(list)))
(define (gnc:register-guid type guid)
(gnc-build-url URL-TYPE-REGISTER (string-append type guid) ""))
@ -814,7 +816,7 @@
(gnc:html-markup-p
(gnc:html-markup-anchor
(gnc-build-url URL-TYPE-OPTIONS
(format #f "report-id=~a" report-id)
(string-append "report-id=" (format #f "~a" report-id))
"")
(_ "Edit report options")))))