r16863 - gnucash/trunk/src/report/standard-reports - fix another report-guid reference, general-ledger report.

Andrew Sackville-West andrewsw at cvs.gnucash.org
Tue Jan 15 13:56:26 EST 2008


Author: andrewsw
Date: 2008-01-15 13:56:25 -0500 (Tue, 15 Jan 2008)
New Revision: 16863
Trac: http://svn.gnucash.org/trac/changeset/16863

Modified:
   gnucash/trunk/src/report/standard-reports/general-ledger.scm
Log:
fix another report-guid reference, general-ledger report.


Modified: gnucash/trunk/src/report/standard-reports/general-ledger.scm
===================================================================
--- gnucash/trunk/src/report/standard-reports/general-ledger.scm	2008-01-15 16:29:24 UTC (rev 16862)
+++ gnucash/trunk/src/report/standard-reports/general-ledger.scm	2008-01-15 18:56:25 UTC (rev 16863)
@@ -38,19 +38,21 @@
 (gnc:module-load "gnucash/report/report-system" 0)
 
 (define reportname (N_ "General Ledger"))
+(define xactrptguid "2fe3b9833af044abb929a88d5a59620f")
 (define xactrptname "Transaction Report")
 
+
 ;; report constructor
 
 (define (gnc:make-general-ledger-report)
-  (let* ((xactrpt (gnc:make-report xactrptname)))
+  (let* ((xactrpt (gnc:make-report xactrptguid)))
     xactrpt))
 
 ;; options generator
 
 (define (general-ledger-options-generator)
   
-  (let* ((options (gnc:report-template-new-options/name xactrptname))
+  (let* ((options (gnc:report-template-new-options/report-guid xactrptguid xactrptname))
 	 )
     
     (define pagename-sorting (N_ "Sorting"))
@@ -124,7 +126,7 @@
 
 (define (general-ledger-renderer report-obj)
   ;; just delegate rendering to the Transaction Report renderer...
-  ((gnc:report-template-renderer/name xactrptname) report-obj))
+  ((gnc:report-template-renderer/report-guid xactrptguid xactrptname) report-obj))
 
 (gnc:define-report 
  'version 1



More information about the gnucash-changes mailing list