Synch with Oort Gnus.
authoryamaoka <yamaoka>
Mon, 15 Oct 2001 04:29:33 +0000 (04:29 +0000)
committeryamaoka <yamaoka>
Mon, 15 Oct 2001 04:29:33 +0000 (04:29 +0000)
20 files changed:
GNUS-NEWS
lisp/ChangeLog
lisp/dig.el
lisp/gnus-art.el
lisp/gnus-cache.el
lisp/gnus-cite.el
lisp/gnus-group.el
lisp/gnus-topic.el
lisp/gnus.el
lisp/message.el
lisp/smime.el
texi/ChangeLog
texi/Makefile.in
texi/gnus-ja.texi
texi/gnus.texi
texi/gnuslogo-refcard.eps
texi/gnusref.tex
texi/ps/gnus-big-logo.eps
texi/ps/gnus-head.eps
texi/refcard.tex

index 2ff520f..bfb5e60 100644 (file)
--- a/GNUS-NEWS
+++ b/GNUS-NEWS
@@ -8,6 +8,11 @@ For older news, see Gnus info node "New Features".
 \f
 * Changes in Oort Gnus
 
+** `/ *' (gnus-summary-limit-include-cached) is rewritten.
+
+It was aliased to `Y c' (gnus-summary-insert-cached-articles). The new
+function filters out other articles.
+
 ** Group names are treated as UTF-8 by default.
 
 This is supposedly what USEFOR wants to migrate to.  See
index 983f74d..b1a3a66 100644 (file)
@@ -1,3 +1,58 @@
+2001-09-04 21:42:23  Lars Magne Ingebrigtsen  <larsi@gnus.org>
+
+       * gnus-group.el (gnus-group-sort-by-server): Use it.
+
+       * gnus.el (gnus-method-to-full-server-name): New, bogus function.
+
+       * gnus-topic.el (gnus-topic-sort-groups-by-server): New command
+       and keystroke.
+
+2001-10-14  Simon Josefsson  <jas@extundo.com>
+
+       * dig.el: Doc fix.
+
+       * smime.el: Doc fix.
+
+       * gnus-msg.el (gnus-inews-do-gcc): Port header encoded-word
+       charset magic from message.el.
+
+2001-10-12  Simon Josefsson  <jas@extundo.com>
+       Suggested by david.goldberg6@verizon.net (David S. Goldberg)
+
+       * gnus-cite.el (gnus-article-toggle-cited-text): Don't remove
+       'cite from g-a-wash-types.
+       (gnus-cite-toggle): Ditto.  Add 'cite.  Set modeline.
+       (gnus-article-hide-citation): Fix.
+
+       * gnus-cite.el (gnus-article-hide-citation): Add `c' mode line
+       character.
+       (gnus-article-toggle-cited-text): Toggle `c' mode line character.
+
+       * gnus-art.el (gnus-treat-hide-citation-maybe): Remove duplicate
+       definition.
+       (gnus-signature-toggle): Toggle `s' mode line character.
+
+       * gnus-art.el (article-emphasize): Set `g-a-wash-types' after
+       doing stuff that clears it.
+
+2001-10-12  Simon Josefsson  <jas@extundo.com>
+
+       * gnus-cache.el (gnus-summary-limit-include-cached): Rewrite.
+       From Eric Marsden <emarsden@laas.fr>.
+
+2001-10-12 10:00:00  ShengHuo ZHU  <zsh@cs.rochester.edu>
+
+       * message.el (message-do-auto-fill): Use gnus-point-at-bol.
+       (autoload): Add some autoloads.
+
+2001-10-12  Kai Gro\e,A_\e(Bjohann  <Kai.Grossjohann@CS.Uni-Dortmund.DE>
+       Suggested by Oliver Scholz <epameinondas@gmx.de>.
+       
+       * message.el (message-do-auto-fill): New function.  Like
+       `do-auto-fill' but don't fill when in the message header.
+       (message-setup-1): Put a text property on the message header.
+       (message-setup-fill-variables): Use `message-do-auto-fill'.
+
 2001-10-10 12:00:00  ShengHuo ZHU  <zsh@cs.rochester.edu>
 
        * message.el (message-send-mail-partially): Insert an empty line
index de6a769..eb70722 100644 (file)
 ;; For use in elisp programs, call `dig-invoke' and use
 ;; `dig-extract-rr' to extract resource records.
 
+;;; Release history:
+
+;; 2000-10-28  posted on gnu.emacs.sources
+
 ;;; Code:
 
 (eval-when-compile (require 'cl))
index 1e38b21..cde3bca 100644 (file)
@@ -931,13 +931,6 @@ See the manual for details."
   :group 'gnus-article-treat
   :type gnus-article-treat-custom)
 
-(defcustom gnus-treat-hide-citation-maybe nil
-  "Hide cited text.
-Valid values are nil, t, `head', `last', an integer or a predicate.
-See the manual for details."
-  :group 'gnus-article-treat
-  :type gnus-article-treat-custom)
-
 (defcustom gnus-treat-strip-list-identifiers 'head
   "Strip list identifiers from `gnus-list-identifiers`.
 Valid values are nil, t, `head', `last', an integer or a predicate.
@@ -2717,13 +2710,13 @@ This format is defined by the `gnus-article-time-format' variable."
                face (nth 3 elem))
          (while (re-search-forward regexp nil t)
            (when (and (match-beginning visible) (match-beginning invisible))
-             (push 'emphasis gnus-article-wash-types)
              (gnus-article-hide-text
               (match-beginning invisible) (match-end invisible) props)
              (gnus-article-unhide-text-type
               (match-beginning visible) (match-end visible) 'emphasis)
              (gnus-put-text-property-excluding-newlines
               (match-beginning visible) (match-end visible) 'face face)
+             (push 'emphasis gnus-article-wash-types)
              (goto-char (match-end invisible)))))))))
 
 (defun gnus-article-setup-highlight-words (&optional highlight-words)
@@ -5610,14 +5603,21 @@ specified by `gnus-button-alist'."
          (limit (next-single-property-change end 'mime-view-entity
                                              nil (point-max))))
       (if (text-property-any end limit 'article-type 'signature)
-         (gnus-remove-text-properties-when
-          'article-type 'signature end limit
-          (cons 'article-type (cons 'signature
-                                    gnus-hidden-properties)))
+         (progn
+           (setq gnus-article-wash-types
+                 (delq 'signature gnus-article-wash-types))
+           (gnus-remove-text-properties-when
+            'article-type 'signature end limit
+            (cons 'article-type (cons 'signature
+                                      gnus-hidden-properties))))
+       (or (memq 'signature gnus-article-wash-types)
+           (push 'signature gnus-article-wash-types))
        (gnus-add-text-properties-when
         'article-type nil end limit
         (cons 'article-type (cons 'signature
-                                  gnus-hidden-properties)))))))
+                                  gnus-hidden-properties)))))
+    (let ((gnus-article-mime-handle-alist-1 gnus-article-mime-handle-alist))
+      (gnus-set-mode-line 'article))))
 
 (defun gnus-button-entry ()
   ;; Return the first entry in `gnus-button-alist' matching this place.
index e02b157..74134be 100644 (file)
@@ -375,8 +375,16 @@ Returns the list of articles removed."
     (while cached
       (gnus-summary-goto-subject (pop cached) t))))
 
-(defalias 'gnus-summary-limit-include-cached
-  'gnus-summary-insert-cached-articles)
+(defun gnus-summary-limit-include-cached ()
+  "Limit the summary buffer to articles that are cached."
+  (interactive)
+  (let ((cached (sort (copy-sequence gnus-newsgroup-cached) '>))
+       (gnus-verbose (max 6 gnus-verbose)))
+    (if cached
+        (progn
+          (gnus-summary-limit cached)
+          (gnus-summary-position-point))
+        (gnus-message 3 "No cached articles for this group"))))
 
 ;;; Internal functions.
 
index 657313b..73b17b8 100644 (file)
@@ -511,6 +511,8 @@ always hide."
                    (setq beg nil)
                  (setq end (point-marker))))))
          (when (and beg end)
+           (or (memq 'cite gnus-article-wash-types)
+               (push 'cite gnus-article-wash-types))
            ;; We use markers for the end-points to facilitate later
            ;; wrapping and mangling of text.
            (setq beg (set-marker (make-marker) beg)
@@ -549,14 +551,21 @@ means show, nil means toggle."
              (and (> arg 0) (not hidden))
              (and (< arg 0) hidden))
       (if hidden
-         (gnus-remove-text-properties-when
-          'article-type 'cite beg end
-          (cons 'article-type (cons 'cite
-                                    gnus-hidden-properties)))
+         (progn
+           ;; Can't remove 'cite from g-a-wash-types here because
+           ;; multiple citations may be hidden -jas
+           (gnus-remove-text-properties-when
+            'article-type 'cite beg end
+            (cons 'article-type (cons 'cite
+                                      gnus-hidden-properties))))
+       (or (memq 'cite gnus-article-wash-types)
+           (push 'cite gnus-article-wash-types))
        (gnus-add-text-properties-when
         'article-type nil beg end
         (cons 'article-type (cons 'cite
                                   gnus-hidden-properties))))
+      (let ((gnus-article-mime-handle-alist-1 gnus-article-mime-handle-alist))
+       (gnus-set-mode-line 'article))
       (save-excursion
        (goto-char start)
        (gnus-delete-line)
@@ -959,14 +968,21 @@ See also the documentation for `gnus-article-highlight-citation'."
        (goto-char (point-min))
        (forward-line (1- number))
        (cond ((get-text-property (point) 'invisible)
+              ;; Can't remove 'cite from g-a-wash-types here because
+              ;; multiple citations may be hidden -jas
               (remove-text-properties (point) (progn (forward-line 1) (point))
                                       gnus-hidden-properties))
              ((assq number gnus-cite-attribution-alist))
              (t
+              (or (memq 'cite gnus-article-wash-types)
+                  (push 'cite gnus-article-wash-types))
               (gnus-add-text-properties
                (point) (progn (forward-line 1) (point))
                (nconc (list 'article-type 'cite)
-                      gnus-hidden-properties))))))))
+                      gnus-hidden-properties))))
+       (let ((gnus-article-mime-handle-alist-1
+              gnus-article-mime-handle-alist))
+         (gnus-set-mode-line 'article))))))
 
 (defun gnus-cite-find-prefix (line)
   ;; Return citation prefix for LINE.
index 154c260..4bbeee7 100644 (file)
@@ -2810,10 +2810,10 @@ sort in reverse order."
 
 (defun gnus-group-sort-by-server (info1 info2)
   "Sort alphabetically by server name."
-  (string< (gnus-method-to-server-name
+  (string< (gnus-method-to-full-server-name
            (gnus-find-method-for-group
             (gnus-info-group info1) info1))
-          (gnus-method-to-server-name
+          (gnus-method-to-full-server-name
            (gnus-find-method-for-group
             (gnus-info-group info2) info2))))
 
index ff26e1d..bca0737 100644 (file)
@@ -1040,6 +1040,7 @@ articles in the topic and its subtopics."
     "a" gnus-topic-sort-groups-by-alphabet
     "u" gnus-topic-sort-groups-by-unread
     "l" gnus-topic-sort-groups-by-level
+    "e" gnus-topic-sort-groups-by-server
     "v" gnus-topic-sort-groups-by-score
     "r" gnus-topic-sort-groups-by-rank
     "m" gnus-topic-sort-groups-by-method))
@@ -1622,6 +1623,12 @@ If REVERSE, sort in reverse order."
   (interactive "P")
   (gnus-topic-sort-groups 'gnus-group-sort-by-method reverse))
 
+(defun gnus-topic-sort-groups-by-server (&optional reverse)
+  "Sort the current topic alphabetically by server name.
+If REVERSE, sort in reverse order."
+  (interactive "P")
+  (gnus-topic-sort-groups 'gnus-group-sort-by-server reverse))
+
 (defun gnus-topic-sort-topics-1 (top reverse)
   (if (cdr top)
       (let ((subtop
index dc810a1..5f7f346 100644 (file)
@@ -2775,6 +2775,9 @@ that that variable is buffer-local to the summary buffers."
          (not (string= (nth 1 method) "")))
      (concat "+" (nth 1 method)))))
 
+(defsubst gnus-method-to-full-server-name (method)
+  (format "%s+%s" (car method) (nth 1 method)))
+
 (defun gnus-group-prefixed-name (group method)
   "Return the whole name from GROUP and METHOD."
   (and (stringp method) (setq method (gnus-server-to-method method)))
index 0bcc600..f945794 100644 (file)
@@ -1346,6 +1346,8 @@ no, only reply back to the author."
   (autoload 'gnus-alive-p "gnus-util")
   (autoload 'gnus-server-string "gnus")
   (autoload 'gnus-group-name-charset "gnus-group")
+  (autoload 'gnus-group-name-decode "gnus-group")
+  (autoload 'gnus-groups-from-server "gnus")
   (autoload 'rmail-output "rmailout")
   (autoload 'mu-cite-original "mu-cite"))
 
@@ -1893,7 +1895,9 @@ M-RET    `message-newline-and-reformat' (break the line and reformat)."
     (setq adaptive-fill-first-line-regexp
          (concat quote-prefix-regexp "\\|"
                  adaptive-fill-first-line-regexp))
-    (setq auto-fill-inhibit-regexp "^[A-Z][^: \n\t]+:")))
+    ;;(setq auto-fill-inhibit-regexp "^[A-Z][^: \n\t]+:")
+    (setq auto-fill-inhibit-regexp nil)
+    (setq auto-fill-function 'message-do-auto-fill)))
 
 \f
 
@@ -2195,6 +2199,11 @@ Prefix arg means justify as well."
     (message-newline-and-reformat arg t)
     t))
 
+(defun message-do-auto-fill ()
+  "Like `do-auto-fill', but don't fill in message header."
+  (unless (text-property-any (gnus-point-at-bol) (point) 'field 'header)
+    (do-auto-fill)))
+
 (defun message-insert-signature (&optional force)
   "Insert a signature.  See documentation for variable `message-signature'."
   (interactive (list 0))
@@ -2376,31 +2385,11 @@ However, if `message-yank-prefix' is non-nil, insert that prefix on each line."
        (indent-rigidly start (mark t) message-indentation-spaces)
       (save-excursion
        (goto-char start)
-       (let (last-line)
-         ;; `last-line' describes the contents of the last line
-         ;; encountered in the loop below. nil means "empty line",
-         ;; spaces "line consisting entirely of whitespace",
-         ;; right-angle "line starts with >", quoted "quote character
-         ;; at the beginning of the line", text "the remaining cases".
-         (while (< (point) (mark t))
-           (cond
-            ((eolp)
+       (while (< (point) (mark t))
+         (if (looking-at ">")
              (insert message-yank-cited-prefix)
-             (setq last-line nil))
-            ((looking-at ">")
-             (if (memq last-line '(nil spaces right-angle quoted))
-                 (progn
-                   (insert message-yank-cited-prefix)
-                   (setq last-line 'quoted))
-               (insert message-yank-prefix)
-               (setq last-line 'right-angle)))
-            ((looking-at "\\s-+$")
-             (insert message-yank-prefix)
-             (setq last-line 'spaces))
-            (t
-             (insert message-yank-prefix)
-             (setq last-line 'text)))
-           (forward-line 1)))))
+           (insert message-yank-prefix))
+         (forward-line 1))))
     (goto-char start)))
 
 (defun message-list-references (refs-list &rest refs-strs)
@@ -4636,6 +4625,7 @@ than 988 characters long, and if they are not, trim them until they are."
   (when message-default-headers
     (insert message-default-headers)
     (or (bolp) (insert ?\n)))
+  (put-text-property (point-min) (point) 'field 'header)
   (put-text-property
    (point)
    (progn
index 9146963..ce69cd5 100644 (file)
@@ -41,6 +41,9 @@
 ;; PKCSx or similar, it's intended to perform common operations
 ;; done on messages encoded in these formats.  The terminology chosen
 ;; reflect this.
+;;
+;; The home of this file is in Gnus CVS, but also available from
+;; http://josefsson.org/smime.html.
 
 ;;; Quick introduction:
 
@@ -93,7 +96,7 @@
 ;;
 ;; Suggestions and comments are appreciated, mail me at simon@josefsson.org.
 
-;; <rant>
+;; begin rant
 ;;
 ;; I would include pointers to introductory text on concepts used in
 ;; this library here, but the material I've read are so horrible I
 ;; Also, I'm not going to mention anything about the wonders of
 ;; cryptopolitics.  Oops, I just did.
 ;;
-;; </rant>
+;; end rant
 
 ;;; Revision history:
 
-;; version 0 not released
+;; 2000-06-05  initial version, committed to Gnus CVS contrib/
+;; 2000-10-28  retrieve certificates via DNS CERT RRs
+;; 2001-10-14  posted to gnu.emacs.sources
 
 ;;; Code:
 
index f3f1af4..8e8c8db 100644 (file)
@@ -1,3 +1,31 @@
+2001-09-04 21:43:05  Lars Magne Ingebrigtsen  <larsi@gnus.org>
+
+       * gnus.texi (Topic Sorting): Addition.
+
+2001-10-13 19:00:00  ShengHuo ZHU  <zsh@cs.rochester.edu>
+
+       * refcard.tex, gnusref.tex: Merge with the version
+       from Felix Natter <f.natter@ndh.net>
+
+2001-10-13 12:00:00  ShengHuo ZHU  <zsh@cs.rochester.edu>
+
+       * refcard.tex: Set version to Oort.
+
+       * gnusref.tex: New key bindings in Oort Gnus.
+
+2001-10-12 18:00:00  ShengHuo ZHU  <zsh@cs.rochester.edu>
+
+       * Makefile.in (.dvi.ps): Use TEXPICTS.
+       (.latexi.dvi-x): Remove gnus.toc as well.
+
+       * gnuslogo-refcard.eps: Remove BeginProcSet.
+
+2001-10-12  Simon Josefsson  <jas@extundo.com>
+
+       * gnus.texi (Misc Group Stuff): Add UTF-8.
+       (Misc Article): Document wash status characters.  Suggested by
+       david.goldberg6@verizon.net (David S. Goldberg).
+
 2001-10-10 08:00:00  ShengHuo ZHU  <zsh@cs.rochester.edu>
 
        * gnusref.tex, refcard.tex: Use epsfig.
index 4e39998..e079239 100644 (file)
@@ -80,7 +80,7 @@ pdf: gnus.pdf message.pdf refcard.pdf emacs-mime.pdf
        rm -f gnustmp.*
 
 .dvi.ps :
-       TEXINPUTS=$(srcdir):$$TEXINPUTS $(DVIPS) -t $(PAPERTYPE) -f $< > $@
+       TEXPICTS=$(srcdir) $(DVIPS) -t $(PAPERTYPE) -f $< > $@
 
 .texi.pdf :
        sed -e '/@iflatex/,/@end iflatex/d' $< > gnustmp.texi
@@ -118,7 +118,7 @@ gnus.latexi gnus-faq.latexi message.latexi emacs-mime.latexi: $(srcdir)/gnus.tex
 .latexi.dvi-x:
        make gnusconfig.tex
        make tmps
-       rm -f gnus.aux
+       rm -f gnus.aux gnus.toc
        cp $< gnus.tmplatexi
        TEXINPUTS=$(srcdir):$$TEXINPUTS $(LATEX) gnus.tmplatexi
        $(srcdir)/splitindex
@@ -137,7 +137,7 @@ gnus.latexi gnus-faq.latexi message.latexi emacs-mime.latexi: $(srcdir)/gnus.tex
        make gnusconfig.tex
        make tmps
        cd ps; make pdf
-       rm -f gnus.aux
+       rm -f gnus.aux gnus.toc
        cp $< gnus.tmplatexi
        TEXINPUTS=$(srcdir):$$TEXINPUTS $(PDFLATEX) gnus.tmplatexi
        $(srcdir)/splitindex
@@ -153,7 +153,7 @@ gnus.latexi gnus-faq.latexi message.latexi emacs-mime.latexi: $(srcdir)/gnus.tex
        mv gnus.pdf $@
 
 latexps: gnus.dvi-x
-       TEXINPUTS=$(srcdir):$$TEXINPUTS $(DVIPS) -t a4 -f $< > gnus.ps
+       TEXPICTS=$(srcdir) $(DVIPS) -t a4 -f $< > gnus.ps
 
 latexpdf: gnus.pdf-x
        mv gnus.pdf-x gnus.pdf
@@ -165,10 +165,10 @@ gnus-manual-standard.latexi: gnus.latexi
        sed 's/,a4paper/,letterpaper/' $< > $@
 
 gnus-manual-a4.ps.gz: gnus-manual-a4.dvi-x
-       TEXINPUTS=$(srcdir):$$TEXINPUTS $(DVIPS) -t a4 -f $< | gzip -c > $@
+       TEXPICTS=$(srcdir) $(DVIPS) -t a4 -f $< | gzip -c > $@
 
 gnus-manual-standard.ps.gz: gnus-manual-standard.dvi-x
-       TEXINPUTS=$(srcdir):$$TEXINPUTS $(DVIPS) -t letter -f $< | gzip -c > $@
+       TEXPICTS=$(srcdir) $(DVIPS) -t letter -f $< | gzip -c > $@
 
 pdfs: gnus-manual-a4.pdf-x gnus-manual-standard.pdf-x
        mv gnus-manual-a4.pdf-x gnus-manual-a4.pdf
index f971693..2035399 100644 (file)
@@ -3733,6 +3733,12 @@ Gnus \e$B$,CN$C$F$$$k%H%T%C%/2=$5$l$?%0%k!<%W$rA4$FI=<($7$^\e(B
 @findex gnus-topic-sort-groups-by-method
 \e$B8=:_$N%H%T%C%/$r%P%C%/%(%s%I$NL>A0$G%"%k%U%!%Y%C%H=g$KJB$YBX$($^\e(B
 \e$B$9\e(B (@code{gnus-topic-sort-groups-by-method})\e$B!#\e(B
+
+@item T S e
+@kindex T S e (Topic)
+@findex gnus-topic-sort-groups-by-server
+\e$B8=:_$N%H%T%C%/$r%5!<%P!<$NL>A0$G%"%k%U%!%Y%C%H=g$KJB$YBX$($^\e(B
+\e$B$9\e(B (@code{gnus-topic-sort-groups-by-server})\e$B!#\e(B
 @end table
 
 \e$B%0%k!<%W$N%=!<%H$K$D$$$F$N$5$i$J$k>pJs$O\e(B @xref{Sorting Groups} \e$B$r;2>H$7\e(B
@@ -3911,9 +3917,11 @@ Gnus
 @end lisp
 
 @item gnus-group-name-charset-group-alist
+@cindex UTF-8 group names
 @vindex gnus-group-name-charset-group-alist
 \e$B%0%k!<%WL>MQ$N%0%k!<%WL>$N@55,I=8=$HJ8;z=89g$NO"A[%j%9%H$G$9!#$3$l$O1Q;z\e(B
-\e$B$G$O$J$$%0%k!<%WL>$rI=<($9$k$?$a$K;H$$$^$9!#\e(B
+\e$B$G$O$J$$%0%k!<%WL>$rI=<($9$k$?$a$K;H$$$^$9!#%G%#%U%)%k%HCM$O!"\e(BUTF-8 \e$B$,%5\e(B
+\e$B%]!<%H$5$l$F$$$k>l9g$O\e(B @code{((".*" utf-8))}\e$B!"$=$l0J30$N>l9g$O\e(B nil \e$B$G$9!#\e(B
 
 \e$BNc\e(B:
 @lisp
@@ -9550,8 +9558,32 @@ GNUS \e$B$d\e(B Gnus \e$B$G$O!"$3$N$?$A$N0-$$LdBj$G6C$+$5$l$J$$$h$&$K$9$k$K$O!"35N,
 
 @table @samp
 @item w
-\e$B5-;v$N!V@vBu>uBV!W\e(B@dfn{wash status}\e$B!#$3$l$O5-;v$KBP$7$F9T$o$l$?\e(B
-\e$B$G$"$m$&@vBuA`:n$r<($90lJ8;z$+$i$J$kC;$$J8;zNs$K$J$j$^$9!#\e(B
+\e$B5-;v$N!V@vBu>uBV!W\e(B@dfn{wash status}\e$B!#$3$l$O5-;v$KBP$7$F9T$o$l$?$G$"$m$&\e(B
+\e$B@vBuA`:n$r<($90lJ8;z$+$i$J$kC;$$J8;zNs$K$J$j$^$9!#J8;z$H$=$l$i$N0UL#$O\e(B:
+
+@table @samp
+@item c
+\e$B5-;v%P%C%U%!$K$*$$$F!"0zMQ$5$l$?J8$,1#$5$l$F$$$k$+$b$7$l$J$$>l9g$KI=<($5\e(B
+\e$B$l$^$9!#\e(B
+
+@item h
+\e$B5-;v%P%C%U%!$K$*$$$F!"%X%C%@!<$,1#$5$l$F$$$k>l9g$KI=<($5$l$^$9!#\e(B
+
+@c @item p 
+@c Displayed when article is digitally signed or encrypted, and Gnus has
+@c hidden the security headers.  (N.B. does not tell anything about
+@c security status, i.e. good or bad signature.)
+
+@item s
+\e$B5-;v%P%C%U%!$K$*$$$F!"=pL>$,1#$5$l$F$$$k>l9g$KI=<($5$l$^$9!#\e(B
+
+@item o
+\e$B5-;v%P%C%U%!$K=E$MBG$AJ8;z$,$"$k>l9g$KI=<($5$l$^$9!#\e(B
+
+@item e
+\e$B5-;v%P%C%U%!$K6/D4$5$l$?J8;zNs$,$"$k>l9g$KI=<($5$l$^$9!#\e(B
+@end table
+
 @c FIXMETGNUS Does this work?
 @item m
 \e$B5-;v$N\e(B @sc{mime} \e$BItJ,$N?t$G$9!#\e(B
index 71b9fd8..0c3ae50 100644 (file)
@@ -3683,6 +3683,12 @@ Sort the current topic by group rank
 Sort the current topic alphabetically by back end name
 (@code{gnus-topic-sort-groups-by-method}).
 
+@item T S e
+@kindex T S e (Topic)
+@findex gnus-topic-sort-groups-by-server
+Sort the current topic alphabetically by server name
+(@code{gnus-topic-sort-groups-by-server}).
+
 @end table
 
 @xref{Sorting Groups}, for more information about group sorting.
@@ -3863,9 +3869,11 @@ For example:
 @end lisp
 
 @item gnus-group-name-charset-group-alist
+@cindex UTF-8 group names
 @vindex gnus-group-name-charset-group-alist
-An alist of regexp of group name and the charset for group names.
-It is used to show non-ASCII group names.
+An alist of regexp of group name and the charset for group names.  It
+is used to show non-ASCII group names.  @code{((".*" utf-8))} is the
+default value if UTF-8 is supported, otherwise the default is nil.
 
 For example:
 @lisp
@@ -10052,12 +10060,39 @@ accepts the same format specifications as that variable, with two
 extensions:
 
 @table @samp
+
 @item w
 The @dfn{wash status} of the article.  This is a short string with one
 character for each possible article wash operation that may have been
-performed.
+performed.  The characters and their meaning:
+
+@table @samp
+
+@item c
+Displayed when cited text may be hidden in the article buffer.
+
+@item h
+Displayed when headers are hidden in the article buffer.
+
+@item p 
+Displayed when article is digitally signed or encrypted, and Gnus has
+hidden the security headers.  (N.B. does not tell anything about
+security status, i.e. good or bad signature.)
+
+@item s
+Displayed when the signature has been hidden in the Article buffer.
+
+@item o
+Displayed when Gnus has treated overstrike characters in the article buffer.
+
+@item e
+Displayed when Gnus has treated emphasised strings in the article buffer.
+
+@end table
+
 @item m
 The number of @sc{mime} parts in the article.
+
 @end table
 
 @vindex gnus-break-pages
index 44c64a6..41f1979 100644 (file)
@@ -7,7 +7,6 @@
 %%ColorUsage: B & W
 %%TileBox: 17 11 127 122
 %%EndComments
-%%BeginProcSet:Adobe_Illustrator_1.1 0 0
 % Copyright 1992 Corel Corporation.
 
 % All rights reserved.
index bd151ce..72dd7be 100644 (file)
@@ -1,16 +1,17 @@
 % -*- mode: latex; TeX-master: "refcard.tex" -*-
-                                % include file for the Gnus refcard and booklet
+%% include file for the Gnus refcard and booklet
+%%
 \newlength{\keycolwidth}
 \newenvironment{keys}[1]% #1 is the widest key
 {\nopagebreak%\noindent%
   \settowidth{\keycolwidth}{#1}%
   \addtolength{\keycolwidth}{\tabcolsep}%
   \addtolength{\keycolwidth}{-\columnwidth}%
-  \begin{tabular}{@{}l@{\hspace{\tabcolsep}}p{-\keycolwidth}@{}}}%
-  {\end{tabular}\\}
+  \begin{supertabular}{@{}l@{\hspace{\tabcolsep}}p{-\keycolwidth}@{}}}%
+  {\end{supertabular}\\}
 
-                                % uncomment the first definition if you do not want pagebreaks in maps
-                                %\newcommand{\esamepage}{\samepage}
+%% uncomment the first definition if you do not want pagebreaks in maps
+%%\newcommand{\esamepage}{\samepage}
 \newcommand{\esamepage}{}
 
 \newcommand*{\B}[1]{{\bf#1})}    % bold l)etter
 \newcommand{\Copyright}{%
   \begin{center}
     Copyright \copyright\ 1995 Free Software Foundation, Inc.\\*
-    Copyright \copyright\ 1995 \author.\\*
+    Copyright \copyright\ 1995 Vladimir Alexiev
+    $<$vladimir@cs.ualberta.ca$>$.\\*
     Copyright \copyright\ 2000 Felix Natter $<$fnatter@gmx.net$>$.\\*
+    Copyright \copyright\ 2001 \author.\\*
     Created from the Gnus manual Copyright \copyright\ 1994 Lars Magne
     Ingebrigtsen.\\*
     and the Emacs Help Bindings feature (C-h b).\\*
     \quad [score] An article score. If no prefix is given,
     `gnus-summary-default-score' is used. \\*[\baselineskip]
                                 % some keys
-    \begin{keys}{C-c C-i}
+    Gnus startup-commands:
+    \begin{keys}{M-x gnus-unplugged}
       M-x gnus           & start Gnus. \\
-      M-x gnus-no-server & start Gnus without trying to connect to server
+      M-x gnus-no-server & start Gnus without connecting to server
       (i.e. to read mail). \\
-      M-x gnus-unplugged & start Gnus in \texttt{unplugged}-mode
-      (first see the manual, C-c C-i g Gnus Unplugged RET).\\
+    \end{keys}
+    Additionally, there are the two commands \texttt{gnus-plugged} and
+    \texttt{gnus-unplugged}, which are only used if you want to download
+    news and/or read previously downloaded news offline (see C-c C-i g Gnus
+    Unplugged RET). Note: \texttt{gnus-no-server} ignores the stuff in
+    \texttt{gnus-agent-directory}, and thus does not allow you to use Gnus
+    Unplugged.
                                 %
+    \begin{keys}{C-c C-i}
       C-c C-i & Go to the Gnus online {\bf info}.\\
       C-c C-b & Send a Gnus {\bf bug} report.\\
     \end{keys}
 
   \newcommand{\ArticleModeGeneral}{%
     {\esamepage
-      The normal navigation keys work in Article mode. Some additional keys are:\\*
+      The normal navigation keys work in Article mode. Some additional keys are:\\
       \begin{keys}{C-c RET}
         C-c \^{} & Get the article with the Message-ID near point.\\
         C-c RET & Send reply to address near point.\\
       /v   & Limit to score. [score]\\
       /E   & (M S) Include all expunged articles in the limit.\\
       /D   & Include all dormant articles in the limit.\\
-      /*   & Include all cached articles in the limit.\\
+      /*   & Limit to cached articles.\\
+      Y C  & Include all cached articles in the limit.\\
       /d   & Exclude all dormant articles from the limit.\\
       /M   & Exclude all marked articles.\\
       /T   & Include all articles from the current thread in the limit.\\
 
 \newcommand{\MsgCompositionMML}{%
   {\esamepage
-    \begin{keys}{M-m P}
-      M-m f   & (C-c C-a) Attach \textbf{file}.\\
-      M-m b   & Attach contents of \textbf{buffer}.\\
-      M-m e   & Attach \textbf{external} file (ftp..).\\
-      M-m P   & Create MIME-\textbf{preview} (new buffer).\\
-      M-m v   & \textbf{Validate} article.\\
-      M-m p   & Insert \textbf{part}.\\
-      M-m m   & Insert \textbf{multi}-part.\\
-      M-m q   & \textbf{Quote} region.\\
-                                % TODO: narrow headers (M-m n) ?
+    \begin{keys}{C-c C-m P}
+      C-c C-m f   & (C-c C-a) Attach \textbf{file}.\\
+      C-c C-m b   & Attach contents of \textbf{buffer}.\\
+      C-c C-m e   & Attach \textbf{external} file (ftp..).\\
+      C-c C-m P   & Create MIME-\textbf{preview} (new buffer).\\
+      C-c C-m v   & \textbf{Validate} article.\\
+      C-c C-m p   & Insert \textbf{part}.\\
+      C-c C-m m   & Insert \textbf{multi}-part.\\
+      C-c C-m q   & \textbf{Quote} region.\\
+                                % TODO: narrow headers (C-c C-m n) ?
     \end{keys}
     }
   }
index 88ea3b8..ea713d8 100644 (file)
@@ -7,7 +7,6 @@
 %%ColorUsage: B & W
 %%TileBox: 0 0 890.3 909.7
 %%EndComments
-%%BeginProcSet:Adobe_Illustrator_1.1 0 0
 % Copyright 1992 Corel Corporation.
 
 % All rights reserved.
index 82206f8..cb74c10 100644 (file)
@@ -7,7 +7,6 @@
 %%ColorUsage: B & W
 %%TileBox: 0 0 430.6 312.5
 %%EndComments
-%%BeginProcSet:Adobe_Illustrator_1.1 0 0
 % Copyright 1992 Corel Corporation.
 
 % All rights reserved.
index 5bc2281..4b654b4 100644 (file)
@@ -1,19 +1,23 @@
 % -*- latex -*-
-% Reference Card for (ding) Gnus 5.8.x: to be processed with LaTeX2e
+% Reference Card for Oort Gnus: to be processed with LaTeX2e
 \documentclass{article}
+
+\usepackage{supertabular}
+
 \def\Guide{Card}\def\guide{card}
 \def\logoscale{0.25}
-\textwidth 7.26in \textheight 10in \topmargin -1.0in
+\setlength{\textwidth}{7.26in} \setlength{\textheight}{10in}
+\setlength{\topmargin}{-1.0in}
 % the same settings work for A4, although there is a bit of space at the
 % top and bottom of the page. 
-\oddsidemargin -0.5in \evensidemargin -0.5in
+\setlength{\oddsidemargin}{-0.5in} \setlength{\evensidemargin}{-0.5in}
 
 \usepackage{epsfig}
 
 % README:
 % *** purpose
-% this was originally thought of as a reference card, but as it is now 5+
-% pages long, I doubt that it is more useful than the online-help. It helped
+% this was originally thought of as a reference card (but as it is now 5+
+% pages long, it may not be more useful than the online-help). It helps
 % to get an overview for the Gnus-functionality.
 %
 % *** files
 \newlength{\logowidth} \setlength{\logowidth}{6.861in}
 \newlength{\logoheight} \setlength{\logoheight}{7.013in}
 
-\def\progver{5.8}\def\refver{5.8-4} % program and refcard versions
-\def\date{July 27th, 2000}
-\def\author{Vladimir Alexiev $<$vladimir@cs.ualberta.ca$>$}
+\def\progver{5.10}\def\refver{5.10-1} % program and refcard versions
+\def\date{Oct 13th, 2001}
+\def\author{Gnus Bugfixing Girls + Boys $<$bugs@gnus.org$>$}
 \raggedbottom\raggedright
 
 \twocolumn
+% use \tiny to shrink it to 4 pages (needs a high-resaoultion printer, though)
 %\tiny
 \scriptsize
 \pagestyle{plain}