[reports] pulse progress bar in common html-object renderer code

... instead of individual html-object renderers as in 63ec05d. We
can also increase pulse tempo (from 2500 calls to 1000 calls) without
significantly affecting performance.

gnucash/report/html-document.scm

@@ -141,8 +141,7 @@
           ;; now render the children
           (for-each
            (lambda (child)
-               (push (gnc:html-object-render child doc))
-               (gnc:pulse-progress-bar))
+               (push (gnc:html-object-render child doc)))
            objs)
 
           (when headers?
@@ -331,6 +330,7 @@
        (gnc:html-document-render-data doc obj)) obj))))
 
 (define (gnc:html-object-render obj doc)
+  (gnc:pulse-progress-bar)
   (if (gnc:html-object? obj)
       ((gnc:html-object-renderer obj) (gnc:html-object-data obj) doc)
       (let ((htmlo (gnc:make-html-object obj)))

gnucash/report/html-table.scm

@@ -168,7 +168,6 @@
            (format #f "colspan=\"~a\"" (gnc:html-table-cell-colspan cell))))
     (for-each
      (lambda (child)
-       (gnc:pulse-progress-bar)
        (push (gnc:html-object-render child doc)))
      cell-data)
     (push (gnc:html-document-markup-end doc cell-tag))
@@ -476,7 +475,6 @@
           (push (gnc:html-document-markup-end doc rowmarkup))
           (when rowstyle (gnc:html-document-pop-style doc))
 
-          (gnc:pulse-progress-bar)
           (rowloop (cdr rows) (1+ rownum)))))
     (push (gnc:html-document-markup-end doc "tbody"))
 

gnucash/report/html-text.scm

@@ -202,7 +202,6 @@
     (gnc:html-document-push-style doc (gnc:html-text-style p))
     (for-each 
      (lambda (elt)
-       (gnc:pulse-progress-bar)
        (cond ((procedure? elt)
               (push (elt doc)))
              (#t 

gnucash/report/report-utilities.scm

@@ -633,7 +633,7 @@ query instead.")
   (let ((pulse-idx 0))
     (lambda ()
       (set! pulse-idx (1+ pulse-idx))
-      (when (= pulse-idx 2500)
+      (when (= pulse-idx 1000)
         (set! pulse-idx 0)
         (gnc-window-show-progress "" 105)))))