Replace xaccTransGetSplits with xaccTransGetSplitList.

'xaccTransGetSplits' doesn't exist.  It was a result of an incorrect 
ordering of sed substitutions:

s/gnc:transaction-get-split/xaccTransGetSplit/g
s/gnc:transaction-get-splits/xaccTransGetSplitList/g



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

src/business/business-core/business-core.scm

@@ -95,7 +95,7 @@
 
     (if invoice
 	(set! owner (gncInvoiceGetOwner invoice))
-	(let ((split-list (xaccTransGetSplits trans)))
+	(let ((split-list (xaccTransGetSplitList trans)))
 	  (define (check-splits splits)
 	    (if (and splits (not (null? splits)))
 		(let* ((split (car splits))

src/engine/engine-interface.scm

@@ -265,7 +265,7 @@
         ;; strip off the old splits
         (for-each (lambda (split)
                     (xaccSplitDestroy split))
-                  (xaccTransGetSplits trans))
+                  (xaccTransGetSplitList trans))
 
         ;; and put on the new ones! Please note they go in the *same*
         ;; order as in the original transaction. This is important.

src/import-export/qif-import/qif-merge-groups.scm

@@ -108,7 +108,7 @@
                   (qof-query-destroy q-splits)
                   (qof-query-destroy sq)
                   (set! q-splits q-new))))
-            (xaccTransGetSplits xtn))
+            (xaccTransGetSplitList xtn))
            
            ;; now q-splits will match any split that is the same as one
            ;; split in the old-group xtn.  Merge it in.

src/report/standard-reports/advanced-portfolio.scm

@@ -361,7 +361,7 @@
 			      )
 			  )
 
-			(xaccTransGetSplits parent))
+			(xaccTransGetSplitList parent))
 
 
 		       ;; go build the basis-list
@@ -417,7 +417,7 @@
 			     (dividendcoll 'add commod-currency (xaccSplitGetValue s)))
 			   )
 			  )
-			(xaccTransGetSplits parent)
+			(xaccTransGetSplitList parent)
 			)
 		       )
 		     )

src/report/standard-reports/cash-flow.scm

@@ -339,7 +339,7 @@
 				      )
 				  )
 				)
-                              (xaccTransGetSplits parent)
+                              (xaccTransGetSplitList parent)
                             )
                           )
                         )

src/report/standard-reports/transaction.scm

@@ -1228,7 +1228,7 @@ Credit Card, and Income accounts")))))
 
 	  (if splits-ok?
 	      (let* ((txn (xaccSplitGetParent split))
-		     (splits (xaccTransGetSplits txn)))
+		     (splits (xaccTransGetSplitList txn)))
 
 		;; Walk through the list of splits.
 		;; if we reach the end, return #f