Suggestion: to problem nndraft "Can't select group"

[<jari.aalto@poboxes.com> (Jari Aalto+list.ding)]

[-- Attachment #1: Type: text/plain, Size: 623 bytes --]


    Hi,

    I posted before question why I couldn't select nndraft group which did
    contain articles if I looked into directory. The server was open, the
    path was okay, but still I got message

        Can't select group

    After lot of Edebugging, i found out that I was missing entry

        (display . all)

    from the Group parameters. After I put it there, the articles were read
    and I could access nndraft. I think it would be good idea to add that
    group parameter by default in the nndraft groups so that user don't get
    confused about the misleding "Can't select group" message.

    jari


[-- Attachment #2: Type: text/plain, Size: 1885 bytes --]


THE INITIAL SITUATION

              (gnus-select-newsgroup "nndraft:drafts" t)
                gnus-articles-to-read
              --> Can't select group

    gnus-select-newsgroup called gnus-articles-to-read but it didn't find
    anything. cond statement in gnus-articles-to-read triggered 0, thus
    returning nil back, and hence error message


(defun gnus-select-newsgroup (group &optional read-all select-articles)
    ;; Adjust and set lists of article marks.
    (when info
      (gnus-adjust-marked-articles info))

info --> ("nndraft:drafts" 1 nil nil (nndraft "") ((timestamp 13711 39412) (expiry-wait . 5) (total-expire . t) (gnus-dummy (gnus-draft-mode))))

    (if (setq articles select-articles)
        (setq gnus-newsgroup-unselected
              (gnus-sorted-intersection
               gnus-newsgroup-unreads
               (gnus-sorted-complement gnus-newsgroup-unreads articles)))
      (setq articles (gnus-articles-to-read group read-all)))


    (if (setq articles select-articles)
--> nil 
      (setq articles (gnus-articles-to-read group read-all)))
--> 0

and later the cond statement in gnus-select-newsgroup

     ((eq articles 0) nil)


(defun gnus-articles-to-read (group &optional read-all)
  ;; Find out what articles the user wants to read.
  (let* ((articles
          ;; Select all articles if `read-all' is non-nil, or if there
          ;; are no unread articles.
          (if (or read-all
                  (and (zerop (length gnus-newsgroup-marked))
--> '(19)       
                       (zerop (length gnus-newsgroup-unreads)))
--> nil

        articles
--> nil 


AFTER I PUT (display . all) TO GROUP PARAMETER    


info --> ("nndraft:drafts" 1 ((1 . 133) 135 (137 . 140) (142 . 143) (145 . 155) (157 . 163) (165 . 170)) nil (nndraft "") ((timestamp 13806 46863) (expiry-wait . 5) (total-expire . t) (gnus-dummy (gnus-draft-mode))))