diff --git a/gnucash/report/standard-reports/general-journal.scm b/gnucash/report/standard-reports/general-journal.scm index 23e3cb7c03..5babfd8619 100644 --- a/gnucash/report/standard-reports/general-journal.scm +++ b/gnucash/report/standard-reports/general-journal.scm @@ -90,14 +90,7 @@ ) ) ;; we'll leave query malloc'd in case this is required by the C side... - - ;; set options in the general tab... - (set-option! - gnc:pagename-general (N_ "Title") (_ reportname)) - ;; we can't (currently) set the Report name here - ;; because it is automatically set to the template - ;; name... :( - + ;; set options in the display tab... (for-each (lambda (l) @@ -126,7 +119,10 @@ (define (general-journal-renderer report-obj) ;; just delegate rendering to the Register Report renderer... - ((gnc:report-template-renderer/report-guid regrptguid regrptname) report-obj)) + (let* ((renderer (gnc:report-template-renderer/report-guid regrptguid #f)) + (doc (renderer report-obj))) + (gnc:html-document-set-title! doc (_ reportname)) + doc)) (gnc:define-report 'version 1