couple bugs

[dherman]

Hi Dave,

I've been using said library a great deal for AJAX code and the like - very useful indeed. I found a couple of bugs a while back, patched them and forgot to tell you about it. Here are the diffs and my modified version of json.ss.

Cheers!

-- Dave

===== Diffs (my code on the left) =====

24c24
<     [(or (string? json) (and (number? json) (or (integer? json) (inexact? json))))
---
>     [(or (integer? json) (inexact? json) (string? json))
155,157c155
<                                                    (define char (peek-char port))
<                                                    (or (eof-object? char)
<                                                        (not (char-numeric? char)))))])
---
>                                                    (not (char-numeric? (peek-char port)))))])

=======================================

[dherman]

Fixed a long time ago in 1:1, I think.