From 496689bb87a448c8b9b62f76f10861d459680f9b Mon Sep 17 00:00:00 2001
From: obligaron <obligaron@live.com>
Date: Sun, 21 Aug 2022 12:38:46 +0200
Subject: [PATCH] Fix incorrect SOLData for L1 arched/pillar Pieces (BlockLight
 and BlockMissile is missing)

---
 Source/levels/gendung.cpp | 26 +++++++++++++++++++++++++-
 1 file changed, 25 insertions(+), 1 deletion(-)

diff --git a/Source/levels/gendung.cpp b/Source/levels/gendung.cpp
index 3ecd44902..d22f6985f 100644
--- a/Source/levels/gendung.cpp
+++ b/Source/levels/gendung.cpp
@@ -422,7 +422,31 @@ void LoadLevelSOLData()
 		break;
 	case DTYPE_CATHEDRAL:
 		LoadFileInMem("levels\\l1data\\l1.sol", SOLData);
-		SOLData[27] |= TileProperties::BlockMissile; // Tile is incorrectly marked
+		// Fix incorrectly marked arched tiles
+		SOLData[9] |= TileProperties::BlockLight | TileProperties::BlockMissile;
+		SOLData[15] |= TileProperties::BlockLight | TileProperties::BlockMissile;
+		SOLData[16] |= TileProperties::BlockLight | TileProperties::BlockMissile;
+		SOLData[20] |= TileProperties::BlockLight | TileProperties::BlockMissile;
+		SOLData[21] |= TileProperties::BlockLight | TileProperties::BlockMissile;
+		SOLData[27] |= TileProperties::BlockMissile;
+		SOLData[28] |= TileProperties::BlockMissile;
+		SOLData[51] |= TileProperties::BlockLight | TileProperties::BlockMissile;
+		SOLData[56] |= TileProperties::BlockLight | TileProperties::BlockMissile;
+		SOLData[58] |= TileProperties::BlockLight | TileProperties::BlockMissile;
+		SOLData[61] |= TileProperties::BlockLight | TileProperties::BlockMissile;
+		SOLData[63] |= TileProperties::BlockLight | TileProperties::BlockMissile;
+		SOLData[65] |= TileProperties::BlockLight | TileProperties::BlockMissile;
+		SOLData[72] |= TileProperties::BlockLight | TileProperties::BlockMissile;
+		SOLData[208] |= TileProperties::BlockLight | TileProperties::BlockMissile;
+		SOLData[247] |= TileProperties::BlockLight | TileProperties::BlockMissile;
+		SOLData[253] |= TileProperties::BlockLight | TileProperties::BlockMissile;
+		SOLData[257] |= TileProperties::BlockLight | TileProperties::BlockMissile;
+		SOLData[323] |= TileProperties::BlockLight | TileProperties::BlockMissile;
+		SOLData[403] |= TileProperties::BlockLight;
+		// Fix incorrectly marked pillar tile
+		SOLData[24] |= TileProperties::BlockLight;
+		// Fix incorrectly marked wall tile
+		SOLData[450] |= TileProperties::BlockLight | TileProperties::BlockMissile;
 		break;
 	case DTYPE_CATACOMBS:
 		LoadFileInMem("levels\\l2data\\l2.sol", SOLData);