From 55f8ffcec5e33c35a60dff691ae2ee65ab97e204 Mon Sep 17 00:00:00 2001
From: lowercasedonkey <lowercasedonkey@gmail.com>
Date: Sat, 25 Jan 2020 18:12:12 -0500
Subject: [PATCH] recETS price and records fix

---
 src/uncategorized/recETS.tw | 7 +++++--
 1 file changed, 5 insertions(+), 2 deletions(-)

diff --git a/src/uncategorized/recETS.tw b/src/uncategorized/recETS.tw
index 28cac23d3cf..f4fae85758f 100644
--- a/src/uncategorized/recETS.tw
+++ b/src/uncategorized/recETS.tw
@@ -1787,7 +1787,7 @@ This call is coming from a public kiosk, which is usually an indication that the
 
 <<case "identical herm pair" "identical pair" "matched pair">>
 <<link "Buy them both">>
-	<<run cashX(forceNeg(_ContractCost), "slaveTransfer", $activeSlave)>>
+	
 	<<replace #result>>
 		<<switch $RecETSevent>>
 		<<case "identical herm pair">>
@@ -1800,13 +1800,14 @@ This call is coming from a public kiosk, which is usually an indication that the
 		<</switch>>
 		<<run newSlave($relative)>>
 		<<run newSlave($relative2)>>
+		<<run cashX(forceNeg(_ContractCost), "slaveTransfer", $relative)>>
+		<<run cashX(forceNeg(_ContractCost), "slaveTransfer", $relative2)>>
 	<</replace>>
 <</link>>
 
 <<case "incest brother brother" "incest brother sister" "incest father daughter" "incest father son" "incest mother daughter" "incest mother son" "incest sister sister" "incest twin brother" "incest twin sister" "incest twins mixed">>
 
 <<link "Buy them both">>
-	<<run cashX(forceNeg(_ContractCost), "slaveTransfer", $activeSlave)>>
 	<<replace #mainbody>>
 	<<switch $RecETSevent>>
 	<<case "incest brother brother">>
@@ -1838,6 +1839,8 @@ This call is coming from a public kiosk, which is usually an indication that the
 		<<run newSlave($relative)>>
 		<<run newSlave($relative2)>>
 	<</switch>>
+	<<run cashX(forceNeg(_ContractCost), "slaveTransfer", $relative)>>
+	<<run cashX(forceNeg(_ContractCost), "slaveTransfer", $relative2)>>
 	<<include "newSlaveIncestSex">>
 	<</replace>>
 <</link>>
-- 
GitLab