hedgewars/uStore.pas
changeset 495 62c1c2b4414c
parent 432 b0f693024b50
child 510 4e994e1b7abb
--- a/hedgewars/uStore.pas	Mon Feb 26 17:09:13 2007 +0000
+++ b/hedgewars/uStore.pas	Sun Mar 11 17:19:28 2007 +0000
@@ -248,6 +248,7 @@
     TryDo(IOResult = 0, msgFailed, true);
     WriteLnToConsole(msgOK);
     val(s, cExplosionBorderColor, c);
+    TryDo(c = 0, 'Theme data corrupted', true);
     AdjustColor(cExplosionBorderColor);
     end;