/[emacs]/emacs/lisp/gnus/gnus-srvr.el
ViewVC logotype

Diff of /emacs/lisp/gnus/gnus-srvr.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.9 by miles, Tue Sep 18 01:04:37 2001 UTC revision 1.9.8.1 by miles, Fri Apr 4 06:20:20 2003 UTC
# Line 138  The following specs are understood: Line 138  The following specs are understood:
138    
139      "n" next-line      "n" next-line
140      "p" previous-line      "p" previous-line
141        
142      "g" gnus-server-regenerate-server      "g" gnus-server-regenerate-server
143    
144      "\C-c\C-i" gnus-info-find-node      "\C-c\C-i" gnus-info-find-node
# Line 607  The following commands are available: Line 607  The following commands are available:
607            (goto-char (point-min))            (goto-char (point-min))
608            (unless (string= gnus-ignored-newsgroups "")            (unless (string= gnus-ignored-newsgroups "")
609              (delete-matching-lines gnus-ignored-newsgroups))              (delete-matching-lines gnus-ignored-newsgroups))
610            (while (not (eobp))            (while (not (eobp))
611              (ignore-errors              (ignore-errors
612                (push (cons                (push (cons
613                       (if (eq (char-after) ?\")                       (if (eq (char-after) ?\")
614                           (read cur)                           (read cur)
615                         (let ((p (point)) (name ""))                         (let ((p (point)) (name ""))
# Line 758  buffer. Line 758  buffer.
758                     nil nil (if (gnus-server-equal                     nil nil (if (gnus-server-equal
759                                  gnus-browse-current-method "native")                                  gnus-browse-current-method "native")
760                                 nil                                 nil
761                               (gnus-method-simplify                               (gnus-method-simplify
762                                gnus-browse-current-method)))                                gnus-browse-current-method)))
763               gnus-level-default-subscribed gnus-level-killed               gnus-level-default-subscribed gnus-level-killed
764               (and (car (nth 1 gnus-newsrc-alist))               (and (car (nth 1 gnus-newsrc-alist))

Legend:
Removed from v.1.9  
changed lines
  Added in v.1.9.8.1

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26