diff --git a/src/npc/fSlaveImpreg.tw b/src/npc/fSlaveImpreg.tw
index 239e437efa9a93bb20eb94bf230c8a2a12f9ffcb..d8aaf62c89f34e4b2d3ef36b50254610c4a55a8d 100644
--- a/src/npc/fSlaveImpreg.tw
+++ b/src/npc/fSlaveImpreg.tw
@@ -13,7 +13,7 @@ __Select an eligible slave to serve as the semen donatrix:__
 <<for _i = 0; _i < $slaves.length; _i++>>
 	<<if ($slaves[_i].ID != $activeSlave.ID) && canImpreg($activeSlave, $slaves[_i])>>
 		<<set _name = SlaveFullName($slaves[_i])>>
-		<br><<print "[[_name|FSlaveImpreg Consummate][$impregnatrix = $slaves[" + _i + "], _i = " + _i + "]]">>
+		<br><<print "[[_name|FSlaveImpreg Consummate][$impregnatrix = $slaves[" + _i + "]]]">>
 		<<set $eligibility = 1>>
 	<</if>>
 <</for>>
diff --git a/src/npc/fSlaveImpregConsummate.tw b/src/npc/fSlaveImpregConsummate.tw
index 5489a951ea7c21f310d17f815e440ace5a8235e2..a6e8b489dfc0d77cd563456f714d329ac298cd04 100644
--- a/src/npc/fSlaveImpregConsummate.tw
+++ b/src/npc/fSlaveImpregConsummate.tw
@@ -378,5 +378,5 @@ $activeSlave.slaveName and $impregnatrix.slaveName are likely to produce
 	slave with a decent ass.
 <</if>>
 
-<<set $slaves[$i] = $impregnatrix>> /* save changes -- $i is already set to the index of the impregnatrix by fSlaveImpreg */
+<<set $slaves[$slaveIndices[$impregnatrix.ID]] = $impregnatrix>> /* save changes */