replace DoLook
{
	local i,skip_ahead, no_fullstop

	if not light_source
		VMessage(&DoLook, 1)     ! "It's too dark to see anything."
	else
	{
		if ( object is transparent or !(object is living, transparent) or
			object is platform or (object is container and
			(object is open or object is not openable))) and
			object is not quiet ! and object is not already_listed
		{
			for i in object
			{
				if i is not hidden
					break
			}
		}

		if not object.long_desc
		{
#ifclear FORCE_DEFAULT_MESSAGE
!			if (object is container or object is platform) and
			if object is container and
			object is not quiet and object is not living
			{
				if (object is openable,open)
				{
					print "It's open.";
					if not i
						Indent
				}
				Perform(&DoLookIn,object) ! so we get "it is closed." if closed
				object = -1   ! so pronouns are set to any contents
				skip_ahead = true
			}
			elseif i
				no_fullstop = true
			else
#endif
				! "Looks just like you'd expect..."
				VMessage(&DoLook, 2)
		}

		if i and object ~= player and not skip_ahead
		{
			parser_data[PARSER_STATUS] &= ~PRONOUNS_SET
			local tempformat
			tempformat = FORMAT
			FORMAT = FORMAT | NOINDENT_F
			list_nest = 0
			if not no_fullstop
				print ""
			WhatsIn(object)
			object = -1
			FORMAT = tempformat
		}

		run object.after
#ifclear NO_LOOK_TURNS
		return true
#endif
	}
}