From a32d18cbb939b240bc16d909fce71ba72c24f040 Mon Sep 17 00:00:00 2001
From: frosch <frosch@openttd.org>
Date: Sun, 23 Feb 2014 22:03:08 +0000
Subject: (svn r26371) -Fix [FS#5831]: Calling DoCommandP during the gameloop
 cleared pending persistent storage changes.

---
 src/saveload/storage_sl.cpp | 1 +
 1 file changed, 1 insertion(+)

(limited to 'src/saveload/storage_sl.cpp')

diff --git a/src/saveload/storage_sl.cpp b/src/saveload/storage_sl.cpp
index 9fb1c8672..d35fa7cc9 100644
--- a/src/saveload/storage_sl.cpp
+++ b/src/saveload/storage_sl.cpp
@@ -39,6 +39,7 @@ static void Save_PSAC()
 
 	/* Write the industries */
 	FOR_ALL_STORAGES(ps) {
+		ps->ClearChanges();
 		SlSetArrayIndex(ps->index);
 		SlObject(ps, _storage_desc);
 	}
-- 
cgit v1.2.3-54-g00ecf