pG0.65: Error when trying to display an html part

[Jean-Yves Perrier <perrier@nagra-kudelski.ch>]

Hello,

I got the following with one of the message I received
(a multipart alternative: text - html, with html as the
default display)

Pterodactyl Gnus v0.65 WWW 4.0pre.32, URL p4.0pre.32, MM 1.96
on Emacs 20.3

Here is the backtrace:
Signaling: (wrong-type-argument stringp nil)
  string-match("^#" nil)
  font-color-rgb-components(nil)
  w3-display-background-useless-p("#ffffff")
  w3-display-node((*document nil ((html nil ...))))
  w3-draw-tree(((*document nil (...))))
  byte-code("..." [source parse st nd widget glyph get-buffer-create " *w3-region*" erase-buffer w3-parse-buffer w3-draw-tree nil widget-get assoc (widget-value-set widget glyph) ((error)) 6 push-mark t w3-find-specific-link device-type tty w3-fixup-eol-faces message "Drawing... done" url w3-image-widgets-waiting :src w3-graphics-list url-current-object w3-running-xemacs] 3)
  w3-region(1194 3923)
  byte-code("..." [width w3-strict-width w3-region] 3)
  mm-inline-text((#<buffer  *mm*<2>> ("text/html" (charset . "iso-8859-1")) quoted-printable nil nil nil nil))
  mm-display-inline((#<buffer  *mm*<2>> ("text/html" (charset . "iso-8859-1")) quoted-printable nil nil nil nil))
  mm-display-part((#<buffer  *mm*<2>> ("text/html" (charset . "iso-8859-1")) quoted-printable nil nil nil nil))
  byte-code("..." [ibegend handles begend preferred ihandles not-pref 2 mm-remove-parts point-marker gnus-unbuttonized-mime-type-p "multipart/alternative" gnus-add-text-properties format "%d.  " gnus-callback lambda (handles) unless setq gnus-article-mime-handle-alist quote gnus-mime-display-alternative local-map face keymap gnus-part gnus-data widget-convert-button link gnus-widget-press-button "(%c) %-18s" 42 32 (handles) "  " "\n\n" gnus-display-mime mm-display-part from id gnus-mime-button-map gnus-mouse-face-prop gnus-article-mouse-face gnus-article-button-face handle :action :button-keymap gnus-widget-button-keymap gnus-newsgroup-default-charset gnus-newsgroup-iso-8859-1-forced] 17)
  gnus-mime-display-alternative(((#<buffer  *mm*> ("text/plain" ...) 8bit nil nil nil nil) (#<buffer  *mm*<2>> ("text/html" ...) quoted-printable nil nil nil nil)) nil nil 1)
  gnus-mime-display-part(("multipart/alternative" (#<buffer  *mm*> ("text/plain" ...) 8bit nil nil nil nil) (#<buffer  *mm*<2>> ("text/html" ...) quoted-printable nil nil nil nil)))
  gnus-display-mime()
  gnus-article-prepare-display()
  gnus-article-prepare(116 nil)
  gnus-summary-display-article(116 nil)
  gnus-summary-select-article(nil nil pseudo)
  gnus-summary-scroll-up(1)
  call-interactively(gnus-summary-scroll-up)
  recursive-edit()
  byte-code("..." [debugger-buffer print-length print-escape-newlines standard-output debugger-args debugger-value pop-to-buffer erase-buffer set-buffer-multibyte nil t 50 backtrace debugger-mode search-forward "\n  debug(" 1 debugger-reenable (lambda debug) "Entering:\n" debug backtrace-debug 3 delete-char 42 0 exit "Return value: " prin1 10 32 error "Signaling: " "Beginning evaluation of function call form:\n" message "" recursive-edit buffer-read-only inhibit-trace] 3)
  debug(error (wrong-type-argument stringp nil))
  string-match("^#" nil)
  font-color-rgb-components(nil)
  w3-display-background-useless-p("#ffffff")
  w3-display-node((*document nil ((html nil ...))))
  w3-draw-tree(((*document nil (...))))
  byte-code("..." [source parse st nd widget glyph get-buffer-create " *w3-region*" erase-buffer w3-parse-buffer w3-draw-tree nil widget-get assoc (widget-value-set widget glyph) ((error)) 6 push-mark t w3-find-specific-link device-type tty w3-fixup-eol-faces message "Drawing... done" url w3-image-widgets-waiting :src w3-graphics-list url-current-object w3-running-xemacs] 3)
  w3-region(1194 3923)
  byte-code("..." [width w3-strict-width w3-region] 3)
  mm-inline-text((#<killed buffer> ("text/html" (charset . "iso-8859-1")) quoted-printable nil nil nil nil))
  mm-display-inline((#<killed buffer> ("text/html" (charset . "iso-8859-1")) quoted-printable nil nil nil nil))
  mm-display-part((#<killed buffer> ("text/html" (charset . "iso-8859-1")) quoted-printable nil nil nil nil))
  byte-code("..." [ibegend handles begend preferred ihandles not-pref 2 mm-remove-parts point-marker gnus-unbuttonized-mime-type-p "multipart/alternative" gnus-add-text-properties format "%d.  " gnus-callback lambda (handles) unless setq gnus-article-mime-handle-alist quote gnus-mime-display-alternative local-map face keymap gnus-part gnus-data widget-convert-button link gnus-widget-press-button "(%c) %-18s" 42 32 (handles) "  " "\n\n" gnus-display-mime mm-display-part from id gnus-mime-button-map gnus-mouse-face-prop gnus-article-mouse-face gnus-article-button-face handle :action :button-keymap gnus-widget-button-keymap gnus-newsgroup-default-charset gnus-newsgroup-iso-8859-1-forced] 17)
  gnus-mime-display-alternative(((#<killed buffer> ("text/plain" ...) 8bit nil nil nil nil) (#<killed buffer> ("text/html" ...) quoted-printable nil nil nil nil)) nil nil 1)
  gnus-mime-display-part(("multipart/alternative" (#<killed buffer> ("text/plain" ...) 8bit nil nil nil nil) (#<killed buffer> ("text/html" ...) quoted-printable nil nil nil nil)))
  gnus-display-mime()
  gnus-article-prepare-display()
  gnus-article-prepare(116 nil)
  gnus-summary-display-article(116 nil)
  gnus-summary-select-article(nil nil pseudo)
  gnus-summary-scroll-up(1)
  call-interactively(gnus-summary-scroll-up)

Regards,
-- 
Jean-Yves