* src/scm/report/taxtxf.scm: don't use deprecated calls

* src/guile/gnc.gwp: wrap xaccAccountGetSplitList

	* src/engine/Query-xml-parser-v1.c
	(qrestore_datepred_start_handler): use g_new0 instead of bzero --
	more portable


git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@3910 57a11ea4-9604-0410-9ed3-97b8803252fd

ChangeLog

@@ -1,5 +1,9 @@
 2001-04-08  Dave Peticolas  <dave@krondo.com>
 
+	* src/scm/report/taxtxf.scm: don't use deprecated calls
+
+	* src/guile/gnc.gwp: wrap xaccAccountGetSplitList
+
 	* src/engine/Query-xml-parser-v1.c
 	(qrestore_datepred_start_handler): use g_new0 instead of bzero --
 	more portable

src/engine/sixtp-xml-write-utils.c

@@ -21,7 +21,7 @@
  *                                                                  *
  ********************************************************************/
 
-#include <config.h>
+#include "config.h"
 
 #define _GNU_SOURCE
 

src/scm/report/taxtxf.scm

@@ -47,17 +47,9 @@
 
   ;; This and the next function are the same as in transaction-report.scm
   (define (make-split-list account split-filter-pred)
-    (let ((num-splits (gnc:account-get-split-count account)))
-      (let loop ((index 0)
-                 (split (gnc:account-get-split account 0))
-                 (slist '()))
-        (if (= index num-splits)
-            (reverse slist)
-            (loop (+ index 1)
-                  (gnc:account-get-split account (+ index 1))
-                  (if (split-filter-pred split)
-                      (cons split slist)
-                      slist))))))
+    (filter split-filter-pred
+            (gnc:glist->list (gnc:account-get-split-list account)
+                             <gnc:Split*>)))
 
   ;; returns a predicate that returns true only if a split is
   ;; between early-date and late-date