Re: w3 rendering

[Eric Marsden <emarsden@mail.dotcom.fr>]

>>>>> "lmi" == Lars Magne Ingebrigtsen <larsi@gnus.org> writes:

  lmi> 1. nnultimate calls w3-parse-buffer
  lmi> 2. nnultimate finds the <td> cell in the parsed tree
  lmi> 3. nnultimate wants to insert that HTML into the article bufffer so that
  lmi> 4. Gnus can let the text/html handler (i.e., w3) render it

I don't know if this helps ... see also `w3-display-parse-tree'.
  
   (defun nnultimate-w3-subtree (tree)
     (when (listp tree)
       (cond ((eq 'td (car tree))
              ;; it's (td nil ((p nil ("data"))))
              (insert (format "%s\n" (caaddr (caaddr tree)))))
             ((listp (cdr tree))
              (mapcar #'nnultimate-w3-subtree tree)))))
   
   (defun nnultimate-w3-test ()
     (let ((source (get-buffer-create " *nnultimate-w3*"))
           (parsed (get-buffer-create " *nnultimate-parse*"))
           parse-tree)
       (switch-to-buffer source)
       (erase-buffer)
       (url-insert-file-contents "http://www.laas.fr/~emarsden/td-test.html")
       (setq parse-tree (w3-parse-buffer source))
       (switch-to-buffer parsed)
       (erase-buffer)
       (while parse-tree
         (nnultimate-w3-subtree (car parse-tree))
         (setq parse-tree (cdr parse-tree)))))

-- 
Eric Marsden
It's elephants all the way down