dorm -> uni_dorm

locations/bed.qsrc

@@ -203,7 +203,7 @@ if $ARGS[0] = 'fin':
 	end
 
 	if houseob = 1:
-		gt 'dorm', 'dorm_room'
+		gt 'uni_dorm', 'dorm_room'
 	end
 
 	if tanhouse1 = 1:

locations/din_npc.qsrc

@@ -19,7 +19,7 @@ if $ARGS[0] = 'go_straight_home':
 	if curr_home = 10:
 		gt 'etoexhib', 'pos40'
 	elseif curr_home = 11:
-		gt 'dorm', 'dorm_room'
+		gt 'uni_dorm', 'dorm_room'
 	elseif curr_home = 12:
 		gt 'swamphouse', 'start'
 	else

locations/set_home.qsrc

@@ -55,7 +55,7 @@ elseif curr_home = 11:
 	$home_name = 'University halls'
 	$home_town = 'city'
 	$home_location = 'city_island'
-	$home_entrance = 'dorm'
+	$home_entrance = 'uni_dorm'
 elseif curr_home = 12:
 	$home_name = 'Hunter''s lodge in Gadukino'
 	$home_town = 'gadukino'

locations/sex.qsrc

@@ -209,7 +209,7 @@ if $ARGS[0] = 'end':
 			killvar 'svidboysex'
 			gt $svidboy_home, $svidboy_home_arg
 		end
-		if $sexloc = 'dorm': gt 'dorm', 'dorm_room'
+		if $sexloc = 'uni_dorm': gt 'uni_dorm', 'dorm_room'
 
 		gt $sexloc, 'start'
 	end

locations/succubus.qsrc

@@ -438,7 +438,7 @@ if $args[0] = 'sucwalkinginit':
 	!!'bedr' = Apartment on St. Petersburg Residential street
 	!!'nichBedroomServant' = Tanya''s apartment downtown
 	!!'dom_gor' = Hostel downtown
-	!!'dorm' = Dorm at the university
+	!!'uni_dorm' = Dorm at the university
 	!!Zone 2;
 	!!'bedrPar' = Parent''s apartment in Pavlovsk
 	!!'HotelRoom' = Hotel next to train station in Pavlovsk
@@ -446,7 +446,7 @@ if $args[0] = 'sucwalkinginit':
 	!!Zone 4; 'bedr2x' = Apartment in "Old Town" (aka Pushkin)
 	!!Zone 5; 'gadhouse' = Grandmother''s house in Gadukino
 
-	if $loc = 'bedr' or $loc = 'nichBedroomServant' or $loc = 'dom_gor' or $loc = 'dorm':
+	if $loc = 'bedr' or $loc = 'nichBedroomServant' or $loc = 'dom_gor' or $loc = 'uni_dorm':
 		sucslpzone = 1
 	elseif $loc = 'bedrPar' or $loc = 'HotelRoom':
 		sucslpzone = 2