删除json模块默认的pcall封装，修改几个用到了的地方

Author: MrZ626

file.lua

@@ -52,11 +52,8 @@ function FILE.load(path,args)
                 error("FILE.load: Compile error: "..err_mes)
             end
         elseif mode=='json' then
-            local res=JSON.decode(s)
-            if res then
-                return res
-            end
-            error("FILE.load: Decode error")
+            local res,data=pcall(JSON.decode,s)
+            return res and data or error("FILE.load: Decode error")
         elseif mode=='string' then
             return s
         else
@@ -75,7 +72,7 @@ end
 function FILE.save(data,path,args)
     if not args then args='' end
     if STRING.sArg(args,'-d') and fs.getInfo(path) then
-        error("FILE.save: Duplicate")
+        error("FILE.save: File already exist")
     end
 
     if type(data)=='table' then
@@ -86,13 +83,12 @@ function FILE.save(data,path,args)
                 data='return'..TABLE.dumpDeflate(data)
             end
             if not data then
-                error("FILE.save: Encode error")
+                error("FILE.save: Luaon-encoding error")
             end
         else
-            data=JSON.encode(data)
-            if not data then
-                error("FILE.save: Encode error")
-            end
+            local res
+            res,data=pcall(JSON.encode,data)
+            assert(res,"FILE.save: Json-encoding error")
         end
     else
         data=tostring(data)

http.lua

@@ -102,7 +102,9 @@ function HTTP.request(arg)
 
     if arg.body~=nil then
         assertf(type(arg.body)=='table',"HTTP.request(arg): arg.body need table, got %s",arg.body)
-        arg.body=JSON.encode(arg.body)
+        local res
+        res,arg.body=pcall(JSON.encode,arg.body)
+        assert(res,"HTTP.request(arg): arg.body json-encoding error")
         if not arg.headers then arg.headers={} end
         TABLE.cover({
             ['Content-Type']="application/json",

init.lua

@@ -128,25 +128,6 @@ COLOR=      require'Zenitha.color'
 DEBUG=      require'Zenitha.debug'
 LOG=        require'Zenitha.log'
 JSON=       require'Zenitha.json'
-do -- Add pcall & MSG for JSON lib
-    local encode,decode=JSON.encode,JSON.decode
-    function JSON.encode(val)
-        local a,b=pcall(encode,val)
-        if a then
-            return b
-        elseif MSG then
-            MSG.traceback()
-        end
-    end
-    function JSON.decode(str)
-        local a,b=pcall(decode,str)
-        if a then
-            return b
-        elseif MSG then
-            MSG.traceback()
-        end
-    end
-end
 
 -- Pure lua modules (complex, with update/draw)
 LANG=       require'Zenitha.languages'