[emacs-wiki-discuss] Should links to gnus draft messages work?

[johnsu01]

Links created from gnus draft messages don't seem to be ones that I can
actually follow. Is this a known limit? The link that is created looks like:

[[gnus://nndraft:drafts/fake+none+2][E-Mail from John Sullivan]]

And when I try to follow it I get the backtrace below.

Ok, so I upgraded planner up through patch-411. 

Now I get links that look like:

[[gnus://nndraft:drafts/][E-Mail from address@hidden

And when I try to follow that, nothing happens at all. Since there isn't a
message to jump to, looks like.

Both are with emacs-wiki up through patch-82.

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 ... ...)) (gnus-fetch-group group
  planner-gnus-group-threshold) (mapcar (lambda ... ...) (split-string articles
  "\\\\|")) (let (...) (gnus-summary-limit articles)
  (gnus-summary-select-article)) t) (progn (let (... ...) (when ... ...)
  (gnus-fetch-group group planner-gnus-group-threshold) (mapcar ... ...) (let
  ... ... ...) t)) (if (string-match "^gnus://\\(.+\\)/\\(.+\\)" url) (progn
  (let ... ... ... ... ... t))) (when (string-match "^gnus://\\(.+\\)/\\(.+\\)"
  url) (let (... ...) (when ... ...) (gnus-fetch-group group
  planner-gnus-group-threshold) (mapcar ... ...) (let ... ... ...) t))
  planner-gnus-browse-url("gnus://nndraft:drafts/fake+none+2")
  funcall(planner-gnus-browse-url "gnus://nndraft:drafts/fake+none+2") (progn
  (funcall (cadr entry) url)) (if entry (progn (funcall ... url))) (when entry
  (funcall (cadr entry) url)) (let ((entry ...)) (when entry (funcall
  ... url))) (progn (let (...) (when entry ...)))  (if (string-match
  emacs-wiki-url-regexp url) (progn (let ... ...)))  (when (string-match
  emacs-wiki-url-regexp url) (let (...) (when entry ...)))
  emacs-wiki-browse-url("gnus://nndraft:drafts/fake+none+2" nil) (if
  (emacs-wiki-wiki-url-p link) (emacs-wiki-browse-url link other-window) (let*
  (... ... ... ... ... ... ... ... ... ...) (when tag ... ...) (when
  refresh-buffer ... ...)))  (let ((link ...)) (if (emacs-wiki-wiki-url-p link)
  (emacs-wiki-browse-url link other-window) (let* ... ... ...)))
  emacs-wiki-visit-link("[[gnus://nndraft:drafts/fake+none+2][E-Mail from John
  Sullivan]]" nil nil) (if (emacs-wiki-link-at-point) (emacs-wiki-visit-link
  (match-string-no-properties 0) buf other-window) (error "There is no valid
  link at point")) (let (buf) (when (eq ... ...) (setq buf ...)) (if
  (emacs-wiki-link-at-point) (emacs-wiki-visit-link ... buf other-window)
  (error "There is no valid link at point")))
  emacs-wiki-follow-name-at-point(nil)
  call-interactively(emacs-wiki-follow-name-at-point)

-- 
-johnsu01
-http://www.wjsullivan.net