diff --git a/src/pregmod/killSlave.tw b/src/pregmod/killSlave.tw
index fea8822d65a6e3f1b7e395d3fd985397662229ce..85c8722653c3ccc2591caea4f33c72089080ae4a 100644
--- a/src/pregmod/killSlave.tw
+++ b/src/pregmod/killSlave.tw
@@ -87,8 +87,8 @@ you to have mercy.
 <</if>>
 
 <br>
-<br><<link "Kill $him" "FKilled">><<set $killChoice = 0>><</link>>
-<br><<link "Have mercy on $him" "FKilled">><<set $killChoice = 1>><</link>>
+<br><<link "Kill $him" "KilledSlave">><<set $killChoice = 0>><</link>>
+<br><<link "Have mercy on $him" "KilledSlave">><<set $killChoice = 1>><</link>>
 <<if ($activeSlave.assignment != "guard you") && ($pit > 0)>>
-    <br><<link "Let $him win $his life in combat" "FKilled">><<set $killChoice = 2>><</link>>
+    <br><<link "Let $him win $his life in combat" "KilledSlave">><<set $killChoice = 2>><</link>>
 <</if>>
\ No newline at end of file
diff --git a/src/uncategorized/slaveInteract.tw b/src/uncategorized/slaveInteract.tw
index fe1cdb6582a7322b8590eec347daa5c9ad707ac5..2332ee79c06f625509d9c199e0f99d590b83fd0a 100644
--- a/src/uncategorized/slaveInteract.tw
+++ b/src/uncategorized/slaveInteract.tw
@@ -1516,6 +1516,9 @@ Relationship rules: ''<span id="relationshipRules">$activeSlave.relationshipRule
 		<</if>>
 	<</if>>
 	<<link "Discard $him" "Discard Confirm">><</link>>
+	<<if $seeExtreme == 1 && $arcologies[0].FSPaternalist == "unset" && $cheatMode == 1>>
+		<<link "Threaten $his life" "KillSlave">><</link>>
+	<</if>>
 <<else>>
 	//You cannot sell or discard your last slave.//
 <</if>>