nowiki added by mario-goulart on Tue Sep 20 14:48:47 2011

$ cat paypal.html
<form action="https://www.paypal.com/cgi-bin/webscr" method="post">
<input type="hidden" name="cmd" value="_s-xclick">
<input type="hidden" name="hosted_button_id" value="A6QA7V2SJWJ8W">
<input type="image" src="https://www.paypalobjects.com/en_US/i/btn/btn_donate_LG.gif" border="0" name="submit" alt="PayPal - The safer, easier way to pay online!">
<img alt="" border="0" src="https://www.paypalobjects.com/pt_BR/i/scr/pixel.gif" width="1" height="1">
</form>


csi> (with-input-from-file "paypal.html" (lambda () (pp (html->sxml (current-input-port)))))
(*TOP* (form (@ (action "https://www.paypal.com/cgi-bin/webscr")
                (method "post"))
             "\n"
             (input (@ (type "hidden") (name "cmd") (value "_s-xclick"))
                    "\n"
                    (input (@ (type "hidden")
                              (name "hosted_button_id")
                              (value "A6QA7V2SJWJ8W"))
                           "\n"
                           (input (@ (type "image")
                                     (src "https://www.paypalobjects.com/en_US/i/btn/btn_donate_LG.gif")
                                     (border "0")
                                     (name "submit")
                                     (alt "PayPal - The safer, easier way to pay online!"))
                                  "\n"
                                  (img (@ (alt "")
                                          (border "0")
                                          (src "https://www.paypalobjects.com/pt_BR/i/scr/pixel.gif")
                                          (width "1")
                                          (height "1")))
                                  "\n"))
                    (input (@ (type "image")
                              (src "https://www.paypalobjects.com/en_US/i/btn/btn_donate_LG.gif")
                              (border "0")
                              (name "submit")
                              (alt "PayPal - The safer, easier way to pay online!"))
                           "\n"))))


What is generated for the wiki HTML page:

<form action="https://www.paypal.com/cgi-bin/webscr" method="post">
<input type="hidden" name="cmd" value="_s-xclick">
<input type="hidden" name="hosted_button_id" value="A6QA7V2SJWJ8W">
<input type="image" src="https://www.paypalobjects.com/en_US/i/btn/btn_donate_LG.gif" border="0" name="submit" alt="PayPal - The safer, easier way to pay online!">
<img alt="" border="0" src="https://www.paypalobjects.com/pt_BR/i/scr/pixel.gif" width="1" height="1" /></input></input>
<input type="image" src="https://www.paypalobjects.com/en_US/i/btn/btn_donate_LG.gif" border="0" name="submit" alt="PayPal - The safer, easier way to pay online!" /></input></form>