--- a/json.ur	Thu Dec 02 11:59:55 2010 -0500
+++ b/json.ur	Thu Dec 02 12:17:51 2010 -0500
@@ -243,7 +243,7 @@
                            error <xml>JSON record doesn't begin with brace</xml>
                        else
                            let
-                               val (r, s') = fromJ (String.substring s {Start = 1, Len = String.length s - 1})
+                               val (r, s') = fromJ (skipSpaces (String.substring s {Start = 1, Len = String.length s - 1}))
                                                    (@map0 [option] (fn [t ::_] => None) fl)
                            in
                                (@map2 [option] [fn _ => string] [id] (fn [t] (v : option t) name =>