diff --git a/src/uncategorized/headGirlSuite.tw b/src/uncategorized/headGirlSuite.tw
index 79e99876adb1c8ab84512f365c99438752904a75..39852d566b619f8c23304661710866a3628d396d 100644
--- a/src/uncategorized/headGirlSuite.tw
+++ b/src/uncategorized/headGirlSuite.tw
@@ -9,12 +9,15 @@
 
 <<if $HeadGirl == 0>>
 	You have no Head Girl appointed to live in $HGSuiteName.
+	<<link "Select Head Girl">><<goto "HG Select">><</link>>
 <<elseif $HGSuiteSlaves > 0>>
 	<<setLocalPronouns $HeadGirl>>
 	Your Head Girl $HeadGirl.slaveName has $slaves[_i].slaveName living in $HGSuiteName with $him, as $his servant, assistant, and sexual appliance.
+	<<link "Manage Head Girl">><<goto "HG Select">><</link>>
 <<else>>
 	<<setLocalPronouns $HeadGirl>>
 	Your Head Girl $HeadGirl.slaveName lives alone in $his handsome suite.
+	<<link "Manage Head Girl">><<goto "HG Select">><</link>>
 <</if>>
 
 <br>//Any slave assigned to live with your Head Girl will become, for most practical purposes, $his slave.//
diff --git a/src/uncategorized/hgSelect.tw b/src/uncategorized/hgSelect.tw
index fa76f8fa23baea0f7697821f876cf6bf1e044a4d..b0dd2398d7ee70ff5a10d8225ba5fb6c22a7d514 100644
--- a/src/uncategorized/hgSelect.tw
+++ b/src/uncategorized/hgSelect.tw
@@ -10,6 +10,9 @@
 	<<setLocalPronouns $HeadGirl>>
 	<<set _HGName = SlaveFullName($HeadGirl)>>
 	''__@@.pink;_HGName@@__'' is serving as your Head Girl<<if $arcologies[0].FSEgyptianRevivalistLaw == 1>> and Consort; it is $his role to serve and comfort you at your side, in addition to performing normal Head Girl duties<</if>>.
+	<<if ($HGSuite)>>
+		<br> Currently $he lives in <<link "$HGSuiteNameCaps""Head Girl Suite">><</link>>
+	<</if>>
 	<br><br>
 <</if>>