diff --git a/src/business/business-core/business-core.scm b/src/business/business-core/business-core.scm
index 59ac8b3974..1d9a1a8383 100644
--- a/src/business/business-core/business-core.scm
+++ b/src/business/business-core/business-core.scm
@@ -102,7 +102,7 @@
 		       (lot (xaccSplitGetLot split)))
 		  (if (not (null? lot))
 		      (let* ((invoice (gncInvoiceGetInvoiceFromLot lot))
-			     (owner? (gnc:owner-get-owner-from-lot
+			     (owner? (gncOwnerGetOwnerFromLot
 				      lot temp-owner)))
 			(if (not (null? invoice))
 			    (set! owner (gncInvoiceGetOwner invoice))