Polishing

src/room/cyanRoom.t

@@ -33,6 +33,13 @@ cyanRoom: Room
     <br>Its purpose is unclear to you. "
 ;
 
++ Decoration
+  'corrupted doorway'
+  'doorway'
+  "The corrupted doorway. "
+  specialNominalRoomPartLocation = defaultWestWall
+;
+
 + operatingRoomDoorOutside: LockableWithKey, Door
   -> operatingRoomDoor
   'armored operating door*doors'

src/room/pinkRoom.t

@@ -1,6 +1,7 @@
 pinkRoom: Room
   'Changing room'
-  " An elevator vestibule with a row of lockers,
+  " An elevator vestibule with a row of lockers
+    connected by a common electronic locking device,
     a dumpster and posters with safety rules.
     Construction dust and debris are everywhere.\b
     You can see the corrupted doorway to the east