+2001-12-26 Florian Weimer <fw@deneb.enyo.de>
+
+ * gpg.el (gpg-command-default-alist): Using gpg-2comp is no longer
+ the default.
+
2001-12-18 Josh Huber <huber@alum.wpi.edu>
* ChangeLog: changed buffer-file-coding-system back to
;; * Customization for all flavors of PGP is possible.
;; * The main operations (verify, decrypt, sign, encrypt, sign &
;; encrypt) are implemented.
-;; * Gero Treuner's gpg-2comp script is supported, and data which is is
-;; compatible with PGP 2.6.3 is generated.
+;; * Optionally, Gero Treuner's gpg-2comp script is supported,
+;; to generate data which is compatible with PGP 2.6.3.
;; Customizing external programs
;; =============================
(defcustom gpg-command-default-alist
'((gpg . "gpg")
- (gpg-2comp . "gpg-2comp"))
+ (gpg-2comp . "gpg"))
"Default paths for some GnuPG-related programs.
Modify this variable if you have to change the paths to the
-executables required by the GnuPG interface. You can enter \"gpg\"
-for `gpg-2comp' if you don't have this script, but you'll lose PGP
-2.6.x compatibility."
+executables required by the GnuPG interface. You can enter \"gpg-2comp\"
+for `gpg-2comp' if you have obtained this script, in order to gain
+PGP 2.6.x compatibility."
:tag "GnuPG programs"
:type 'gpg-command-alist
:group 'gpg-options)
+2001-12-27 Simon Josefsson <jas@extundo.com>
+
+ * gnus-sum.el (gnus-select-newsgroup): Make
+ `gnus-newsgroup-unseen' sorted. Make `gnus-newsgroup-unseen'
+ contain all articles (instead of none) when no seen marks have
+ been set for the group.
+ (gnus-update-marks): Use `gnus-range-add' on a uncompressed list
+ instead, it seems to result in shorter ranges.
+
+2001-12-26 11:00:00 ShengHuo ZHU <zsh@cs.rochester.edu>
+
+ * mm-util.el (mm-iso-8859-x-to-15-region): Use
+ insert-before-markers.
+ From Jesper Harder <harder@ifa.au.dk>
+
+2001-12-26 Paul Jarc <prj@po.cwru.edu>
+
+ * nnmaildir.el (nnmaildir-save-mail): create the destination
+ groups if they do not exist.
+
2001-12-26 Katsumi Yamaoka <yamaoka@jpl.org>
* canlock.el (canlock-sha1-with-openssl): Remove unused variable.
* nnrss.el (nnrss-decode-entities-unibyte-string): Use
mm-url-decode-entities-nbsp.
- * nnlistserv.el, nnultimate.el, nnwarchive.el, nnweb.el,
- webmail.el, nnwfm.el: Use mm-url.
+ * nnlistserv.el, nnultimate.el, nnwarchive.el, nnweb.el:
+ * webmail.el, nnwfm.el: Use mm-url.
* mm-url.el (mm-url-fetch-form): Move from nnweb.
(mm-url-remove-markup): Move from nnweb.
(mm-url-fetch-simple): Move from webmail.
- * nnslashdot.el (nnslashdot-request-post): mm-url-fetch-form.
+ * nnslashdot.el (nnslashdot-request-post): Use mm-url-fetch-form.
2001-12-07 01:00:00 ShengHuo ZHU <zsh@cs.rochester.edu>
* nnweb.el (nnweb-replace-in-string): Removed.
- * gnus-util.el (gnus-replace-in-string): New.
+ * gnus-util.el (gnus-replace-in-string): New function.
(gnus-mode-string-quote): Use it.
* nnrss.el (nnrss-format-string): Use gnus-replace-in-string.
2001-11-25 09:00:00 ShengHuo ZHU <zsh@cs.rochester.edu>
- * gnus-util.el (gnus-directory-sep-char-regexp): New.
+ * gnus-util.el (gnus-directory-sep-char-regexp): New variable.
* gnus-score.el (gnus-score-find-bnews): Use it.
* gnus-sum.el (gnus-summary-limit-to-subject): An exclusion version.
2001-11-01 09:00:00 ShengHuo ZHU <zsh@cs.rochester.edu>
- * mm-util.el (mm-iso-8859-x-to-15-region): New.
- (mm-hack-charsets): New.
- (mm-iso-8859-15-compatible): New.
- (mm-iso-8859-x-to-15-table): New.
+ * mm-util.el (mm-iso-8859-x-to-15-region): New function.
+ (mm-hack-charsets): New variable.
+ (mm-iso-8859-15-compatible): New variable.
+ (mm-iso-8859-x-to-15-table): New variable.
(mm-find-mime-charset-region): Add parameter hack-charsets.
* mm-bodies.el (mm-encode-body): Use it.
* smiley-ems.el (smiley-update-cache): Auto detect file type.
- * message.el (message-forward-rmail-make-body):
+ * message.el (message-forward-rmail-make-body): Use
save-window-excursion.
- (message-encode-message-body): no error.
- (message-setup-1): compose-mail send-actions are different from
+ (message-encode-message-body): Search with noerror.
+ (message-setup-1): Convert compose-mail send-actions to
message-send-actions.
2001-11-01 Simon Josefsson <jas@extundo.com>
2001-10-31 08:00:00 ShengHuo ZHU <zsh@cs.rochester.edu>
From: Josh Huber <huber@alum.wpi.edu>
- * message.el (message-subscribed-address-functions): New.
- (message-subscribed-addresses): New.
- (message-subscribed-regexps): New.
- (message-goto-mail-followup-to): New.
- (message-send-mail): Mail-Followup-To.
- (message-make-mft): New.
+ * message.el (message-subscribed-address-functions): New variable.
+ (message-subscribed-addresses): New variable.
+ (message-subscribed-regexps): New variable.
+ (message-goto-mail-followup-to): New function.
+ (message-send-mail): Add Mail-Followup-To.
+ (message-make-mft): New function.
* gnus.el (gnus-find-subscribed-addresses): New.
(let ((marks (assq 'seen (gnus-info-marks info))))
;; The `seen' marks are treated specially.
- (when (setq gnus-newsgroup-seen (cdr marks))
- (dolist (article gnus-newsgroup-articles)
- (unless (gnus-member-of-range
- article gnus-newsgroup-seen)
- (push article gnus-newsgroup-unseen)))))
+ (if (setq gnus-newsgroup-seen (cdr marks))
+ (dolist (article gnus-newsgroup-articles)
+ (unless (gnus-member-of-range article gnus-newsgroup-seen)
+ (setq gnus-newsgroup-unseen
+ (append gnus-newsgroup-unseen (list article)))))
+ (setq gnus-newsgroup-unseen gnus-newsgroup-articles)))
;; Removed marked articles that do not exist.
(gnus-update-missing-marks
(when (eq (cdr type) 'seen)
(setq list
(if list
- (gnus-add-to-range list gnus-newsgroup-unseen)
+ (gnus-range-add (gnus-uncompress-sequence list)
+ gnus-newsgroup-unseen)
(gnus-compress-sequence gnus-newsgroup-articles))))
(when (eq (gnus-article-mark-to-type (cdr type)) 'list)
(setq inconvertible t)
(forward-char))
(t
- (insert (prog1 (+ c (car (cdr item))) (delete-char 1))))
+ (insert-before-markers (prog1 (+ c (car (cdr item)))
+ (delete-char 1))))
(skip-chars-forward "\0-\177"))))
(not inconvertible))))
;; * We make it easy to manipulate marks, etc., from outside Gnus.
;; * All information about a group is stored in the maildir, for easy
;; backup and restoring.
-;; * Use the filesystem as a database.
+;; * We use the filesystem as a database.
;;
;; Todo:
;; * Ignore old NOV data when gnus-extra-headers has changed.
(catch 'return
(if group-art nil
(throw 'return nil))
- (let ((group-art group-art)
- x nnmaildir--file deactivate-mark)
+ (let ((ret group-art)
+ ga gname x groups nnmaildir--file deactivate-mark)
(save-excursion
(goto-char (point-min))
(save-match-data
(while (looking-at "From ")
(replace-match "X-From-Line: ")
(forward-line 1))))
- (setq x (caar group-art) group-art (cdr group-art))
- (if (nnmaildir-request-accept-article x) nil
- (throw 'return nil)) ; not that nnmail bothers to check
- (setq x (nnmaildir--prepare nil x)
+ (setq groups (nnmaildir--srv-get-groups nnmaildir--cur-server)
+ ga (car group-art) group-art (cdr group-art)
+ gname (car ga))
+ (or (intern-soft gname groups)
+ (nnmaildir-request-create-group gname)
+ (throw 'return nil)) ;; not that nnmail bothers to check :(
+ (if (nnmaildir-request-accept-article gname) nil
+ (throw 'return nil))
+ (setq x (nnmaildir--prepare nil gname)
nnmaildir--file (nnmaildir--srv-get-dir nnmaildir--cur-server)
nnmaildir--file (concat nnmaildir--file
(nnmaildir--grp-get-name x))
(nnmaildir--art-get-prefix x)
(nnmaildir--art-get-suffix x)))
(while group-art
- (setq x (caar group-art) group-art (cdr group-art))
- (if (nnmaildir-request-accept-article x) nil
- (throw 'return nil))))
- group-art))
+ (setq ga (car group-art) group-art (cdr group-art)
+ gname (car ga))
+ (if (and (or (intern-soft gname groups)
+ (nnmaildir-request-create-group gname))
+ (nnmaildir-request-accept-article gname)) nil
+ (setq ret (delq ga ret)))) ;; We'll still try the other groups
+ ret)))
(defun nnmaildir-active-number (group)
(let ((x (nnmaildir--prepare nil group)))
+2001-12-26 Florian Weimer <fw@deneb.enyo.de>
+
+ * gnus.texi (Using GPG): Remove obsolete reference to gpg-2comp.
+
+2001-12-26 Simon Josefsson <jas@extundo.com>
+
+ * gnus.texi (Summary Buffer Lines): Add xrefs. Suggested by
+ Arcady Genkin <agenkin-dated-1010249095.131f22@thpoon.com>.
+
2001-12-26 Katsumi Yamaoka <yamaoka@jpl.org>
* gnus.texi (NNTP): Add a note for `nntp-prepare-post-hook'.
@item <
\e$BFs==0z$/%9%l%C%I%l%Y%k$N6uGr!#\e(B
@item U
-\e$BL$FI!#\e(B
+\e$BL$FI!#\e(B@xref{Read Articles}\e$B!#\e(B
@item R
\e$B$3$NJ6$i$o$7$$L>A0;XDj;R$O\e(B @dfn{secondary mark} \e$B$K$h$C$FDj5A$5$l$^$9!#$3\e(B
\e$B$N%^!<%/$O5-;v$,4{$KJVEz:Q$_$N$b$N$+!"%-%c%C%7%e$5$l$?$b$N$+!"$"$k$$$OJ]\e(B
-\e$BB8$5$l$?$b$N$+$rI=$7$^$9!#\e(B
+\e$BB8$5$l$?$b$N$+$rI=$7$^$9!#\e(B@xref{Other Marks}\e$B!#\e(B
@item i
\e$B?t;z$H$7$F$N%9%3%"\e(B (@pxref{Scoring})\e$B!#\e(B
The @code{gpg-temp-directory} need to point to a directory with permissions set
to 700, for your own safety.
-If you want to benefit of PGP2.6 compatibility, you might create a script named
-@file{gpg-2comp} with these instructions:
-
-@example
-#!/bin/sh
-exec gpg --rfc1991 "$@@"
-@end example
-
-If you don't want to use such compatibility, you can add the following line to
-your @file{~/.emacs} or @file{~/.gnus}:
-
-@lisp
-(setq gpg-command-default-alist (quote ((gpg . "gpg") (gpg-2comp . "gpg"))))
-@end lisp
-
To sign or encrypt your message you may choose to use the MML Security
menu or @kbd{C-c C-m s p} to sign your message using PGP/MIME,
@kbd{C-c C-m s s} to sign your message using S/MIME. There's also
@item <
Twenty minus thread level spaces.
@item U
-Unread.
+Unread. @xref{Read Articles}.
@item R
This misleadingly named specifier is the @dfn{secondary mark}. This
mark will say whether the article has been replied to, has been cached,
-or has been saved.
+or has been saved. @xref{Other Marks}.
@item i
Score as a number (@pxref{Scoring}).
The @code{gpg-temp-directory} need to point to a directory with permissions set
to 700, for your own safety.
-If you want to benefit of PGP2.6 compatibility, you might create a script named
-@file{gpg-2comp} with these instructions:
-
-@example
-#!/bin/sh
-exec gpg --rfc1991 "$@@"
-@end example
-
-If you don't want to use such compatibility, you can add the following line to
-your @file{~/.emacs} or @file{~/.gnus}:
-
-@lisp
-(setq gpg-command-default-alist (quote ((gpg . "gpg") (gpg-2comp . "gpg"))))
-@end lisp
-
To sign or encrypt your message you may choose to use the MML Security
menu or @kbd{C-c C-m s p} to sign your message using PGP/MIME,
@kbd{C-c C-m s s} to sign your message using S/MIME. There's also
projects / elisp / gnus.git- / commitdiff