husk slave swap refunds attached cybertails

src/pregmod/huskSlaveSwap.tw

@@ -4,6 +4,15 @@
 <<set _oldSlave = clone($swappingSlave)>>
 <<set _m = $slaveIndices[$swappingSlave.ID]>>
 <<run clearSummaryCache($slaves[_m])>>
+<<if $slaves[_m].tail != "none">>
+	<<if $slaves[_m].tail == "sex">>
+		<<set $stockpile.sexPTail++>>
+	<<elseif $slaves[_m].tail == "combat">>
+		<<set $stockpile.warPTail++>>
+	<<else>>
+		<<set $stockpile.modPTail++>>
+	<</if>>
+<</if>>
 
 You strap $slaves[_m].slaveName, and the body to which $he will be transferred, into the remote surgery and stand back as it goes to work.
 <<BodySwap $slaves[_m] $activeSlave>>