[emacs-wiki-discuss] [bug #5234] planner-gnus pseudo-article error

[John Sullivan]

URL:
  <http://gna.org/bugs/?func=detailitem&item_id=5234>

                 Summary: planner-gnus pseudo-article error
                 Project: Planner.el and related modules
            Submitted by: johnsu01
            Submitted on: Friday 02/10/2006 at 06:50
                Category: None
                Priority: 1 - Later
                Severity: 3 - Normal
                  Status: None
                 Privacy: Public
             Assigned to: None
        Originator Email: 
             Open/Closed: Open

    _______________________________________________________

Details:

I'm getting this backtrace when I try to follow a link to a message in Gnus.
Emacs 22.0.50.1, Planner from arch and Muse main.


Debugger entered--Lisp error: (error "This is a pseudo-article")
  signal(error ("This is a pseudo-article"))
  error("This is a pseudo-article")
  gnus-summary-select-article()
  (let ((articles ...)) (gnus-summary-limit articles)
(gnus-summary-select-article))
  (let ((group ...) (articles ...)) (when (featurep ...) (let ... ...))
(condition-case err (gnus-fetch-group group planner-gnus-group-threshold)
(error ...)) (mapcar (lambda ... ...) (split-string articles "\\\\|")) (let
(...) (gnus-summary-limit articles) (gnus-summary-select-article)) t)
  (progn (let (... ...) (when ... ...) (condition-case err ... ...) (mapcar
... ...) (let ... ... ...) t))
  (if (string-match "\\`gnus://\\(.+\\)/\\(.+\\)" url) (progn (let ... ...
... ... ... t)))
  (when (string-match "\\`gnus://\\(.+\\)/\\(.+\\)" url) (let (... ...) (when
... ...) (condition-case err ... ...) (mapcar ... ...) (let ... ... ...) t))
 
planner-gnus-browse-url("gnus://nnml:inbox/<address@hidden>")
  funcall(planner-gnus-browse-url
"gnus://nnml:inbox/<address@hidden>")
  (progn (funcall (cadr entry) url))
  (if entry (progn (funcall ... url)))
  (when entry (funcall (cadr entry) url))
  (let* ((proto ...) (entry ...)) (when entry (funcall ... url)))
  (progn (let* (... ...) (when entry ...)))
  (if (string-match muse-url-regexp url) (progn (let* ... ...)))
  (when (string-match muse-url-regexp url) (let* (... ...) (when entry
...)))
  muse-browse-url("gnus://nnml:inbox/<address@hidden>" nil)
  (if (string-match muse-url-regexp link) (muse-browse-url link other-window)
(let* (... ... ... ...) (if ... ... ...) (when tag ... ...)))
  (let ((link ...)) (if (string-match muse-url-regexp link) (muse-browse-url
link other-window) (let* ... ... ...)))
  planner-visit-link("gnus://nnml:inbox/<address@hidden>"
nil)
  funcall(planner-visit-link
"gnus://nnml:inbox/<address@hidden>" nil)
  (if visit-link-function (funcall visit-link-function link other-window)
(muse-visit-link-default link other-window))
  (let ((visit-link-function ...)) (if visit-link-function (funcall
visit-link-function link other-window) (muse-visit-link-default link
other-window)))
  muse-visit-link("gnus://nnml:inbox/<address@hidden>" nil)
  (if link (muse-visit-link link other-window) (error "There is no valid link
at point"))
  (let ((link ...)) (if link (muse-visit-link link other-window) (error
"There is no valid link at point")))
  muse-follow-name-at-point(nil)
  call-interactively(muse-follow-name-at-point)







    _______________________________________________________

Reply to this item at:

  <http://gna.org/bugs/?func=detailitem&item_id=5234>

_______________________________________________
  Message sent via/by Gna!
  http://gna.org/