Comments on: Simple HTML Grid widget – part 2

By: Danny Yoo

Danny Yoo — Mon, 09 Jul 2007 20:02:49 +0000

There are a few more libraries in mzscheme that you can use to dissolve a bit of the code you have there. In particular, the uri-codec.ss library in the net collection handles URI encoding stuff:



  (require (lib "uri-codec.ss" "net"))
  
  (parameterize ([current-alist-separator-mode 'amp])
    (display (alist->form-urlencoded
              '((name . "Danny")
                (email . "dyoo@cs.wpi.edu")))))

For the HTML generation, you may want to look at the xml.ss library in the xml package. I wrote a small example using it here.

By: IanO

IanO — Thu, 05 Jul 2007 19:36:39 +0000

Hi Kyle,

Thanks for the comment. When I entered the article, I had escaped the + symbol with backslashes but WordPress seems to have selectively eaten my backslashes (it hasn’t got them all!). It also broke the carriage return encoding. Let me try updating the article to see if that fixes it.

Cheers,

Ian

By: Kyle Smith

Kyle Smith — Thu, 05 Jul 2007 13:08:55 +0000

Hi IanO, Excellent post. I found a small problem with the regexp in data-decode, nothing big. Here is my corrected version:


(define (data-decode data)
  (let ((i (open-input-bytes
            (base64-decode
             (string->bytes/utf-8
              (encode-chars "[+]." data)))))
        (o (open-output-string)))
    (inflate i o)
    (get-output-string o)))

Here is the output:


Welcome to DrScheme, version 370.3-svn9jun2007 [3m].
Language: SchemeKeys.
Content-type: text/html; charset=iso-8859-1

next page
Restart
(("Task" "Monday" "Tuesday" "Wednesday") ("Cooking" "1hr" "1hr" "2hrs"))

Is this what you had in mind? Take care, --kyle