Signaling: (wrong-type-argument integer-or-marker-p nil) narrow-to-region(# nil) (progn (narrow-to-region (car ibegend) (cdr ibegend)) (delete-region (point-min) (point-max)) (mm-remove-parts handles)) (if ibegend (progn (narrow-to-region ... ...) (delete-region ... ...) (mm-remove-parts handles))) (when ibegend (narrow-to-region (car ibegend) (cdr ibegend)) (delete-region (point-min) (point-max)) (mm-remove-parts handles)) (save-restriction (when ibegend (narrow-to-region ... ...) (delete-region ... ...) (mm-remove-parts handles)) (setq begend (list ...)) (unless (setq not-pref ...) (setq not-pref ...)) (gnus-add-text-properties (setq from ...) (progn ... ...) (\` ...)) (widget-convert-button (quote link) from (point) :action (quote gnus-widget-press-button) :button-keymap gnus-widget-button-keymap) (while (setq handle ...) (gnus-add-text-properties ... ... ...) (widget-convert-button ... from ... :action ... :button-keymap gnus-widget-button-keymap) (insert " ")) (insert "\n\n") (when preferred (if ... ... ... ...) (setcdr begend ...))) (let* ((preferred ...) (ihandles handles) (point ...) handle buffer-read-only from props begend not-pref) (save-restriction (when ibegend ... ... ...) (setq begend ...) (unless ... ...) (gnus-add-text-properties ... ... ...) (widget-convert-button ... from ... :action ... :button-keymap gnus-widget-button-keymap) (while ... ... ... ...) (insert "\n\n") (when preferred ... ...)) (when ibegend (goto-char point))) gnus-mime-display-alternative(((# ("text/unknown") nil nil nil nil) (#> ("text/unknown") nil nil nil nil)) (# ("text/unknown") nil nil nil nil) (#) 1) (lambda (handles) (gnus-mime-display-alternative (quote ...) (quote ...) (quote ...) 1))((# ("text/unknown") nil nil nil nil)) gnus-article-press-button() * call-interactively(gnus-article-press-button)