diff --git a/src/industry_cmd.cpp b/src/industry_cmd.cpp
--- a/src/industry_cmd.cpp
+++ b/src/industry_cmd.cpp
@@ -520,7 +520,7 @@ static CommandCost ClearTile_Industry(Ti
 		Game::NewEvent(new ScriptEventIndustryClose(i->index));
 		delete i;
 	}
-	return CommandCost(EXPENSES_CONSTRUCTION, indspec->GetRemovalCost());
+	return CommandCost(EXPENSES_T_DEMOLITION, indspec->GetRemovalCost());
 }
 
 /**
@@ -2054,7 +2054,7 @@ CommandCost CmdBuildIndustry(DoCommandFl
 		AdvertiseIndustryOpening(ind);
 	}
 
-	return CommandCost(EXPENSES_OTHER, indspec->GetConstructionCost());
+	return CommandCost(EXPENSES_CONSTRUCTION, indspec->GetConstructionCost());
 }
 
 /**