diff options
author | Lars Magne Ingebrigtsen <larsi@gnus.org> | 2010-09-06 00:41:06 +0000 |
---|---|---|
committer | Katsumi Yamaoka <yamaoka@jpl.org> | 2010-09-06 00:41:06 +0000 |
commit | 29cd986b8bfa26321f4da05fcb8f245c8cce3fa8 (patch) | |
tree | fc044cc044691093e282bea32552b24f53ada6ba | |
parent | 29d31b5515f82d76050786891042bf0c0441b88e (diff) | |
download | emacs-29cd986b8bfa26321f4da05fcb8f245c8cce3fa8.tar.gz |
gnus-html.el (gnus-article-html): Allow calling without specifying the handle. In that case, dissect the buffer first.
-rw-r--r-- | lisp/gnus/ChangeLog | 3 | ||||
-rw-r--r-- | lisp/gnus/gnus-html.el | 4 |
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/gnus/ChangeLog b/lisp/gnus/ChangeLog index 6a02792642d..742ffb5ec16 100644 --- a/lisp/gnus/ChangeLog +++ b/lisp/gnus/ChangeLog @@ -1,5 +1,8 @@ 2010-09-05 Lars Magne Ingebrigtsen <larsi@gnus.org> + * gnus-html.el (gnus-article-html): Allow calling without specifying + the handle. In that case, dissect the buffer first. + * gnus-sum.el (gnus-set-mode-line): Don't pad the mode line string. * nnimap.el (nnimap-open-connection): Revert the change that would look diff --git a/lisp/gnus/gnus-html.el b/lisp/gnus/gnus-html.el index a298fa0b63a..3b7d2527c99 100644 --- a/lisp/gnus/gnus-html.el +++ b/lisp/gnus/gnus-html.el @@ -73,8 +73,10 @@ fit these criteria." map)) ;;;###autoload -(defun gnus-article-html (handle) +(defun gnus-article-html (&optional handle) (let ((article-buffer (current-buffer))) + (unless handle + (setq handle (mm-dissect-buffer t))) (save-restriction (narrow-to-region (point) (point)) (save-excursion |