From 611cc941d67b03659b77181a4c9ccd185197e266 Mon Sep 17 00:00:00 2001
From: Derek Atkins <derek@ihtfp.com>
Date: Fri, 28 Jun 2002 02:59:58 +0000
Subject: [PATCH] wrap xaccSplitGetLot()

git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@7038 57a11ea4-9604-0410-9ed3-97b8803252fd
---
 src/engine/gw-engine-spec.scm | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/src/engine/gw-engine-spec.scm b/src/engine/gw-engine-spec.scm
index b764ea2d53..14075c29fe 100644
--- a/src/engine/gw-engine-spec.scm
+++ b/src/engine/gw-engine-spec.scm
@@ -467,6 +467,14 @@ gnc:split-get-corr-account-full-name in src/scm/report-utilities.scm")
  "Find the split on the other side of the transaction, and return the 
 code of its account")
 
+(gw:wrap-function
+ ws
+ 'gnc:split-get-lot
+ '<gnc:Lot*>
+ "xaccSplitGetLot"
+ '((<gnc:Split*> s))
+ "Return the LOT of Split s.")
+
 (gw:wrap-function
  ws
  'gnc:transaction-get-guid