From 22ae2115482a6f775cbf4f23d8ddccca17e19a5b Mon Sep 17 00:00:00 2001
From: johns <>
Date: Thu, 1 Aug 2002 18:18:59 +0000
Subject: [PATCH] Check for max mana != 0 for spell casters.

---
 src/unit/script_unittype.cpp | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/src/unit/script_unittype.cpp b/src/unit/script_unittype.cpp
index b972dfa96..079388ff2 100644
--- a/src/unit/script_unittype.cpp
+++ b/src/unit/script_unittype.cpp
@@ -381,6 +381,14 @@ local SCM CclDefineUnitType(SCM list)
 	}
     }
 
+    //
+    //	Unit type checks.
+    //
+    if( type->CanCastSpell && type->_MaxMana ) {
+	DebugLevel0Fn("%s: Need max mana value\n" _C_ type->Ident);
+	type->_MaxMana=1;
+    }
+
     return SCM_UNSPECIFIED;
 }