#lang scribble/doc
@(require scribble/manual)

@title{HTTP DOM parser}

@scheme[(require (planet synx/html-dom))]
@scheme[(let ((dom (produce-dom)))
          (for-each
           (lambda (a)
             (display
              (format "Link: ~a~n" (send a get-attr 'href))))
           (send dom find-all (lambda (e) (is-element? e 'a)))))]

@scheme[(require (planet synx/html-dom/parser))]
@scheme[(let ([parser (make-parser ...everything like foof's parser, pretty much)]))]