From: yamaoka Date: Thu, 24 Dec 1998 02:39:21 +0000 (+0000) Subject: Feedback from gnus-6_9. X-Git-Tag: gnus-199812241900~1 X-Git-Url: http://git.chise.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=74f6b3d2ac4894711cf45f44970b4c4dedc09407;p=elisp%2Fgnus.git- Feedback from gnus-6_9. --- diff --git a/ChangeLog b/ChangeLog index 03c8c24..66e3023 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,185 @@ +1998-12-22 Katsumi Yamaoka + + * lisp/gnus-art.el (gnus-article-prepare-display): Set + `gnus-article-current-summary' to `gnus-summary-buffer'. + +1998-12-18 Katsumi Yamaoka + + * lisp/gnus-start.el (gnus-read-newsrc-el-file): Bug (referring to + unbounded variable) fix. + +1998-12-17 Katsumi Yamaoka + + * lisp/gnus-start.el (gnus-read-newsrc-el-file): Don't load newsrc + file if it does not exist. + +1998-12-14 Katsumi Yamaoka + + * lisp/gnus.el: (gnus-version-number): Update to 6.9.2. + + * lisp/nnheader.el (nnheader-find-file-noselect): Call + `find-file-noselect-as-coding-system' with CODING-SYSTEM as the + 1st arg. + + * lisp/nnmail.el (nnmail-find-file): Call + `insert-file-contents-as-coding-system' with CODING-SYSTEM as the + 1st arg. + * lisp/nnheader.el (nnheader-insert-file-contents): Likewise. + + * lisp/gnus-start.el (gnus-save-newsrc-file): Call + `write-region-as-coding-system' with CODING-SYSTEM as the 1st arg. + (gnus-read-newsrc-el-file): Call + `insert-file-contents-as-coding-system' with CODING-SYSTEM as the + 1st arg. + + * lisp/gnus-cache.el (gnus-cache-save-buffers): Call + `gnus-write-buffer-as-coding-system' with CODING-SYSTEM as the 1st + arg. + + * lisp/gnus-util.el (gnus-write-buffer-as-coding-system): Be + CODING-SYSTEM the 1st arg. + + * lisp/nnmail.el (nnmail-write-region): Call + `write-region-as-coding-system' with CODING-SYSTEM as the 1st arg. + * lisp/gnus-start.el (gnus-save-newsrc-file): Likewise. + * lisp/gnus-agent.el (gnus-agent-expire): Likewise. + (gnus-agent-fetch-headers): Likewise. + (gnus-agent-flush-cache): Likewise. + (gnus-agent-fetch-articles): Likewise. + (gnus-agent-save-history): Likewise. + (gnus-agent-save-groups): Likewise. + (gnus-agent-save-active): Likewise. + +1998-12-14 Katsumi Yamaoka + + * lisp/nnheader.el (nnheader-find-file-noselect): Use + `find-file-noselect-as-coding-system' (renamed from + `find-file-noselect-as-specified-coding-system'). + + * lisp/nnmail.el (nnmail-find-file): Use + `insert-file-contents-as-coding-system' (renamed from + `insert-file-contents-as-specified-coding-system'). + * lisp/nnheader.el (nnheader-insert-file-contents): Likewise. + + * lisp/gnus-start.el (gnus-save-newsrc-file): Use + `write-region-as-coding-system' (renamed from + `write-region-as-specified-coding-system'). + (gnus-read-newsrc-el-file): Use + `insert-file-contents-as-coding-system' (renamed from + `insert-file-contents-as-specified-coding-system'). + + * lisp/gnus-cache.el (gnus-cache-save-buffers): Use + `gnus-write-buffer-as-coding-system' (renamed from + `gnus-write-buffer-as-specified-coding-system'). + + * lisp/gnus-util.el (gnus-write-buffer-as-coding-system): + Renamed from `gnus-write-buffer-as-specified-coding-system'. + + * lisp/nnmail.el (nnmail-write-region): Use + `write-region-as-coding-system' (renamed from + `write-region-as-specified-coding-system'). + * lisp/gnus-start.el (gnus-save-newsrc-file): Likewise. + * lisp/gnus-agent.el (gnus-agent-expire): Likewise. + (gnus-agent-fetch-headers): Likewise. + (gnus-agent-flush-cache): Likewise. + (gnus-agent-fetch-articles): Likewise. + (gnus-agent-save-history): Likewise. + (gnus-agent-save-groups): Likewise. + (gnus-agent-save-active): Likewise. + +1998-12-11 Katsumi Yamaoka + + * lisp/nnheader.el (nnheader-find-file-noselect): Call + `find-file-noselect-as-specified-coding-system' directly. + +1998-12-10 Katsumi Yamaoka + + * lisp/pop3.el (pop3-movemail): Use `write-region-as-binary' + instead of `append-to-file'. + (pop3-movemail-file-coding-system): Abolished. + + * lisp/nnheader.el (nnheader-find-file-noselect): Use + `find-file-noselect-as-specified-coding-system' instead of + `find-file-noselect'. + + * lisp/nnmail.el (nnmail-find-file): Use + `insert-file-contents-as-specified-coding-system' instead of + `insert-file-contents'. + * lisp/nnheader.el (nnheader-insert-file-contents): Likewise. + + * lisp/message.el (message-send-mail-with-qmail): Enclose + `call-process-region' with `as-binary-process'. + (message-send-mail-with-sendmail): Likewise. + (message-send-coding-system): Abolished. + + * lisp/gnus-start.el (gnus-save-newsrc-file): Emulate + `save-buffer' with `write-region-as-specified-coding-system'. + (gnus-read-newsrc-el-file): Emulate `load' with + `insert-file-contents-as-specified-coding-system' and + `eval-region'. + + * lisp/gnus-cache.el (gnus-cache-save-buffers): Use + `gnus-write-buffer-as-specified-coding-system' instead of + `gnus-write-buffer'. + + * lisp/gnus-util.el (gnus-output-to-mail): Use + `write-region-as-binary' instead of `append-to-file'. + (gnus-output-to-mail): Use `gnus-write-buffer-as-binary' instead + of `gnus-write-buffer'. + (gnus-write-buffer-as-specified-coding-system): New function. + (gnus-write-buffer-as-binary): New function. + + * lisp/nnmail.el (nnmail-write-region): Use + `write-region-as-specified-coding-system' instead of + `write-region'. + * lisp/gnus-start.el (gnus-save-newsrc-file): Likewise. + * lisp/gnus-agent.el (gnus-agent-expire): Likewise. + (gnus-agent-fetch-headers): Likewise. + (gnus-agent-flush-cache): Likewise. + (gnus-agent-fetch-articles): Likewise. + (gnus-agent-save-history): Likewise. + (gnus-agent-save-groups): Likewise. + (gnus-agent-save-active): Likewise. + +1998-12-08 Katsumi Yamaoka + + * lisp/smtp.el (smtp-via-smtp): Use `open-network-stream-as-binary' + instead of `open-network-stream'. + * lisp/pop3.el (pop3-open-server): Likewise. + * lisp/nntp.el (nntp-open-network-stream): Likewise. + * lisp/gnus-gl.el (bbb-connect-to-bbbd): Likewise. + + * lisp/nntp.el (nntp-open-rlogin): Enclose `start-process' with + `as-binary-process'. + (nntp-open-telnet): Likewise. + + * lisp/smtp.el (smtp-coding-system): Abolished. + + * lisp/nntp.el (nntp-coding-system-for-write): Abolished. + (nntp-coding-system-for-read): Abolished. + + * lisp/nntp.el: Don't require `tcp'. + * lisp/nndb.el: Likewise. + +1998-12-07 Katsumi Yamaoka + + * lisp/message.el (message-get-parameter-with-eval): Call + `message-get-parameter' with arg `key' first. + +1998-11-26 Yoshiki Hayashi + + * lisp/gnus.el: (gnus-version-number): Update to 6.9.1. + (gnus-version): Modified for SEMI 1.11, FLIM 1.12. + + * lisp/gnus-draft.el: (gnus-draft-decoding-buffer): Call + `mime-edit-decode-message-in-buffer' instead of + `mime-edit-decode-buffer'. + + * lisp/gnus-sum.el: (gnus-structured-field-decoder): Use + `eword-decode-and-unfold-structured-field-body' instead of + 'eword-decode-and-unfold-structured-field'. + (gnus-unstructured-field-decoder): remove `must-unfold'. + 1998-11-26 Katsumi Yamaoka * lisp/gnus-msg.el (gnus-summary-supersede-article): Bind @@ -8,7 +190,7 @@ (message-supersede-setup-function): New user option. Use `message-supersede-setup-for-mime-edit' in default. (message-supersede): Call `message-supersede-setup-function' if it - is non-nil. + is non-nil. (message-supersede-setup-hook): New user option. * lisp/message.el (message-bounce-setup-for-mime-edit): Don't @@ -142,7 +324,7 @@ 1998-11-11 Tatsuya Ichikawa * lisp/message.el (message-mode-map): Add new command key - `C-x C-s' for `message-save-drafts'. + `C-x C-s' for `message-save-drafts'. 1998-11-11 Keiichi Suzuki diff --git a/README.branch b/README.branch index 188fbd6..eaf63bf 100644 --- a/README.branch +++ b/README.branch @@ -81,9 +81,10 @@ Public Branches for-semi-1_5 Semi-gnus for SEMI 1.5 API for-semi-1_6 Semi-gnus for SEMI 1.6 API gnus-6_5 Semi-gnus for SEMI 1.7 API - gnus-6_6 Semi-gnus for SEMI 1.8, FLIM 1.7 API (stable) - gnus-6_7 Semi-gnus for SEMI 1.8, FLIM 1.7 API (develop) - gnus-6_8 Semi-gnus for SEMI 1.8, FLIM 1.8 API + gnus-6_6 Semi-gnus for SEMI 1.8, FLIM 1.7 API + gnus-6_7 Semi-gnus for SEMI 1.8, FLIM 1.7 API + gnus-6_8 Semi-gnus for SEMI 1.8, FLIM 1.8 API (stable) + gnus-6_9 Semi-gnus for SEMI 1.11, FLIM 1.12 API (develop) Personal Branches diff --git a/README.branch.ja b/README.branch.ja index d458624..bbb2875 100644 --- a/README.branch.ja +++ b/README.branch.ja @@ -81,9 +81,10 @@ Public Branches for-semi-1_5 Semi-gnus for SEMI 1.5 API for-semi-1_6 Semi-gnus for SEMI 1.6 API gnus-6_5 Semi-gnus for SEMI 1.7 API - gnus-6_6 Semi-gnus for SEMI 1.8, FLIM 1.7 API (stable) - gnus-6_7 Semi-gnus for SEMI 1.8, FLIM 1.7 API (develop) - gnus-6_8 Semi-gnus for SEMI 1.8, FLIM 1.8 API + gnus-6_6 Semi-gnus for SEMI 1.8, FLIM 1.7 API + gnus-6_7 Semi-gnus for SEMI 1.8, FLIM 1.7 API + gnus-6_8 Semi-gnus for SEMI 1.8, FLIM 1.8 API (stable) + gnus-6_9 Semi-gnus for SEMI 1.11 FLIM 1.12 API (develop) Personal Branches diff --git a/README.semi b/README.semi index 92809fe..3dd5f49 100644 --- a/README.semi +++ b/README.semi @@ -1,4 +1,4 @@ -This package contains Semi-gnus. +This package contains Semi-gnus 6.9. What is Semi-gnus? ================== @@ -8,7 +8,8 @@ all features of Gnus and gnus-mime, so there are no need to install Gnus to use it, and you must not use gnus-mime for SEMI. It requires SEMI package, so please get and install SEMI package -before to install it. You can get SEMI from +before to install it. Semi-gnus 6.9 requires SEMI 1.11. You can get +SEMI from ftp://ftp.jaist.ac.jp/pub/elisp/semi/ Required environment for SEMI is written in README.en of SEMI package. @@ -53,7 +54,8 @@ Major tags are following: himi himi branch ichikawa ichikawa branch - Based on pGnus. + + pgnus-ichikawa ichikawa branch. Based on pGnus akr akr branch diff --git a/README.semi.ja b/README.semi.ja index c91c0a3..e944dbc 100644 --- a/README.semi.ja +++ b/README.semi.ja @@ -1,4 +1,4 @@ -$B$3$N%Q%C%1!<%8$K$O(B Semi-gnus $B$,F~$C$F$$$^$9!#(B +$B$3$N%Q%C%1!<%8$K$O(B Semi-gnus 6.9 $B$,F~$C$F$$$^$9!#(B Semi-gnus $B$H$O!)(B ================== @@ -9,9 +9,11 @@ Semi-gnus $B$H$O!)(B $B;HMQ$7$F$O$$$1$^$;$s!#(B SEMI $B%Q%C%1!<%8$rMW5a$7$^$9$N$G!"%$%s%9%H!<%k$9$kA0$K(B SEMI $B%Q%C%1!<(B -$B%8$r%$%s%9%H!<%k$7$F$/$@$5$$!#(BSEMI $B$O(B -ftp://ftp.jaist.ac.jp/pub/elisp/semi/ $B$+$iH$7$F$/$@$5$$!#(B +$B%8$r%$%s%9%H!<%k$7$F$/$@$5$$!#(BSemi-gnus 6.9 $B$O(B SEMI 1.11 $B$rMW5a$7$^$9!#(B +SEMI $B$O(B +ftp://ftp.jaist.ac.jp/pub/elisp/semi/ +$B$+$iH$7$F(B +$B$/$@$5$$!#(B $B\n]+\\)>" nil t)) (setq id "No-Message-ID-in-article") (setq id (buffer-substring (match-beginning 1) (match-end 1)))) - (let ((coding-system-for-write - gnus-agent-file-coding-system)) - (write-region (point-min) (point-max) - (concat dir (number-to-string (caar pos))) - nil 'silent)) + (write-region-as-coding-system + gnus-agent-file-coding-system + (point-min) (point-max) + (concat dir (number-to-string (caar pos))) nil 'silent) (when (setq elem (assq (caar pos) gnus-agent-article-alist)) (setcdr elem t)) (gnus-agent-enter-history @@ -741,12 +740,12 @@ the actual number of articles toggled is returned." (save-excursion (while gnus-agent-buffer-alist (set-buffer (cdar gnus-agent-buffer-alist)) - (let ((coding-system-for-write - gnus-agent-file-coding-system)) - (write-region (point-min) (point-max) - (gnus-agent-article-name ".overview" - (caar gnus-agent-buffer-alist)) - nil 'silent)) + (write-region-as-coding-system + gnus-agent-file-coding-system + (point-min) (point-max) + (gnus-agent-article-name ".overview" + (caar gnus-agent-buffer-alist)) + nil 'silent) (pop gnus-agent-buffer-alist)) (while gnus-agent-group-alist (nnheader-temp-write (caar gnus-agent-group-alist) @@ -777,9 +776,9 @@ the actual number of articles toggled is returned." (gnus-agent-braid-nov group articles file)) (gnus-make-directory (nnheader-translate-file-chars (file-name-directory file))) - (let ((coding-system-for-write - gnus-agent-file-coding-system)) - (write-region (point-min) (point-max) file nil 'silent)) + (write-region-as-coding-system + gnus-agent-file-coding-system + (point-min) (point-max) file nil 'silent) (gnus-agent-save-alist group articles nil) (gnus-agent-enter-history "last-header-fetched-for-session" @@ -1349,9 +1348,9 @@ The following commands are available: ;; Schedule the history line for nuking. (push (cdr elem) histories))) (gnus-make-directory (file-name-directory nov-file)) - (let ((coding-system-for-write - gnus-agent-file-coding-system)) - (write-region (point-min) (point-max) nov-file nil 'silent)) + (write-region-as-coding-system + gnus-agent-file-coding-system + (point-min) (point-max) nov-file nil 'silent) ;; Delete the unwanted entries in the alist. (setq gnus-agent-article-alist (sort gnus-agent-article-alist 'car-less-than-car)) diff --git a/lisp/gnus-art.el b/lisp/gnus-art.el index 247338f..b46cf8b 100644 --- a/lisp/gnus-art.el +++ b/lisp/gnus-art.el @@ -2155,7 +2155,7 @@ If ALL-HEADERS is non-nil, no headers are hidden." ;; Display message. (funcall method) ;; Associate this article with the current summary buffer. - (setq gnus-article-current-summary (current-buffer)) + (setq gnus-article-current-summary gnus-summary-buffer) ;; Perform the article display hooks. (gnus-run-hooks 'gnus-article-display-hook))) diff --git a/lisp/gnus-cache.el b/lisp/gnus-cache.el index 7ac6ba2..436baad 100644 --- a/lisp/gnus-cache.el +++ b/lisp/gnus-cache.el @@ -124,9 +124,8 @@ it's not cached." (set-buffer buffer) (if (> (buffer-size) 0) ;; Non-empty overview, write it to a file. - (let ((coding-system-for-write - gnus-cache-overview-coding-system)) - (gnus-write-buffer overview-file)) + (gnus-write-buffer-as-coding-system + gnus-cache-overview-coding-system overview-file) ;; Empty overview file, remove it (when (file-exists-p overview-file) (delete-file overview-file)) diff --git a/lisp/gnus-draft.el b/lisp/gnus-draft.el index f428731..d794f0d 100644 --- a/lisp/gnus-draft.el +++ b/lisp/gnus-draft.el @@ -185,7 +185,7 @@ (defcustom gnus-draft-decoding-function (function (lambda () - (mime-edit-decode-buffer nil) + (mime-edit-decode-message-in-buffer nil) (eword-decode-header) )) "*Function called to decode the message from network representation." diff --git a/lisp/gnus-gl.el b/lisp/gnus-gl.el index 93ef915..de68a6d 100644 --- a/lisp/gnus-gl.el +++ b/lisp/gnus-gl.el @@ -257,7 +257,8 @@ If this times out we give up and assume that something has died..." ) (catch 'done (condition-case error (setq grouplens-bbb-process - (open-network-stream "BBBD" grouplens-bbb-buffer host port)) + (open-network-stream-as-binary + "BBBD" grouplens-bbb-buffer host port)) (error (gnus-message 3 "Error: Failed to connect to BBB") nil)) (and (null grouplens-bbb-process) diff --git a/lisp/gnus-start.el b/lisp/gnus-start.el index 8c73a33..1237936 100644 --- a/lisp/gnus-start.el +++ b/lisp/gnus-start.el @@ -1916,14 +1916,17 @@ If FORCE is non-nil, the .newsrc file is read." ;; We always, always read the .eld file. (gnus-message 5 "Reading %s..." ding-file) (let (gnus-newsrc-assoc) - (condition-case nil - (let ((coding-system-for-read gnus-startup-file-coding-system)) - (load ding-file t t t)) - (error - (ding) - (unless (gnus-yes-or-no-p - (format "Error in %s; continue? " ding-file)) - (error "Error in %s" ding-file)))) + (when (file-exists-p ding-file) + (condition-case nil + (with-temp-buffer + (insert-file-contents-as-coding-system + gnus-startup-file-coding-system ding-file) + (eval-region (point-min) (point-max))) + (error + (ding) + (unless (gnus-yes-or-no-p + (format "Error in %s; continue? " ding-file)) + (error "Error in %s" ding-file))))) (when gnus-newsrc-assoc (setq gnus-newsrc-alist gnus-newsrc-assoc))) (gnus-make-hashtable-from-newsrc-alist) @@ -2279,8 +2282,10 @@ If FORCE is non-nil, the .newsrc file is read." (gnus-message 5 "Saving %s.eld..." gnus-current-startup-file) (gnus-gnus-to-quick-newsrc-format) (gnus-run-hooks 'gnus-save-quick-newsrc-hook) - (let ((coding-system-for-write gnus-startup-file-coding-system)) - (save-buffer)) + (write-region-as-coding-system + gnus-startup-file-coding-system + (point-min) (point-max) (buffer-file-name)) + (set-buffer-modified-p nil) (kill-buffer (current-buffer)) (gnus-message 5 "Saving %s.eld...done" gnus-current-startup-file)) diff --git a/lisp/gnus-sum.el b/lisp/gnus-sum.el index cff4f0e..c78156c 100644 --- a/lisp/gnus-sum.el +++ b/lisp/gnus-sum.el @@ -667,7 +667,7 @@ is not run if `gnus-visual' is nil." :type 'hook) (defcustom gnus-structured-field-decoder - #'eword-decode-and-unfold-structured-field + #'eword-decode-and-unfold-structured-field-body "Function to decode non-ASCII characters in structured field for summary." :group 'gnus-various :type 'function) @@ -676,7 +676,7 @@ is not run if `gnus-visual' is nil." (function (lambda (string) (eword-decode-unstructured-field-body - (std11-unfold-string string) 'must-unfold) + (std11-unfold-string string)) )) "Function to decode non-ASCII characters in unstructured field for summary." :group 'gnus-various diff --git a/lisp/gnus-util.el b/lisp/gnus-util.el index 7d9dafa..cba9137 100644 --- a/lisp/gnus-util.el +++ b/lisp/gnus-util.el @@ -610,6 +610,21 @@ Bind `print-quoted' and `print-readably' to t while printing." ;; Write the buffer. (write-region (point-min) (point-max) file nil 'quietly)) +(defun gnus-write-buffer-as-binary (file) + "Write the current buffer's contents to FILE without code conversion." + ;; Make sure the directory exists. + (gnus-make-directory (file-name-directory file)) + ;; Write the buffer. + (write-region-as-binary (point-min) (point-max) file nil 'quietly)) + +(defun gnus-write-buffer-as-coding-system (coding-system file) + "Write the current buffer's contents to FILE with code conversion." + ;; Make sure the directory exists. + (gnus-make-directory (file-name-directory file)) + ;; Write the buffer. + (write-region-as-coding-system + coding-system (point-min) (point-max) file nil 'quietly)) + (defun gnus-delete-file (file) "Delete FILE if it exists." (when (file-exists-p file) @@ -791,9 +806,8 @@ with potentially long computations." (let ((file-buffer (create-file-buffer filename))) (save-excursion (set-buffer file-buffer) - (let ((require-final-newline nil) - (coding-system-for-write 'binary)) - (gnus-write-buffer filename))) + (let ((require-final-newline nil)) + (gnus-write-buffer-as-binary filename))) (kill-buffer file-buffer)) (error "Output file does not exist"))) (set-buffer tmpbuf) @@ -810,8 +824,7 @@ with potentially long computations." ;; Decide whether to append to a file or to an Emacs buffer. (let ((outbuf (get-file-buffer filename))) (if (not outbuf) - (let ((buffer-read-only nil) - (coding-system-for-write 'binary)) + (let ((buffer-read-only nil)) (save-excursion (goto-char (point-max)) (forward-char -2) @@ -821,7 +834,8 @@ with potentially long computations." (insert "\n")) (insert "\n")) (goto-char (point-max)) - (append-to-file (point-min) (point-max) filename))) + (write-region-as-binary (point-min) (point-max) + filename 'append))) ;; File has been visited, in buffer OUTBUF. (set-buffer outbuf) (let ((buffer-read-only nil)) diff --git a/lisp/gnus.el b/lisp/gnus.el index 1465159..2157444 100644 --- a/lisp/gnus.el +++ b/lisp/gnus.el @@ -253,11 +253,11 @@ is restarted, and sometimes reloaded." (defconst gnus-product-name "Semi-gnus" "Product name of this version of gnus.") -(defconst gnus-version-number "6.8.20" +(defconst gnus-version-number "6.9.2" "Version number for this version of gnus.") (defconst gnus-version - (format "%s %s (based on Gnus 5.6.45; for SEMI 1.8, FLIM 1.8/1.9)" + (format "%s %s (based on Gnus 5.6.45; for SEMI 1.11, FLIM 1.12)" gnus-product-name gnus-version-number) "Version string for this version of gnus.") diff --git a/lisp/message.el b/lisp/message.el index 1aac786..82923d6 100644 --- a/lisp/message.el +++ b/lisp/message.el @@ -917,9 +917,6 @@ The cdr of ech entry is a function for applying the face to a region.") (const :tag "always" t) (const :tag "ask" ask))) -(defvar message-send-coding-system 'binary - "Coding system to encode outgoing mail.") - ;;; Internal variables. (defvar message-buffer-list nil) @@ -1051,7 +1048,7 @@ The cdr of ech entry is a function for applying the face to a region.") (cdr (assq key alist))) (defmacro message-get-parameter-with-eval (key &optional alist) - `(message-eval-parameter (message-get-parameter ,alist ,key))) + `(message-eval-parameter (message-get-parameter ,key ,alist))) (defmacro message-y-or-n-p (question show &rest text) "Ask QUESTION, displaying the rest of the arguments in a temp. buffer if SHOW" @@ -2222,31 +2219,31 @@ the user from the mailer." (save-excursion (set-buffer errbuf) (erase-buffer)))) - (let ((default-directory "/") - (coding-system-for-write message-send-coding-system)) - (apply 'call-process-region - (append (list (point-min) (point-max) - (if (boundp 'sendmail-program) - sendmail-program - "/usr/lib/sendmail") - nil errbuf nil "-oi") - ;; Always specify who from, - ;; since some systems have broken sendmails. - ;; But some systems are more broken with -f, so - ;; we'll let users override this. - (if (null message-sendmail-f-is-evil) - (list "-f" (user-login-name))) - ;; These mean "report errors by mail" - ;; and "deliver in background". - (if (null message-interactive) '("-oem" "-odb")) - ;; Get the addresses from the message - ;; unless this is a resend. - ;; We must not do that for a resend - ;; because we would find the original addresses. - ;; For a resend, include the specific addresses. - (if resend-to-addresses - (list resend-to-addresses) - '("-t"))))) + (let ((default-directory "/")) + (as-binary-process + (apply 'call-process-region + (append (list (point-min) (point-max) + (if (boundp 'sendmail-program) + sendmail-program + "/usr/lib/sendmail") + nil errbuf nil "-oi") + ;; Always specify who from, + ;; since some systems have broken sendmails. + ;; But some systems are more broken with -f, so + ;; we'll let users override this. + (if (null message-sendmail-f-is-evil) + (list "-f" (user-login-name))) + ;; These mean "report errors by mail" + ;; and "deliver in background". + (if (null message-interactive) '("-oem" "-odb")) + ;; Get the addresses from the message + ;; unless this is a resend. + ;; We must not do that for a resend + ;; because we would find the original addresses. + ;; For a resend, include the specific addresses. + (if resend-to-addresses + (list resend-to-addresses) + '("-t")))))) (when message-interactive (save-excursion (set-buffer errbuf) @@ -2271,28 +2268,28 @@ to find out how to use this." (run-hooks 'message-send-mail-hook) ;; send the message (case - (let ((coding-system-for-write message-send-coding-system)) - (apply - 'call-process-region 1 (point-max) message-qmail-inject-program - nil nil nil - ;; qmail-inject's default behaviour is to look for addresses on the - ;; command line; if there're none, it scans the headers. - ;; yes, it does The Right Thing w.r.t. Resent-To and it's kin. - ;; - ;; in general, ALL of qmail-inject's defaults are perfect for simply - ;; reading a formatted (i. e., at least a To: or Resent-To header) - ;; message from stdin. - ;; - ;; qmail also has the advantage of not having been raped by - ;; various vendors, so we don't have to allow for that, either -- - ;; compare this with message-send-mail-with-sendmail and weep - ;; for sendmail's lost innocence. - ;; - ;; all this is way cool coz it lets us keep the arguments entirely - ;; free for -inject-arguments -- a big win for the user and for us - ;; since we don't have to play that double-guessing game and the user - ;; gets full control (no gestapo'ish -f's, for instance). --sj - message-qmail-inject-args)) + (as-binary-process + (apply + 'call-process-region 1 (point-max) message-qmail-inject-program + nil nil nil + ;; qmail-inject's default behaviour is to look for addresses on the + ;; command line; if there're none, it scans the headers. + ;; yes, it does The Right Thing w.r.t. Resent-To and it's kin. + ;; + ;; in general, ALL of qmail-inject's defaults are perfect for simply + ;; reading a formatted (i. e., at least a To: or Resent-To header) + ;; message from stdin. + ;; + ;; qmail also has the advantage of not having been raped by + ;; various vendors, so we don't have to allow for that, either -- + ;; compare this with message-send-mail-with-sendmail and weep + ;; for sendmail's lost innocence. + ;; + ;; all this is way cool coz it lets us keep the arguments entirely + ;; free for -inject-arguments -- a big win for the user and for us + ;; since we don't have to play that double-guessing game and the user + ;; gets full control (no gestapo'ish -f's, for instance). --sj + message-qmail-inject-args)) ;; qmail-inject doesn't say anything on it's stdout/stderr, ;; we have to look at the retval instead (0 nil) diff --git a/lisp/nndb.el b/lisp/nndb.el index 0a0f3ef..007d8e5 100644 --- a/lisp/nndb.el +++ b/lisp/nndb.el @@ -59,12 +59,6 @@ (eval-when-compile (require 'cl)) (eval-and-compile - (unless (fboundp 'open-network-stream) - (require 'tcp))) - -(eval-when-compile (require 'cl)) - -(eval-and-compile (autoload 'news-setup "rnewspost") (autoload 'news-reply-mode "rnewspost") (autoload 'cancel-timer "timer") diff --git a/lisp/nnheader.el b/lisp/nnheader.el index f0835cd..7ef13f2 100644 --- a/lisp/nnheader.el +++ b/lisp/nnheader.el @@ -773,20 +773,20 @@ find-file-hooks, etc. (auto-mode-alist (nnheader-auto-mode-alist)) (default-major-mode 'fundamental-mode) (enable-local-variables nil) - (after-insert-file-functions nil) - (find-file-hooks nil) - (coding-system-for-read nnheader-file-coding-system)) - (insert-file-contents filename visit beg end replace))) + (after-insert-file-functions nil) + (find-file-hooks nil)) + (insert-file-contents-as-coding-system + nnheader-file-coding-system filename visit beg end replace))) (defun nnheader-find-file-noselect (&rest args) (let ((format-alist nil) (auto-mode-alist (nnheader-auto-mode-alist)) (default-major-mode 'fundamental-mode) (enable-local-variables nil) - (after-insert-file-functions nil) - (find-file-hooks nil) - (coding-system-for-read nnheader-file-coding-system)) - (apply 'find-file-noselect args))) + (after-insert-file-functions nil) + (find-file-hooks nil)) + (apply 'find-file-noselect-as-coding-system + nnheader-file-coding-system args))) (defun nnheader-auto-mode-alist () "Return an `auto-mode-alist' with only the .gz (etc) thingies." diff --git a/lisp/nnmail.el b/lisp/nnmail.el index a323f87..8e8359e 100644 --- a/lisp/nnmail.el +++ b/lisp/nnmail.el @@ -493,9 +493,9 @@ parameter. It should return nil, `warn' or `delete'." (let ((format-alist nil) (after-insert-file-functions nil)) (condition-case () - (let ((coding-system-for-read nnmail-file-coding-system) - (pathname-coding-system 'binary)) - (insert-file-contents file) + (let ((pathname-coding-system 'binary)) + (insert-file-contents-as-coding-system + nnmail-file-coding-system file) t) (file-error nil)))) @@ -1703,9 +1703,9 @@ If ARGS, PROMPT is used as an argument to `format'." (defun nnmail-write-region (start end filename &optional append visit lockname) "Do a `write-region', and then set the file modes." - (let ((coding-system-for-write nnmail-file-coding-system) - (pathname-coding-system 'binary)) - (write-region start end filename append visit lockname) + (let ((pathname-coding-system 'binary)) + (write-region-as-coding-system + nnmail-file-coding-system start end filename append visit lockname) (set-file-modes filename nnmail-default-file-modes))) ;;; diff --git a/lisp/nntp.el b/lisp/nntp.el index 9c5523d..d7665b5 100644 --- a/lisp/nntp.el +++ b/lisp/nntp.el @@ -30,10 +30,6 @@ (nnoo-declare nntp) -(eval-and-compile - (unless (fboundp 'open-network-stream) - (require 'tcp))) - (eval-when-compile (require 'cl)) (defvoo nntp-address nil @@ -154,12 +150,6 @@ server there that you can connect to. See also (defvoo nntp-warn-about-losing-connection t "*If non-nil, beep when a server closes connection.") -(defvoo nntp-coding-system-for-read 'binary - "*Coding system to read from NNTP.") - -(defvoo nntp-coding-system-for-write 'binary - "*Coding system to write to NNTP.") - (defcustom nntp-authinfo-file "~/.authinfo" ".netrc-like file that holds nntp authinfo passwords." :type @@ -847,9 +837,7 @@ password contained in '~/.nntp-authinfo'." (kill-buffer ,pbuffer)))))) (process (condition-case () - (let ((coding-system-for-read nntp-coding-system-for-read) - (coding-system-for-write nntp-coding-system-for-write)) - (funcall nntp-open-connection-function pbuffer)) + (funcall nntp-open-connection-function pbuffer) (error nil) (quit nil)))) (when timer @@ -875,7 +863,8 @@ password contained in '~/.nntp-authinfo'." nil)))) (defun nntp-open-network-stream (buffer) - (open-network-stream "nntpd" buffer nntp-address nntp-port-number)) + (open-network-stream-as-binary + "nntpd" buffer nntp-address nntp-port-number)) (defun nntp-open-ssl-stream (buffer) (let* ((ssl-program-arguments '("-connect" (concat host ":" service))) @@ -1174,9 +1163,10 @@ password contained in '~/.nntp-authinfo'." (save-excursion (set-buffer buffer) (erase-buffer) - (let ((proc (apply - 'start-process - "nntpd" buffer nntp-telnet-command nntp-telnet-switches)) + (let ((proc (as-binary-process + (apply + 'start-process + "nntpd" buffer nntp-telnet-command nntp-telnet-switches))) (case-fold-search t)) (when (memq (process-status proc) '(open run)) (process-send-string proc "set escape \^X\n") @@ -1221,13 +1211,15 @@ password contained in '~/.nntp-authinfo'." (defun nntp-open-rlogin (buffer) "Open a connection to SERVER using rsh." (let ((proc (if nntp-rlogin-user-name - (apply 'start-process - "nntpd" buffer nntp-rlogin-program - nntp-address "-l" nntp-rlogin-user-name - nntp-rlogin-parameters) - (apply 'start-process - "nntpd" buffer nntp-rlogin-program nntp-address - nntp-rlogin-parameters)))) + (as-binary-process + (apply 'start-process + "nntpd" buffer nntp-rlogin-program + nntp-address "-l" nntp-rlogin-user-name + nntp-rlogin-parameters)) + (as-binary-process + (apply 'start-process + "nntpd" buffer nntp-rlogin-program nntp-address + nntp-rlogin-parameters))))) (save-excursion (set-buffer buffer) (nntp-wait-for-string "^\r*20[01]") diff --git a/lisp/pop3.el b/lisp/pop3.el index 55c2f65..a07b805 100644 --- a/lisp/pop3.el +++ b/lisp/pop3.el @@ -60,9 +60,6 @@ values are 'apop.") "Timestamp returned when initially connected to the POP server. Used for APOP authentication.") -(defvar pop3-movemail-file-coding-system 'binary - "Crashbox made by pop3-movemail with this coding system.") - (defvar pop3-read-point nil) (defvar pop3-debug nil) @@ -94,8 +91,7 @@ Used for APOP authentication.") (pop3-retr process n crashbuf) (save-excursion (set-buffer crashbuf) - (let ((coding-system-for-write pop3-movemail-file-coding-system)) - (append-to-file (point-min) (point-max) crashbox)) + (write-region-as-binary (point-min) (point-max) crashbox 'append) (set-buffer (process-buffer process)) (while (> (buffer-size) 5000) (goto-char (point-min)) @@ -115,17 +111,14 @@ Used for APOP authentication.") Returns the process associated with the connection." (let ((process-buffer (get-buffer-create (format "trace of POP session to %s" mailhost))) - (process) - (coding-system-for-read 'binary) ;; because 0000n0000 S000l 0a0 - (coding-system-for-write 'binary) ;; is st00pid - ) + (process)) (save-excursion (set-buffer process-buffer) (erase-buffer) (setq pop3-read-point (point-min)) ) (setq process - (open-network-stream "POP" process-buffer mailhost port)) + (open-network-stream-as-binary "POP" process-buffer mailhost port)) (let ((response (pop3-read-response process t))) (setq pop3-timestamp (substring response (or (string-match "<" response) 0) diff --git a/lisp/smtp.el b/lisp/smtp.el index 3d2e113..1954200 100644 --- a/lisp/smtp.el +++ b/lisp/smtp.el @@ -57,11 +57,6 @@ don't define this value." :type 'boolean :group 'smtp) -(defcustom smtp-coding-system 'binary - "*Coding-system for SMTP output." - :type 'coding-system - :group 'smtp) - (defun smtp-fqdn () (if smtp-local-domain @@ -75,9 +70,7 @@ don't define this value." response-code greeting process-buffer - (supported-extensions '()) - (coding-system-for-read smtp-coding-system) - (coding-system-for-write smtp-coding-system)) + (supported-extensions '())) (unwind-protect (catch 'done ;; get or create the trace buffer @@ -91,7 +84,8 @@ don't define this value." (erase-buffer)) ;; open the connection to the server - (setq process (open-network-stream "SMTP" process-buffer host port)) + (setq process (open-network-stream-as-binary + "SMTP" process-buffer host port)) (and (null process) (throw 'done nil)) ;; set the send-filter diff --git a/texi/gnus-ja.texi b/texi/gnus-ja.texi index 7b11e3e..b742de3 100644 --- a/texi/gnus-ja.texi +++ b/texi/gnus-ja.texi @@ -1,7 +1,7 @@ \input texinfo @c -*-texinfo-*- @setfilename gnus-ja -@settitle Semi-gnus 6.8.20 Manual +@settitle Semi-gnus 6.9.2 Manual @synindex fn cp @synindex vr cp @synindex pg cp @@ -345,7 +345,7 @@ into another language, under the above conditions for modified versions. @tex @titlepage -@title Semi-gnus 6.8.20 Manual +@title Semi-gnus 6.9.2 Manual @author by Lars Magne Ingebrigtsen @author by members of Semi-gnus mailing-list @@ -399,7 +399,7 @@ Semi-gnus $B$O!"Bg$-$J3($,F~$C$F$$$?$j$5$^$6$^$J7A<0$rMQ$$$?$j$7$F$$$k$A$g$C(B $B$J8@8l7w$r:9JL$7$^$;$s!#$"$"!"%/%j%s%4%s$NJ}$O(B Unicode Next Generation$B$r(B $B$*BT$A$/$@$5$$!#(B -$B$3$N@bL@=q$O(B Semi-gnus 6.8.20 $B$KBP1~$7$^$9!#(B +$B$3$N@bL@=q$O(B Semi-gnus 6.9.2 $B$KBP1~$7$^$9!#(B @end ifinfo @@ -18126,7 +18126,7 @@ Gnus $B$OH"$+$i=P$7$F$9$0$K(B @emph{$BHs>o$K(B} $B$h$/F0:n$7$^$9(B---$B2? @item @kbd{M-x gnus-version} $B$r;n$7$F2<$5$$!#$b$7!"(B -@samp{Semi-gnus 6.8.20 (based on Gnus 5.6.44; for SEMI 1.8, FLIM 1.9/1.9)} +@samp{Semi-gnus 6.9.2 (based on Gnus 5.6.45; for SEMI 1.11, FLIM 1.12)} $B$N$h$&$J$b$N$,=P$F$-$?$J$i!"@5$7$$%U%!%$%k$,FI$_9~$^$l$F$$$^$9!#(B $B$b$7!"(B@samp{NNTP 3.x} $B$d(B @samp{nntp flee} $B$N$h$&$J$b$N$,=P$F$-$?$H$-$O!"(B $B$=$3$K$"$k$$$/$D$+$N8E$$(B @file{.el} $B%U%!%$%k$,FI$_9~$^$l$F$$$^$9!#$=$l$i(B diff --git a/texi/gnus.texi b/texi/gnus.texi index b26b642..cf3105c 100644 --- a/texi/gnus.texi +++ b/texi/gnus.texi @@ -1,7 +1,7 @@ \input texinfo @c -*-texinfo-*- @setfilename gnus -@settitle Semi-gnus 6.8.20 Manual +@settitle Semi-gnus 6.9.2 Manual @synindex fn cp @synindex vr cp @synindex pg cp @@ -318,7 +318,7 @@ into another language, under the above conditions for modified versions. @tex @titlepage -@title Semi-gnus 6.8.20 Manual +@title Semi-gnus 6.9.2 Manual @author by Lars Magne Ingebrigtsen @page @@ -361,7 +361,7 @@ internationalization/localization and multiscript features based on MULE API. So Semi-gnus does not discriminate various language communities. Oh, if you are a Klingon, please wait Unicode Next Generation. -This manual corresponds to Semi-gnus 6.8.20. +This manual corresponds to Semi-gnus 6.9.2. @end ifinfo diff --git a/texi/gnusref-ja.tex b/texi/gnusref-ja.tex new file mode 100644 index 0000000..3a8a502 --- /dev/null +++ b/texi/gnusref-ja.tex @@ -0,0 +1,735 @@ +% include file for the Gnus refcard and booklet +\def\progver{5.0}\def\refver{5.0} % program and refcard versions +\def\date{16 September 1995} +\def\author{Vladimir Alexiev $<$vladimir@cs.ualberta.ca$>$} +\raggedbottom\raggedright +\newlength{\logowidth}\setlength{\logowidth}{6.861in} +\newlength{\logoheight}\setlength{\logoheight}{7.013in} +\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}\\} +\catcode`\^=12 % allow ^ to be typed literally +\newcommand{\B}[1]{{\bf#1})} % bold l)etter + +\def\Title{ +\begin{center} +{\bf\LARGE Gnus \progver\ Reference \Guide\\} +%{\normalsize \Guide\ version \refver} +\end{center} +} + +\newcommand\Logo[1]{\centerline{ +\makebox[\logoscale\logowidth][l]{\vbox to \logoscale\logoheight +{\vfill\special{psfile=gnuslogo.#1}}\vspace{-\baselineskip}}}} + +\def\CopyRight{ +\begin{center} +Copyright \copyright\ 1995 Free Software Foundation, Inc.\\* +Copyright \copyright\ 1995 \author.\\* +Created from the Gnus manual Copyright \copyright\ 1994 Lars Magne +Ingebrigtsen.\\* +and the Emacs Help Bindings feature (C-h b).\\* +Gnus logo copyright \copyright\ 1995 Luis Fernandes.\\* +\end{center} + +Permission is granted to make and distribute copies of this reference +\guide{} provided the copyright notice and this permission are preserved on +all copies. Please send corrections, additions and suggestions to the +above email address. \Guide{} last edited on \date. +} + +\def\Notes{ +\subsec{Notes} +{\samepage +Gnus $B$OJ#;($G$9(B. $B8=:_$O(B 346 $B$b$NBPOCE*(B ($BMxMQl=j$N@aLs$N$?$a$K(B, $B$3$N(B \guide $B$G$OA4$F$N4X?t$O(B ``$B$h$jO@M}E*(B'' $B$JB+G{(B +$B$G0lEY$@$1I=<($5$l$F$$$^$9(B. $BB>$NB+G{$O5-=R$N:G=i$K3g8L$NCf$GM?$($i$l$F(B +$B$$$^$9(B. + +$BB?$/$N(B gnus $B$NL?Na$O?tCM0z?t$K1F6A$5$l$^$9(B. $BIaDL$O%a%?%-!<$r2!$7$F$$$k(B +$B4V$K@\F,0z?t$rF~NO$7$^$9$,(B, $B$?$$$F$$$N(B gnus $B$N%b!<%I$G$O(B, $B?t;z$,<+J,<+(B +$B?H$rA^F~$7$J$$$?$a(B, $B%a%?$r;H$&I,MW$O$"$j$^$;$s(B. $B@\F,0z?t$NIU$$$?$H$-$N(B +$B?6$kIq$$$O(B [$B3Q3g8L(B] $B$G=q$+$l$F$$$^$9(B. $B@\F,0z?t$O$7$P$7$P(B + +\quad [$B5wN%(B] $B%]%$%s%H$,$I$N$/$i$$$N%*%V%8%'%/%H$rHt$P$9$+(B. + +\quad [$BHO0O(B] $B$I$N$/$i$$$N%*%V%8%'%/%H$,:nMQ$5$l$k$+(B ($B8=:_$NJ*$r4^$`(B). + +\quad [p/p] ``$B%W%m%;%9(B/$B@\F,0z?t$N=,47(B'': $B@\F,0z?t$,M?$($i$l$k$H(B, $B:nMQ(B +$B$9$kBP>]$N?t$r7hDj$7$^$9(B. $B%W%m%;%90u(B \# $B$G0u$NIU$$$?BP>]$,$"$l$P(B, $B$=$l(B +$B$i$,:nMQ$5$l$^$9(B. $B$=$&$G$J$1$l$P(B, $B8=:_$NBP>]$@$1$,1F6A$rDj$7$F$$$^$9(B. $BMxMQuBV(B \\ +\hline +1 & $B%a!<%k%0%k!<%W(B & \\ +2 & $B%a!<%k%0%k!<%W(B & \\ +3 & & $B9VFI(B \\ +4 & & \\ +5 & $B=i4|0lMw%l%Y%k(B & \\ +\hline +6 & & $BHs9VFI(B \\ +7 & & \\ +\hline +8 & & $B%>%s%S(B \\ +\hline +9 & & $B:o=|(B \\ +\hline +\end{tabular} +} + +\def\Marks{ +\subsec{$B0u;X<(J8;z(B} +{\samepage $BL?Na$,D>@\0u$rIU$1$k>l9g$O(B, $B3g8L$GI=<($5$l$F$$$^$9(B. \\* +\newlength{\markcolwidth} +\settowidth{\markcolwidth}{` '}% widest character +\addtolength{\markcolwidth}{4\tabcolsep} +\addtolength{\markcolwidth}{-\columnwidth} +\newlength{\markdblcolwidth} +\setlength{\markdblcolwidth}{\columnwidth} +\addtolength{\markdblcolwidth}{-2\tabcolsep} +\begin{tabular}{|c|p{-\markcolwidth}|} +\hline +\multicolumn{2}{|p{\markdblcolwidth}|}{{\bf ``$B4{FI(B'' $B0u(B.} + $B$3$l$i$N0u$NA4$F$O35N,9T$N:G=i$N7e$K8=$l$^$9$N$G(B, $B6&B8$9$k$3$H$O$G$-(B + $B$^$;$s(B.}\\ +\hline +` ' & (M-u, M SPC, M c) $BL$FI(B.\\ +! & (!, M !, M t) $B2D;k(B ($B6=L#?<$$(B).\\ +? & (?, M ?) $BJ]N1(B ($B%U%)%m!<%"%C%W$N$_$K6=L#$,$"$k(B).\\ +C & (C, S c) {\bf $B%-%c%s%;%k:Q$_(B} ($B<+J,<+?H$N5-;v$N$_(B.\\ +\hline\hline +\multicolumn{2}{|p{\markdblcolwidth}|}{$B2<$N0u$O5-;v$,4{FI(B ($B@Z$i$l$?(B, + $B6=L#$N$J$$(B) $B$H$$$&$3$H$r0UL#$7(B, $BBgBNF1MM$J8z2L$r;}$A$^$9(B. $B$7$+$7L?Na(B + $B$K$O$=$l$i$GL@$i$+$J0c$$$,$"$k$b$N$b$"$j$^$9(B ($BNc(B. \ M M-C-r, $BE,1~%9(B + $B%3%"(B).}\\ +\hline +r & (d, M d, M r) $B>C5n(B ($B4{FI(B ({\bf read}) $B$H$7$F0uIU$1$i$l$?(B).\\ +C & (M C; M C-c; M H; c, Z c; Z n; Z C) {\bf catch-up} $B$G@Z$i$l$?(B.\\ +O & $B8E$$(B ({\bf old}) ($BA02s$N%;%C%7%g%s$G4{FI$N0u$,IU$$$?(B).\\ +K & (k, M k; C-k, M K) $B@Z$i$l$?(B ({\bf Killed}).\\ +R & $B4{FI(B ({\bf read}) ($B$N0u(B ({\bf Other marks})}\\ +\hline +\# & (\#, M \#, M P p) $Be(B.\\ +$-$ & $B=i4|%9%3%"$h$j2<(B.\\ += & $B;R$r;}$D(B ($B$=$N2<$K%9%l%C%I$r(B). `\%e' `gnus-summary-line-format' +$B$r2C$($^$9(B.\\ + +\hline +\end{tabular} +}} + +\def\GroupMode{ +\sec{$B%0%k!<%W%b!<%I(B} +\begin{keys}{C-c M-C-x} +RET & (=) $B$3$N%0%k!<%W$rA*Br$7$^$9(B. [$B@\F,0z?t(B: $B$I$l$/$i$$$N(B ($B4{FI(B) +$B5-;v$re$HF1$8$G$9(B.]\\ +? & $BHs>o$KC;$$%X%k%W%a%C%;!<%8$rM?$($^$9(B.\\ +$<$ & $B%0%k!<%W%P%C%U%!$N:G=i$K0\F0$7$^$9(B.\\ +$>$ & $B%0%k!<%W%P%C%U%!$N:G8e$K0\F0$7$^$9(B.\\ +, & $B:GDc%l%Y%k$NL$FI5-;v$KHt$S$^$9(B.\\ +. & $B:G=i$NL$FI5-;v$N$"$k%0%k!<%W$KHt$S$^$9(B.\\ +^ & $B%5!<%P!<%P%C%U%!%b!<%I$KF~$j$^$9(B.\\ +a & $B5-;v(B ({\bf article}) $B$r%0%k!<%W$KEj9F$7$^$9(B.\\ +b & $B56(B ({\bf bogus}) $B%0%k!<%W$r8+$D$1$F>C5n$7$^$9(B.\\ +c & $BA4$F$NL$0u5-;v$K4{FI$N0u$rIU$1$^$9(B ({\bf catch-up}). [p/p]\\ +g & $B?7$7$$5-;v$,$"$k$+(B, $B%5!<%P!<$rD4$Y$^$9(B ({\bf get}). [$B%l%Y%k(B]\\ +j & $B%0%k!<%W$KHt$S$^$9(B ({\bf jump}).\\ +m & $BC/$+$K%a!<%k(B ({\bf mail}) $B$rAw$j$^$9(B.\\ +n & $BL$FI5-;v$N$"$kC5n$7$^$9(B.\\ +C-c C-d & $B$3$N%0%k!<%W$N@bL@(B ({\bf description}) $B$rI=<($7$^$9(B. [$B@\F,0z(B +$B?t(B: $B%5!<%P!<$+$i:FFI$_9~$_$r$7$^$9(B.]\\ +C-c C-s & $B%0%k!<%W$rL>A0(B, $B%0%k!<%WL>(B, $B%l%Y%k(B +(`gnus-group-sort-function' $B$K0MB8$7$^$9(B) $B$GL$FI5-;v$N?t$GJB$S49$((B +({\bf Sort}) $B$^$9(B. .\\ +C-c C-x & $B$3$N%0%k!<%W$NA4$F$N;~8B>C5n2DG=5-;v$r;~8B>C5n(B ({\bf +expiry}) $B$N2aDx$K$+$1$^$9(B.\\ +C-c M-C-x & $B$3$N%0%k!<%W$NA4$F$N5-;v$r;~8B>C5n(B ({\bf expiry}) $B$N2aDx$K(B +$B$+$1$^$9(B.\\ +C-x C-t & 2$B$D$N%0%k!<%W$N0LCV$rJQ99$7$^$9(B ({\bf transpose}).\\ +M-d & $BA4$F$N%0%k!<%W$N@bL@(B ({\bf describe}) $B$r$7$^$9(B. [$B@\F,0z?t(B: +$B%5!<%P!<$+$i@bL@$r:FFI$_9~$_$7$^$9(B.]\\ +M-f & $B$3$N%0%k!<%W$N(B {\bf FAQ} $B$r(B (ange-ftp $B$r;H$C$F(B) $BA0$+@bL@(B ({\bf descriptions}) $B$,@55,I=8=$K9g$&A4$F$N%0%k!<(B +$B%W$r0lMwI=<($7$^$9(B.\\ +A k & (C-c C-l) $BA4$F$N:o=|$5$l$?(B ({\bf killed}) $B%0%k!<%W$r0lMwI=<((B +$B$7$^$9(B.\\ +A m & $B@55,I=8=$K9g$$(B ({\bf match}), $BL$FI5-;v$r;}$D%0%k!<%W$r0lMwI=(B +$B<($7$^$9(B. [$B%l%Y%k(B]\\ +A s & (l) $BL$FI5-;v$N$"$k9VFI%0%k!<%W(B {\bf subscribed} $B$r0lMwI=<($7(B +$B$^$9(B. [$B%l%Y%k(B]\\ +A u & (L) $BA4$F$N%0%k!<%W(B ($BHs9VFI(B ({\bf unsubscribed}) $B$r4^$`(B) $B$r0l(B +$BMwI=<($7$^$9(B. [$B@\F,<-$,M?$($i$l$J$$$H(B, $B=i4|CM$O%l%Y%k(B7$B$G$9(B]\\ +A z & $B%>%s%S(B ({\bf zombie}) $B%0%k!<%W$r0lMwI=<($7$^$9(B.\\ +A M & $B@55,I=8=$K9g$&(B ({\bf match}) $BA4$F$N%0%k!<%W$r0lMwI=<($7$^$9(B.\\ +\end{keys} +} + +\subsec{$B30It%0%k!<%W$N:n@.(B/$BJT=8(B} +{\samepage +$BA*BrJ}K!$O3g8L$NCf$K<($5$l$F$$$^$9(B.\\* +\begin{keys}{G m} +G a & Gnus $B%j%9%H(B {\bf archive} $B%0%k!<%W$r:n$j$^$9(B. (ange-ftp $B$rDL(B +$B$8$F$N(B nndir)\\ +G d & $B%G%#%l%/%H%j!<(B ({\bf directory}) $B%0%k!<%W(B $B$r:n$j$^$9(B ($BA4$F$N(B +$B%U%!%$%k$OEj9F5-;v$G(B, $B%U%!%$%k$O?t;z$NL>A0$G$J$/$F$O$J$^$;$s(B). +(nndir)\\ +G e & (M-e) $B$3$N%0%k!<%W$NA*BrJ}K!$rJT=8(B ({\bf edit}) $B$7$^$9(B.\\ +G f & $B%U%!%$%k(B ({\bf file}) $B$K4p$E$$$?%0%k!<%W$r:n$j$^$9(B. +(nndoc)\\ +G h & Gnus $B$N%X%k%W(B ({\bf help}) ($B@bL@(B) $B%0%k!<%W$r:n@.$7$^$9(B. +(nndoc)\\ +G k & {\bf kiboze} $B%0%k!<%W$r:n@.$7$^$9(B. (nnkiboze)\\ +G m & $B?7$7$$%0%k!<%W$r:n@.(B ({\bf make}) $B$7$^$9(B.\\ +G p & $B$3$N%0%k!<%W$N%Q%i%a!<%?(B ({\bf parameters}) $B$rJT=8$7$^$9(B.\\ +G v & $B$3$N%0%k!<%W$r2>A[(B ({\bf virtual}) $B%0%k!<%W$KDI2C$7$^$9(B. +[p/p]\\ +G D & $B%G%#%l%/%H%j!<(B ({\bf directory}) $B$K(B ($B0l;~(B) $B%0%k!<%W$H$7$FF~(B +$B$j$^$9(B. ($B5-;v$N4{FI$r5-O?$7$J$$(B nneething.)\\ +G E & $B$3$N%0%k!<%W$N>pJs(B ($BA*BrJ}K!(B, $B5-;v$N4{FI(B, $B$J$I$J$I(B) $B$rJT=8(B +({\bf edit}) $B$7$^$9(B.\\ +G V & $B?7$7$$6u$N2>A[(B ({\bf virtual}) $B%0%k!<%W$r:n@.$7$^$9(B. +(nnvirtual)\\ +\end{keys} +$B%a!<%k%0%k!<%W$r:n@.$7$F%a!<%k$r(B nnmbox, nnbabyl, nnml, nnmh, nnfolder +$B$N(B1$B$D$NJ}K!$r;H$C$F(BGnus $B$GFI$`$3$H$b$G$-$^$9(B ($B%a!<%j%0%j%9%H$r9VFI$7$F(B +$B$$$k$HHs>o$KLr$KN)$A$^$9(B). $B%*%s%i%$%s(B info $B$GFI$s$G$/$@$5$$(B (C-c C-i g +Reading Mail RET). +} + +%\subsubsec{Soup Commands} +%\begin{keys}{G s w} +%G s b & gnus-group-brew-soup: not documented.\\ +%G s p & gnus-soup-pack-packet: not documented.\\ +%G s r & nnsoup-pack-replies: not documented.\\ +%G s s & gnus-soup-send-replies: not documented.\\ +%G s w & gnus-soup-save-areas: not documented.\\ +%\end{keys} + +\subsec{$B%0%k!<%W$N0uIU$1(B} +\begin{keys}{M m} +M m & (\#) $B$3$N%0%k!<%W$K%W%m%;%90u(B {\bf mark} $B$rIU$1$^$9(B. [$BHO0O(B]\\ +M u & (M-\#) $B$3$N%0%k!<%W$+$i%W%m%;%90u$rC5n(B {\bf +unmark}). +[$BHO0O(B]\\ +M w & $B8=:_$N%j!<%8%g%s$NA4$F$N%0%k!<%W$K0u$rIU$1$^$9(B.\\ +\end{keys} + +\subsec{$BHs9VFI(B, $B%0%k!<%W$r@Z$jE=$j$9$k(B} +\begin{keys}{S w} +S k & (C-k) $B$3$N%0%k!<%W$r@Z$j$^$9(B ({\bf kill}).\\ +S l & $B$3$N%0%k!<%W$N%l%Y%k(B ({\bf level}) $B$r@_Dj$7$^$9(B. [p/p]\\ +S s & (U) $B%0%k!<%W$NF~NO$rB%?J$7$F$=$N9VFI(B ({\bf subscription}) $B$r(B +$B@Z$jBX$($^$9(B.\\ +S t & (u) $B$3$N%0%k!<%W$N9VFI$r@Z$jBX$((B ({\bf toggle}) $B$^$9(B. +[p/p]\\ +S w & (C-w) $B%j!<%8%g%s$NA4$F$N%0%k!<%W$r@Z$j$^$9(B.\\ +S y & (C-y) $B:G8e$K(B kill $B$5$l$?%0%k!<%W$rE=$j$^$9(B ({\bf yank}) .\\ +S z & $BA4$F$N%>%s%S(B ({\bf zombie}) $B%0%k!<%W$r@Z$j$^$9(B.\\ +\end{keys} +} + +\def\SummaryMode{ +\sec{$B35N,%b!<%I(B} %{Summary and Article Modes} +\begin{keys}{SPC} +SPC & (A SPC, A n) $B5-;v$NA*Br(B, 1$B%Z!<%8%9%/%m!<%k(B, $B$ & (A $>$, A e) $B$3$N5-;v$N:G8e$K%9%/%m!<%k$7$^$9(B.\\ +\& & $B@55,I=8=$K9g$&A4$F$N5-;v$KL?Na$rC5n(B (\bf delete}) $B$7$^$9(B (!). [p/p]\\ +B c & $B$3$N5-;v$r$I$3$+$N%0%k!<%W$+$i%a!<%k%0%k!<%W$KJ#@=(B ({\bf +copy}) $B$7$^$9(B. [p/p]\\ +B e & $B$3$N%0%k!<%W$NA4$F$N;~8B>C5n2DG=5-;v$r;~8B>C5n(B ({\bf +expire}) $B$7$^$9(B. [p/p]\\ +B i & $B%i%s%@%`$J%U%!%$%k$r$3$N%0%k!<%W$NC5n2DG=5-;v$r:o=|(B ({\bf expunge}) +($B%G%#%9%/$+$i>C$7$^$9(B) (!). [p/p]\\ +\end{keys} +}} + +\def\Gsubmap{ +\subsec{$B5-;vA*Br(B} +{\samepage +$B$3$l$i$NL?Na$OBP>]5-;v$rA*Br$7$^$9(B. $B@\F,0z?t$OM}2r$7$^$;$s(B. \\* +\begin{keys}{G C-n} +G b & (,) $B:G9b(B ({\bf best}) $B$N5-;v$K0\F0$7$^$9(B ($B:G9b%9%3%"$N$b$N$G(B +$B$9(B).\\ +G f & (.) $B:G=i(B ({\bf first}) $B$NL$FI5-;v$K0\F0$7$^$9(B.\\ +G l & (l) $B:G8e(B ({\bf last}) $B$N4{FI5-;v$K0\F0$7$^$9(B.\\ +G n & (n) $Bo$KC;$$%X%k%W(B ({\bf help}) $B%a%C%;!<%8$rI=<($7$^$9(B.\\ +H i & (C-c C-i) Gnus $B$N%*%s%i%$%s(B {\bf info} $B$K0\F0$7$^$9(B.\\ +H v & Gnus $B$N%P!<%8%g%s(B ({\bf version}) $BHV9f$rI=<($7$^$9(B.\\ +\end{keys} +} + +\def\Msubmap{ +\subsec{$B5-;v$K0u$rIU$1$k(B} +\begin{keys}{M M-C-r} +d & (M d, M r) $B$3$N5-;v$K4{FI$N0u$rIU$1$F(B, $BC5n$7(B, $BC5n$7(B, $BA0$N5-;v$K0\F0$7$^$9(B. [$BHO0O(B]\\ +M ? & (?) $B$3$N5-;v$KJ]N1$N0u$rIU$1$^$9(B ($B%U%)%m!<%"%C%W$K$@$16=L#$,(B +$B$"$k(B). [$BHO0O(B]\\ +M b & $B$3$N5-;v$K$7$*$j(B ({\bf bookmark}) $B$r@_Dj$7$^$9(B.\\ +M e & (E, M x) $B$3$N5-;v$r;~8B>C5n2DG=(B ({\bf expirable}) $B$H$7$F0u$r(B +$BIU$1$^$9(B. [$BHO0O(B]\\ +M k & (k) $BF1$8I=Bj$NA4$F$N5-;v$r@Z$j(B ({\bf kill}), $BC5n$7$^$9(B.\\ +M M-D & $BA4$F$NJ]N1(B ({\bf dormant}) $B5-;v$r1#$7$^$9(B.\\ +M M-C-r & $BM?$($i$l$?0u$NA4$F$N5-;v$r>C5n$7$^$9(B.\\ +\end{keys} + +\subsubsec{$B%9%3%"$K4p$E$$$?0u(B} +\begin{keys}{M s m} +M V c & $BA4$F$N9b%9%3%"$N5-;v$+$iA4$F$N0u$r>C5n(B ({\bf clear}) $B$7$^$9(B. +[score]\\ +M V k & $BA4$F$NDc%9%3%"$N5-;v$r@Z$j$^$9(B ({\bf kill}). [score]\\ +M V m & $BA4$F$N9b%9%3%"$N5-;v$KM?$($i$($l$?0u(B ({\bf mark}) $B$rIU$1$^$9(B. +[score]\\ +M V u & $BA4$F$N9b%9%3%"$N5-;v$r$*$b$7$m$$$H$7$F0u$rIU$1$^$9(B ($B2D;k0u$r(B +$BIU$1$^$9(B). [score]\\ +\end{keys} + +\subsubsec{$B%W%m%;%90u(B} +{\samepage +$B$3$l$i$NL?Na$O%W%m%;%90u(B \# $B$rIU$1$?$j>C5n$7$?$j$7$^$9(B. $BA`:n$7$?$$5-;v(B +$B$,O"B3$7$F$$$J$$$H$-$@$1$=$l$r;H$&I,MW$,$"$k$G$7$g$&(B. $B$=$&$G$J$1$l$P?t(B +$BCM0z?t$r;H$$$^$9(B.\\* +\begin{keys}{M P R} +M P a & $BA4$F(B ({\bf all}) $B$N5-;v$K0u$rIU$1$^$9(B ($B=gHV$K(B).\\ +M P p & (\#, M \#) $B$3$N5-;v$K0u$rIU$1$^$9(B.\\ +M P r & $B6h0h(B ({\bf region}) $B$NA4$F$N5-;v$K0u$rIU$1$^$9(B.\\ +M P s & $B8=:_$NO"B3J*(B ({\bf series}) $B$NA4$F$K0u$rIU$1$^$9(B.\\ +M P t & $B$3$N(B ($BI{(B)$B%9%l%C%I(B ({\bf thread}) $B$NA4$F$N5-;v$K0u$rIU$1$^$9(B.\\ +M P u & (M-\#, M M-\#) $B$3$N5-;v$+$i0u$r>C$7$^$9(B ({\bf unmark}).\\ +M P R & $B@55,I=8=(B ({\bf regexp}) $B$K9g$&A4$F$N5-;v$K0u$rIU$1$^$9(B.\\ +M P S & $B0uIU$-$N5-;v$r4^$`A4$F$NO"B3$7$?5-;v(B ({\bf series}) $B$K0u$rIU(B +$B$1$^$9(B.\\ +M P U & $BA4$F$N5-;v$+$i0u$r>C$7$^$9(B ({\bf unmark}).\\ +\end{keys} +}} + +\def\Osubmap{ +\subsec{$B5-;v$N=PNO(B} +\begin{keys}{O m} +O f & $B$3$N5-;v$r%W%l%$%s%U%!%$%k(B ({\bf file}) $B7A<0$GJ]B8$7$^$9(B. +[p/p]\\ +O h & $B$3$N5-;v$r(B {\bf mh} $B%U%)%k%@!<$N7A<0$GJ]B8$7$^$9(B. [p/p]\\ +O m & $B$3$N5-;v$r%a!<%k(B ({\bf mail}) $B7A<0$GJ]B8$7$^$9(B. [p/p]\\ +O o & (o, C-o) $B$3$N5-;v$r=i4|5-;vJ]B84o$r;H$C$FJ]B8$7$^$9(B. [p/p]\\ +O p & ($\mid$) $B$3$N5-;v$r%7%'%k%3%^%s%I$K%Q%$%W$GAw$j$^$9(B. [p/p]\\ +O r & $B$3$N5-;v$r(B {\bf rmail} $B7A<0$GJ]B8$7$^$9(B. [p/p]\\ +O v & $B$3$N5-;v$r(B {\bf vm} $B$N7A<0$GJ]B8$7$^$9(B. [p/p]\\ +\end{keys} +} + +\def\Ssubmap{ +\subsec{$BEj9F(B, $B%U%)%m!<%"%C%W(B, $BJVEz(B, $BE>Aw(B, $BC$7(B} +{\samepage +$B$3$l$i$NL?Na$OJL$NEj9F$+%a!<%k%P%C%U%!$K9T$-$^$9(B. $B5-;v$rJT=8$7$?8e(B, +C-c C-c $B$r2!$7$FAw?.$7$^$9(B. $B30It%0%k!<%W$K$$$F(B, $B30It%5!<%P!<$r;H$C$F5-(B +$B;v$rEj9F$7$?$$$J$i(B, C-c C-c $B$K@\F,<-$rM?$($F$/$@$5$$(B.\\* +\begin{keys}{S O m} +S b & $B$3$N5-;v$X$N%U%)%m!<%"%C%W$NEj9F$H(B, $BJVEz$NAw?.$NN>J}(B ({\bf +both}) $B$r$7$^$9(B.\\ +S c & (C) $B$3$N5-;v$rC$7$^$9(B ({\bf cancel}) ($B<+J,<+?H$N$b$N$K(B +$B$N$_F0:n$7$^$9(B).\\ +S f & (f) $B$3$N5-;v$X$N%U%)%m!<%"%C%W(B ({\bf followup}) $B$rEj9F$7$^$9(B.\\ +S m & (m) $BC/$+JL$N?M$K%a!<%k(B {\bf mail} $B$rAw$j$^$9(B.\\ +S o m & (C-c C-f) $B$3$N5-;v$r0l$K%a!<%k$rAw$k(B ({\bf mail}) $B$3$H$GE>Aw(B +$B$7$^$9(B.\\ +S o p & $B$3$N5-;v$r%K%e!<%9%0%k!<%W$X$NEj9F(B ({\bf post}) $B$H$7$FE>Aw$7(B +$B$^$9(B.\\ +S p & (a) $B$3$N%0%k!<%W$K5-;v$rEj9F(B ({\bf post}) $B$7$^$9(B.\\ +S r & (r) $B$3$N5-;v$NCxJ}(B ({\bf +both}) $B$r$7$^$9(B. [p/p]\\ +S F & (F) $B855-;v$r0zMQ$7$F%U%)%m!<%"%C%W(B ({\bf followup}) $B$rEj9F$7(B +$B$^$9(B. [p/p]\\ +S O m & $B$3$l$i$NO"B3$r=8G[7A<0$K$7$F%a!<%k(B ({\bf mail}) $B$GE>Aw$7$^$9(B. +[p/p]\\ +S O p & $B$3$l$i$NO"B3$r=8G[7A<0$K$7$F%K%e!<%9%0%k!<%W$KEj9F(B ({\bf +post}) $B$7$^$9(B. [p/p]\\ +S R & (R) $B855-;v$r0zMQ$7$F%a!<%k$GJVEz(B ({\bf reply}) $B$7$^$9(B. +[p/p]\\ +\end{keys} +$B$?$C$?:#Ej9F$7$?5-;v$rC$7$?$jBeBX$7$?$1$l$P(B ($B%5!<%P!<$K8=$l$kA0$K(B), +*post-news* $B%P%C%U%!$K0\F0$7$F(B, `Message-ID' $B$r(B `Cancel' $B$+(B +`Supersedes' $B$K49$($F(B C-c C-c $B$G$b$&0lEYAw?.$7$F$/$@$5$$(B. +}} + +\def\Tsubmap{ +\subsec{$B%9%l%C%IL?Na(B} +\begin{keys}{T \#} +T \# & $B$3$N%9%l%C%I$K%W%m%;%90u$rIU$1$^$9(B.\\ +T d & $B$3$N%9%l%C%I$Ne$2$^$9(B ({\bf increase}).\\ +T k & (M-C-k) $B8=:_$N(B ($BI{(B)$B%9%l%C%I$r@Z$j$^$9(B ({\bf kill}). [$BIi$N0z(B +$B?t(B: $B2D;k0u(B, $B@5$N0z?t(B: $B0u$r>C$9(B.]\\ +T l & (M-C-l) $B$3$N%9%l%C%I$N%9%3%"$r2<$2$^$9(B ({\bf lower}).\\ +T n & (M-C-f) $BC5n(B ({\bf expunge}) $B$7$^$9(B. [score]\\ +V C & $B8=:_$N%9%3%"%U%!%$%k$rMxMQ$;\\* +\quad \B{l}ifetime: t)emporary, p)ermanent, i)mmediate. + +2$BHVL\$NJ8;z$rBgJ8;z$GF~NO$9$k$H(B, $B;D$j$N(B2$B$D$O(B s)ubstring $B$H(B t)emporary +$B$G$"$k$H$_$J$5$l$^$9(B. 3$BHVL\$NJ8;z$rBgJ8;z$GF~NO$9$k$H(B, $B:G8e$N$b$N$O(B +t)emporary $B$G$"$k$H$_$J$5$l$^$9(B. + +\quad $B%9%3%"%U%!%$%k$NJ,$J(B {\bf CRs} (^M) $B$r(B ({\bf rotate}) (rot13) $B$r9T$$$^$9(B.\\ +W t & (t) $BA4$F$N%X%C%@!iD9$J(B ({\bf verbose}) $BI=<($r@Z$jBX$($^$9(B.\\ +W w & $B5-;v$N8l$N@^$jJV$7(B ({\bf wrap}) $B$r9T$$$^$9(B.\\ +W T e & $B5-;v$N;~9o$rAw$i$l$?;~$+$i7P2a$7$?(B ({\bf elapsed}) $B;~4V$KJQ(B + $B49$7$^$9(B.\\ +W T l & $B5-;v$N;~9o$r%m!<%+%k(B ({\bf local}) $BI8=`;~9oBS$KJQ49$7$^$9(B.\\ +W T u & (W T z) $B5-;v$N;~9o$r(B {\bf UTC} ({\bf Zulu}, GMT) $B$KJQ49$7$^(B + $B$9(B.\\ +\end{keys} + +\subsubsec{$B5-;v$NItJ,$r1#$9(B/$B%O%$%i%$%H$9$k(B} +\begin{keys}{W W C-c} +W W a & $BA4$F$N(B ({\bf all}) $BK>$^$7$/$J$$ItJ,$r1#$7$^$9(B. W W h, W W s, +W W C-c $B$r(B ({\bf signature}) $B$r1#$7$^$9(B.\\ +W W C-c & $B5-;v$N0zMQ(B ({\bf citation}) $B$r$h$j@vN}$5$l$?%"%k%4%j%:%`$r;H$C(B +$B$F1#$7$^$9(B.\\ +%\end{keys} +% +%\subsubsec{Highlight Parts of the Article} +%\begin{keys}{W H A} +W H a & $BA4$F(B ({\bf all}) $B$NItJ,$r1#$7$^$9(B. W b, W H c, W H h, W H +s. $B$r(B ({\bf signature}) $B$r%O%$%i%$%H$7$^$9(B.\\ +\end{keys} +} + +\def\Xsubmap{ +\subsec{$BO"B3$NE83+(B (Uudecode $B$J$I(B)} +{\samepage +Gnus $B$O8=:_$N5-;v$,O"B3J*(B ($B$=$l$>$l$NItJ,$,I=Bj$K$*$$$F(B, $BNc$($P(B +{}1/10\dots10/10 $B$N$h$&$K(B, $B?t;z$GF1Dj$5$l$kJ#?t$NEj9F(B) $B$N0lIt$G$"$k$H(B, +$B$=$l$rG'<1$7$F$=$NO"B3J*$r$=$l$>$le$NO"B3J*(B +$B$K0u$rIU$1$F$l$K$O(B4$B$D$N0[7A$,$"$j$^$9(B:\\* +\begin{keys}{X v \bf Z} +X \bf z & $BO"B3J*$rI|9f2=$7$^$9(B. [p/p]\\ +X \bf Z & $BO"B3J*$rI|9f2=$7$FJ]B8$7$^$9(B. [p/p]\\ +X v \bf z & $BO"B3J*$rI|9f2=$7$F1\Mw$7$^$9(B. [p/p]\\ +X v \bf Z & $BO"B3J*$rI|9f2=$7(B, $BJ]B8$7(B, $B1\Mw$7$^$9(B. [p/p]\\ +\end{keys} +{\bf z} $B$d(B {\bf Z} $B$OI|9f2=$NJ}K!$r<($7$^$9(B (b, o, p, s, u). + +$B$3$l$i$NL?Na$G:G$bNI$/;H$o$l$kJL$NB+G{$O(B\\* +\begin{keys}{C-c C-v C-v} +C-c C-v C-v & (X v u) $BO"B3J*$r(B uudecode $B$71\Mw$7$^$9(B. [p/p]\\ +\end{keys} +}} + +\def\Zsubmap{ +\subsec{$B8=:_$N%0%k!<%W$r=P$k(B} +\begin{keys}{Z G} +Z c & (c) $BA4$F$N2D;k0uIU$-$G$J$$5-;v$K4{FI$N0u$rIU$1(B ({\bf +catch-up}, $B%-%c%C%A%"%C%W(B) $B=*N;$7$^$9(B.\\ +Z n & $BA4$F$N5-;v$K4{FI$N0u$rIU$1(B, $BpJs$r99?7$;$:$K=*N;(B ({\bf Exit}) $B$7$^$9(B.\\ +Z G & (M-g) $B%0%k!<%W$N?7$7$$5-;v$rD4$Y$^$9(B ({\bf get}, $BJ}(B) $B$O%a%C%;!< * Key Index:: $B%a%C%;!<%8%b!<%I%-!<$N0lMw!#(B @end menu -$B$3$N%^%K%e%"%k$O(B Message 5.6.22 $B$KBP1~$7$^$9!#(BMessage $B$O$3$N%^%K%e%"%k$H(B +$B$3$N%^%K%e%"%k$O(B Message 5.6.45 $B$KBP1~$7$^$9!#(BMessage $B$O$3$N%^%K%e%"%k$H(B $BF1$8HGHV9f$N(B Gnus $B$NG[I[$H6&$KG[I[$5$l$^$9!#(B diff --git a/texi/refcard-ja.tex b/texi/refcard-ja.tex new file mode 100644 index 0000000..28f4759 --- /dev/null +++ b/texi/refcard-ja.tex @@ -0,0 +1,65 @@ +% Reference Card for (ding) Gnus, 3 twocolumn pages. +% To be processed with latex 2.09 +\def\Guide{Card}\def\guide{card} +\def\logoscale{0.25} +\def\sec{\section*} +\def\subsec{\subsection*} +\def\subsubsec{\subsubsection*} +\documentstyle{article} +\textwidth 7.26in \textheight 10in \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 +\begin{document} +\twocolumn\scriptsize\pagestyle{empty} +\input{gnusref-ja} + +% page 1, left column +\Title +\par +\vspace{0.5\baselineskip} +\Logo{refcard} +\vspace*{\fill} +\GroupLevels +\GroupMode +\pagebreak + +% page 1, right column +\Notes +\vspace*{\fill} +\GroupCommands +\pagebreak + +% page 2, left column +\SummaryMode +\Asubmap +\Bsubmap +\Gsubmap +\Hsubmap +\Tsubmap +\pagebreak + +% page 2, right column +\Msubmap +\Marks +\pagebreak + +% page 3 +\Osubmap +\Ssubmap +\Xsubmap +\Vsubmap +\SortSummary +\Wsubmap +\Zsubmap +\ArticleMode +\ServerMode + +% page 4 +\BrowseServer +\pagebreak +\onecolumn +\vspace*{\fill} +\CopyRight + +\end{document}