From f33801aa3bd18aef047bc9899fd3608e518b4f43 Mon Sep 17 00:00:00 2001
From: Erthilo <erthilo@gmail.com>
Date: Wed, 16 May 2012 01:26:16 +0100
Subject: [PATCH] Hotfix for pod shuttle windows letting air through.

---
 code/game/shuttle_engines.dm | 8 ++++++--
 1 file changed, 6 insertions(+), 2 deletions(-)

diff --git a/code/game/shuttle_engines.dm b/code/game/shuttle_engines.dm
index 1ccdb01cdf4..5449634b6ab 100644
--- a/code/game/shuttle_engines.dm
+++ b/code/game/shuttle_engines.dm
@@ -1,8 +1,6 @@
-
 /obj/structure/shuttle
 	name = "shuttle"
 	icon = 'shuttle.dmi'
-	pressure_resistance = 4*ONE_ATMOSPHERE
 
 /obj/structure/shuttle/window
 	name = "shuttle window"
@@ -12,6 +10,12 @@
 	opacity = 0
 	anchored = 1
 
+/obj/structure/shuttle/window/New()
+	var/temploc = src.loc
+	for(var/turf/simulated/W in range(temploc,0))
+		W.blocks_air = 1
+		W.density = 1
+	..()
 
 /obj/structure/shuttle/engine
 	name = "engine"