Štěpán Němec <[email protected]> wrote:

>> That works fine when I type C-u C-u g, however when I run

>> | M-: (gnus-summary-show-article 16) RET

>> I get prompted "View as charset:" which somewhat defeats the
>> purpose of automation.

>> Any advice for that?

> (gnus-summary-show-article 16) ≊ C-u 16 g

> C-u C-u g ≊ (gnus-summary-show-article '(16))

> Cf. (info "(elisp)Prefix Command Arguments")

Ah!  With that, something like:

| (defun tl-ab2nb nil
|   (interactive)
|   (gnus-summary-show-article '(16))
|   (gnus-summary-select-article-buffer)
|   (article-goto-body)
|   (copy-to-buffer (generate-new-buffer "article body") (point) (point-max)))

works nicely.  (Only nitpick: Gnus adds a trailing newline,
i. e. the function above applied to a mail generated by
"echo echo Test | at now" produces a buffer with
"Test\n\n".)

Thanks,
Tim

_______________________________________________
info-gnus-english mailing list
[email protected]
https://lists.gnu.org/mailman/listinfo/info-gnus-english

Reply via email to