gnus open RSS link in W3M?

gnus open RSS link in W3M?

[lance]

Hey all,

Another question.  I have a RSS Feed that goes to the WWW.RSSWEATHER.COM 
website.  GNUS keeps putting all the information into a link.  How do I 
get gnus to open up the feed in W3M instead of giving me a link?

lance


-- 

                                Lance Hoffmeyer
                              lance@augustmail.com

-------------------------------------------------------------------------------
          The natural progress of things is for liberty to yield and
                          governments to gain ground.
                                       -
                                Thomas Jefferson

Re: gnus open RSS link in W3M?

[lance]

Guido Van Hoecke <Guido@VanHoecke.org> writes:

;From Info, RSS I added the following to my .gnus file:

(require 'browse-url)
 (defun browse-nnrss-url( arg )
       (interactive "p")
       (let ((url (assq nnrss-url-field
                        (mail-header-extra
                         (gnus-data-header
                          (assq (gnus-summary-article-number)
                                gnus-newsgroup-data))))))
         (if url
             (progn
               (browse-url (cdr url))
               (gnus-summary-mark-as-read-forward 1))
           (gnus-summary-scroll-up arg))));

     (eval-after-load "gnus"
       #'(define-key gnus-summary-mode-map
           (kbd "<RET>") 'browse-nnrss-url))
     (add-to-list 'nnmail-extra-headers nnrss-url-field)

and get the error:

Debugger entered--Lisp error: (wrong-number-of-arguments require 3)
  (require (quote w3-auto) nil t)
  (progn (require (quote thingatpt)) (require (quote term)) (require (quote dired)) (require (quote executable)) (require (quote w3-auto) nil t))
  (eval-when-compile (require (quote thingatpt)) (require (quote term)) (require (quote dired)) (require (quote executable)) (require (quote w3-auto) nil t))
  load-internal("browse-url" nil t nil undecided)
  load("browse-url" nil t nil)
  require(browse-url)
  load-internal("~/.gnus" nil t nil undecided)
  load("~/.gnus" nil t)
  gnus-read-init-file()
  gnus-1(nil nil nil)
  gnus()
  #<compiled-function nil "...(49)" [toolbar-news-frame-plist toolbar-news-use-separate-frame toolbar-news-frame gnus frame-live-p make-frame add-hook gnus-exit-gnus-hook #<compiled-function nil "...(18)" ... 2> select-frame framep frame-iconified-p deiconify-frame raise-frame] 3 1089222 nil>()
  call-interactively(toolbar-gnus)
  #<compiled-function nil "...(27)" [toolbar-news-commands-alist toolbar-news-reader command error "Unknown news reader %s" call-interactively eval] 4 1089267 nil>()
  call-interactively(toolbar-news)
  release-and-activate-toolbar-button(#<buttonup-event button1up>)
  call-interactively(release-and-activate-toolbar-button)
  recursive-edit()
  byte-code("..." [buffer-read-only noninteractive debugger-buffer middlestart debugger-args debugger-batch-max-lines pop-to-buffer debugger-mode debugger-setup-buffer count-lines 2 "...\n" message buffer-string kill-emacs debug backtrace-debug 3 t debugger-reenable "" nil recursive-edit standard-output] 3)
  debug(error (wrong-number-of-arguments require 3))
  (require (quote w3-auto) nil t)
  (progn (require (quote thingatpt)) (require (quote term)) (require (quote dired)) (require (quote executable)) (require (quote w3-auto) nil t))
  (eval-when-compile (require (quote thingatpt)) (require (quote term)) (require (quote dired)) (require (quote executable)) (require (quote w3-auto) nil t))
  load-internal("browse-url" nil t nil undecided)
  load("browse-url" nil t nil)
  require(browse-url)
  load-internal("~/.gnus" nil t nil undecided)
  load("~/.gnus" nil t)
  gnus-read-init-file()
  gnus-1(nil nil nil)
  gnus()
  #<compiled-function nil "...(49)" [toolbar-news-frame-plist toolbar-news-use-separate-frame toolbar-news-frame gnus frame-live-p make-frame add-hook gnus-exit-gnus-hook #<compiled-function nil "...(18)" ... 2> select-frame framep frame-iconified-p deiconify-frame raise-frame] 3 1089222 nil>()
  call-interactively(toolbar-gnus)
  #<compiled-function nil "...(27)" [toolbar-news-commands-alist toolbar-news-reader command error "Unknown news reader %s" call-interactively eval] 4 1089267 nil>()
  call-interactively(toolbar-news)
  release-and-activate-toolbar-button(#<buttonup-event button1up>)
  call-interactively(release-and-activate-toolbar-button)
  recursive-edit()
  byte-code("..." [buffer-read-only noninteractive debugger-buffer middlestart debugger-args debugger-batch-max-lines pop-to-buffer debugger-mode debugger-setup-buffer count-lines 2 "...\n" message buffer-string kill-emacs debug backtrace-debug 3 t debugger-reenable "" nil recursive-edit standard-output] 3)
  debug(error (wrong-type-argument window-live-p #<window on nil 0x9d3>))
  select-window(#<window on nil 0x9d3>)
  byte-code("..." [curwin select-window] 2)
  throw(top-level nil)
  #<compiled-function nil "...(5)" [throw top-level nil] 3 672656 nil>()
  call-interactively(top-level)
  recursive-edit()
  byte-code("..." [buffer-read-only noninteractive debugger-buffer middlestart debugger-args debugger-batch-max-lines pop-to-buffer debugger-mode debugger-setup-buffer count-lines 2 "...\n" message buffer-string kill-emacs debug backtrace-debug 3 t debugger-reenable "" nil recursive-edit standard-output] 3)
  debug(error (beginning-of-buffer))
  scroll-down(5)
  mwheel-scroll(#<buttonup-event button4up>)
  call-interactively(mwheel-scroll)


> lance <lance@mail.augustmail.com> writes:
>
>> Hey all,
>>
>> Another question.  I have a RSS Feed that goes to the WWW.RSSWEATHER.COM 
>> website.  GNUS keeps putting all the information into a link.  How do I 
>> get gnus to open up the feed in W3M instead of giving me a link?
>
> The RSS node in the gnus info manual gives a recipe to achieve this.
>
> Guido.

-- 

                                Lance Hoffmeyer
                              lance@augustmail.com

-------------------------------------------------------------------------------
          The natural progress of things is for liberty to yield and
                          governments to gain ground.
                                       -
                                Thomas Jefferson