Prevented segmentation fault when calling the lua set_quest_var function with an illegal character handle.

1 files changed, 6 insertions, 1 deletions

diff --git a/src/scripting/lua.cpp b/src/scripting/lua.cpp
index 3b33a3d1..5813836e 100644
--- a/src/scripting/lua.cpp
+++ b/src/scripting/lua.cpp
@@ -925,11 +925,16 @@ static int chr_set_quest(lua_State *s)
     Character *q = getCharacter(s, 1);
     const char *m = lua_tostring(s, 2);
     const char *n = lua_tostring(s, 3);
-    if (!m || !n || m[0] == 0)
+    if (!m || !n || m[0] == 0 || strlen(m) == 0)
     {
         raiseScriptError(s, "chr_set_quest called with incorrect parameters.");
         return 0;
     }
+    if (!q)
+    {
+        raiseScriptError(s, "chr_set_quest called for nonexistent character.");
+        return 0;
+    }
     setQuestVar(q, m, n);
     return 0;
 }