fixed some redis commands; fixed bindAddr and scgi now doesn't bind to all addresses. copy and delete for json module.

1 files changed, 29 insertions, 0 deletions

diff --git a/lib/pure/json.nim b/lib/pure/json.nim
index 75958a55f..adb7e5e8b 100755
--- a/lib/pure/json.nim
+++ b/lib/pure/json.nim
@@ -606,6 +606,35 @@ proc `[]=`*(obj: PJsonNode, key: String, val: PJsonNode) =
       return
   obj.fields.add((key, val))
 
+proc delete*(obj: PJsonNode, key: string) =
+  assert(obj.kind == JObject)
+  for i in 0..obj.fields.len-1:
+    if obj.fields[i].key == key:
+      obj.fields.delete(i)
+      return
+  raise newException(EInvalidIndex, "key not in object")
+
+proc copy*(p: PJsonNode): PJsonNode =
+  case p.kind
+  of JString:
+    result = newJString(p.str)
+  of JInt:
+    result = newJInt(p.num)
+  of JFloat:
+    result = newJFloat(p.fnum)
+  of JBool:
+    result = newJBool(p.bval)
+  of JNull:
+    result = newJNull()
+  of JObject:
+    result = newJObject()
+    for key, field in items(p.fields):
+      result.fields.add((key, copy(field)))
+  of JArray:
+    result = newJArray()
+    for i in items(p.elems):
+      result.elems.add(copy(i))
+
 # ------------- pretty printing ----------------------------------------------
 
 proc indent(s: var string, i: int) =