Fix missing $ in slaves

sanityCheck

@@ -65,6 +65,8 @@ $GREP -e "[$]slaves[.]"  --and --not -e '[$]slaves[.]\(length\|random\|map\|filt
 $GREP -e "activeSlave[.]" --and -e "slaves\[..\?\][.]" --and --not -e '[.]ID' --and --not -e 'slaves\[..\?\][.]\(slaveName\|actualAge\|relation\|assignment\|age\|devotion\|trust\|vagina\)' -- 'src/*' | myprint "MaybeAccidentalMixingOfSlavesAndActiveSlave"
 # Check, e.g.  <<set foo == 4>>
 $GREP "<<set[^{>=]*==" -- 'src/*' | myprint "DoubleEqualsInSet"
+# Check for, e.g   <<if slaves[foo]>>
+$GREP "<<\([^>]\|[^>]>[^>]\)*[^$]slaves\[" -- 'src/*' | myprint "MissingDollar"
 
 # Check that we do not have any variables that we use only once.   e.g.     $onlyUsedOnce
 (

src/uncategorized/genericPlotEvents.tw

@@ -545,7 +545,7 @@ A screen opposite your desk springs to life, <<if $assistant == 0>>showing your
 	<<replace "#result">>
 	Since subjecting all the affected slaves to abortions would cause you severe losses, you've decided to let them keep the pregnancies. You hope you are prepared for all the children you'll be producing. Those who couldn't become pregnant @@.lime;gained some breast, hip and ass size@@, as well as @@.lime;began lactating@@.
 	<<for $i = 0; $i < $slaves.length; $i++>>
-		<<if ($slaves[$i].drugs == "breast injections") && canGetPregnant(slaves[$i])>>
+		<<if ($slaves[$i].drugs == "breast injections") && canGetPregnant($slaves[$i])>>
 			<<set $slaves[$i].preg = 1>>
 			<<set $slaves[$i].pregType = random(20,29)>>
 		<<elseif $slaves[$i].drugs == "breast injections">>