correct names of renamed locations

locations/bed.qsrc

@@ -207,7 +207,7 @@ if $ARGS[0] = 'fin':
 	end
 
 	if tanhouse1 = 1:
-		gt 'tanspalnya'
+		gt 'nichBedroomServant'
 	end
 end
 

locations/podrsex.qsrc

@@ -223,7 +223,7 @@ if $ARGS[0] = 'end':
 	act 'Leave':
 		if picrand = 26 or picrand = 27 or picrand = 29:gt 'office', 'work'
 		if picrand >= 30 and picrand <= 32:gt 'city_center'
-		if picrand = 19:gt 'tanhousezal'
+		if picrand = 19:gt 'nichLivingroom'
 
 		if kazsexdva = 1:
 			kazsexdva = 0

locations/succubus.qsrc

@@ -436,7 +436,7 @@ if $args[0] = 'sucwalkinginit':
 	!!This checks for a valid location and sets the zone
 	!!Zone 1;
 	!!'bedr' = Apartment on St. Petersburg Residential street
-	!!'tanspalnya' = Tanya''s apartment downtown
+	!!'nichBedroomServant' = Tanya''s apartment downtown
 	!!'dom_gor' = Hostel downtown
 	!!'obroom' = Dorm downtown
 	!!Zone 2;
@@ -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 = 'tanspalnya' or $loc = 'dom_gor' or $loc = 'obroom':
+	if $loc = 'bedr' or $loc = 'nichBedroomServant' or $loc = 'dom_gor' or $loc = 'obroom':
 		sucslpzone = 1
 	elseif $loc = 'bedrPar' or $loc = 'HotelRoom':
 		sucslpzone = 2