Modified: freeswitch/trunk/contrib/nazim/xmlcdrd/plugins/luaexec/luaexec.c (17051 => 17052)

--- freeswitch/trunk/contrib/nazim/xmlcdrd/plugins/luaexec/luaexec.c	2010-03-19 21:45:33 UTC (rev 17051)
+++ freeswitch/trunk/contrib/nazim/xmlcdrd/plugins/luaexec/luaexec.c	2010-03-19 21:51:02 UTC (rev 17052)
@@ -179,10 +179,15 @@
     
     lua_getglobal(vars->L, LUAEXEC_FUNC_INIT);
     if(lua_pcall(vars->L, 0, 0, 0) )
+    {
         fprintf(stderr, "can't run %s function: %s, %s\n", 
                 LUAEXEC_FUNC_INIT,
                 vars->luascript,
                 lua_tostring(vars->L, -1));
+        
+        lua_pop(vars->L, 1);
+        
+    }
     
     return PLUG_STATUS_OK;
 }
@@ -194,14 +199,17 @@
 
     lua_getglobal(vars->L, LUAEXEC_FUNC_FREE);
     if(lua_pcall(vars->L, 0, 0,0) )
+    {        
         fprintf(stderr, "can't run %s function: %s, %s\n",
                 LUAEXEC_FUNC_FREE,
                 vars->luascript,
                 lua_tostring(vars->L, -1));
 
-
+        lua_pop(vars->L, 1);
+    }
+    
     lua_close (vars->L);
-
+    
     free (vars);
     
     return PLUG_STATUS_OK;
@@ -224,6 +232,8 @@
                 LUAEXEC_FUNC_PROCESS_CDR,
                 vars->luascript,
                 lua_tostring(vars->L, -1));
+
+        lua_pop(vars->L, 1);
         
         res = PLUG_STATUS_ERROR;
     }