Re: Browsing to original article in gwene?

[Memnon Anon]

William Gardella <gardellawg@gmail.com>
writes:

> It would also be pretty trivial as a proper Lisp function.

Something like this?

#+begin_src emacs-lisp
(defun my-gnus-browse-gwene ()
"Start a browser for current gwene article"
  (interactive)
  (dolist (buf (buffer-list))
    (with-current-buffer buf
      (when (eq major-mode 'gnus-article-mode)
        (gnus-summary-show-article '(4))
        (switch-to-buffer buf)
        (goto-char (point-min))
        (re-search-forward "^Archived-at: <\\(.*\\)>$")
        (browse-url (match-string 1))
        (gnus-summary-show-article)))))
#+end_src

Memnon