Bug in reports

[Phillip John Shelton]

Was it just me or had gnucash.org been unreachable for others as well? 
I am glad to report that it is back up now.

Bug report. Is there a bugzilla address?

In the file /src/report/standard-reports/account-summary.scm

the moudule srfi and srfi-1 are hardcoded in. In configure the test is 
made to see if these are needed. (in guile 1.6.3 they are not) how do I 
go about makeing the use of these modules conditional?

<quote>
;;
;; You should have received a copy of the GNU General Public License
;; along with this program; if not, contact:
;;
;; Free Software Foundation           Voice:  +1-617-542-5942
;; 59 Temple Place - Suite 330        Fax:    +1-617-542-2652
;; Boston, MA  02111-1307,  USA       gnu at gnu.org
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(define-module (gnucash report account-summary))

(use-modules (srfi srfi-1))
(use-modules (gnucash main)) ;; FIXME: delete after we finish modularizing.
(use-modules (gnucash gnc-module))
</quote>


In the Expence over time report if you set the step size to less than a 
month you get an error in generatitng the report and no report.


[phillip at gandalf phillip]$ guile --version
Guile 1.4.1
Copyright (c) 1995, 1996, 1997, 2000, 2002 Free Software Foundation
Guile may be distributed under the terms of the GNU General Public Licence;
certain other uses are permitted as well.  For details, see the file
`COPYING', which is included in the Guile distribution.
There is no warranty, to the extent permitted by law.
[phillip at gandalf phillip]$ g-wrap-config --version
g-wrap-config 1.3.4
[phillip at gandalf phillip]$ gnucash --version
;;; The module name (ice-9 and-let*) is deprecated.
;;; Use (ice-9 and-let-star) instead.

GnuCash 1.8.1
[phillip at gandalf phillip]$ gnucash
;;; The module name (ice-9 and-let*) is deprecated.
;;; Use (ice-9 and-let-star) instead.


Gtk-CRITICAL **: file gtkprogress.c: line 518 
(gtk_progress_set_percentage): assertion `percentage >= 0 && percentage 
<= 1.0' failed.
22  (if (and # #) (begin #) (let # # doc))
23  (let ((template #) (doc #f)) (set! doc (if template # #f)) doc)
24* (set! doc (if template (let* # # # ...) #f))
25* (if template (let* # # # ...) #f)
26  (let* (# # # ...) (gnc:html-document-set-style-sheet! doc 
stylesheet) ...)
27* [#<procedure #> #]
28  [category-barchart-renderer # Expense Over Time # ...]
     ...
29  (letrec ((show-acct? #)) (if (not #) (let* # #) ...) ...)
30* (if (not (null? accounts)) (let* (# # # ...) (letrec # # ...)) ...)
31  (let* (# # # # ...) (letrec # # # ...))
32* (if do-intervals? (gnc:make-date-interval-list # # ...) ...)
33  [gnc:make-date-interval-list (1023012000 . 0) (1046771999 . 0) #f]
     ...
34  (let ((nextd #)) (cond (# #) (#t #)))
35* [incdate (1023012000 . 0) #f]
36  [moddate #<primitive-procedure +> (1023012000 . 0) #f]
37  (let ((newtm #)) (set-tm:sec newtm (op # #)) ...)
38* [set-tm:sec #(0 0 0 2 5 102 0 152 0 ...) ...
39*  [+ 0 ...
40*   [tm:sec #f]
41    [vector-ref #f 0]
ERROR: In procedure vector-ref in expression (vector-ref obj 0):
ERROR: Wrong type argument in position 1: #f