]> git.eshelyaron.com Git - emacs.git/commitdiff
Revision: emacs@sv.gnu.org/emacs--devo--0--patch-210
authorMiles Bader <miles@gnu.org>
Tue, 11 Apr 2006 23:22:06 +0000 (23:22 +0000)
committerMiles Bader <miles@gnu.org>
Tue, 11 Apr 2006 23:22:06 +0000 (23:22 +0000)
Merge from gnus--rel--5.10

Patches applied:

 * gnus--rel--5.10  (patch 81-82)

   - Update from CVS

lisp/gnus/ChangeLog
lisp/gnus/gnus-art.el
lisp/gnus/gnus-sieve.el
lisp/gnus/gnus-sum.el
lisp/gnus/message.el
lisp/gnus/nnslashdot.el
lisp/gnus/rfc2047.el
man/ChangeLog
man/gnus-faq.texi
man/gnus.texi

index 0e077ce0b04d6d5523ea8d6fc898950b98ec2f3b..087cdf1450367f08046ae9d49af8d5ae64202b65 100644 (file)
@@ -1,3 +1,35 @@
+2006-04-11  Reiner Steib  <Reiner.Steib@gmx.de>
+
+       * gnus-art.el (gnus-button-valid-localpart-regexp): Exclude `@'.
+
+2006-04-11  Arne J\e,Ax\e(Brgensen  <arne@arnested.dk>
+
+       * gnus-sieve.el (gnus-sieve-generate): Delete from the start of
+       the sieve region.
+
+2006-04-11  Reiner Steib  <Reiner.Steib@gmx.de>
+
+       * gnus.el: Gnus v5.10.8 is released.
+
+2006-04-11  Lars Magne Ingebrigtsen  <larsi@gnus.org>
+
+       * nnslashdot.el (nnslashdot-retrieve-headers-1): Fix up to new
+       layout.
+
+       * rfc2047.el (rfc2047-decode-encoded-words): Don't message about
+       unknown charset.
+
+       * message.el (message-header-synonyms): Add Original-To to the
+       default.
+
+       * gnus-sum.el (gnus-get-newsgroup-headers-xover): group is an
+       optional parameter.
+
+2006-04-07  Reiner Steib  <Reiner.Steib@gmx.de>
+
+       * pgg-gpg.el: Revert to revision 7.15 to allow the use of
+       gpg-agent.
+
 2006-04-06  Reiner Steib  <Reiner.Steib@gmx.de>
 
        * gnus-fun.el (gnus): Require it for gnus-directory.
index 69fe8159c104f18c94996519faed53453200ba87..eed793d23bae95d44b881908e1528549cb01a5db 100644 (file)
@@ -5972,7 +5972,7 @@ groups."
 
 ;; Regexp suggested by Felix Wiemann in <87oeuomcz9.fsf@news2.ososo.de>
 (defcustom gnus-button-valid-localpart-regexp
-  "[a-z0-9$%(*-=?[_][^<>\")!;:,{}\n\t ]*"
+  "[a-z0-9$%(*-=?[_][^<>\")!;:,{}\n\t @]*"
   "Regular expression that matches a localpart of mail addresses or MIDs."
   :version "22.1"
   :group 'gnus-article-buttons
index 99e8f6b4986a3c17c5751c32bf7db2413aae906f..0e6c500d0f2bedc69275138e1e7c87979727931e 100644 (file)
@@ -107,7 +107,7 @@ See the documentation for these variables and functions for details."
   (find-file gnus-sieve-file)
   (goto-char (point-min))
   (if (re-search-forward (regexp-quote gnus-sieve-region-start) nil t)
-      (delete-region (match-end 0)
+      (delete-region (match-beginning 0)
                     (or (re-search-forward (regexp-quote
                                             gnus-sieve-region-end) nil t)
                         (point)))
index 4fc01a8fad34de79a028971388e4286dd156bbfc..bea7cb2445e43f7b14513dfff3165ba3447566a2 100644 (file)
@@ -5962,7 +5962,8 @@ Return a list of headers that match SEQUENCE (see
        (allp (cond
               ((eq gnus-read-all-available-headers t)
                t)
-              ((stringp gnus-read-all-available-headers)
+              ((and (stringp gnus-read-all-available-headers)
+                    group)
                (string-match gnus-read-all-available-headers group))
               (t
                nil)))
index 236ec1bc23fd4c9266525dcd7ba9a40d617a8cc8..741b193f779be8b2b28c4125781fbb0cc033d9ee 100644 (file)
@@ -2749,7 +2749,8 @@ prefix FORCE is given."
     (message-carefully-insert-headers headers)))
 
 (defcustom message-header-synonyms
-  '((To Cc Bcc))
+  '((To Cc Bcc)
+    (Original-To))
   "List of lists of header synonyms.
 E.g., if this list contains a member list with elements `Cc' and `To',
 then `message-carefully-insert-headers' will not insert a `To' header
index 38468d7d194c253577f0c7b1b084d22b984dd401..66ce4d5447224665e643059488195120b053e091 100644 (file)
          (setq article (if (and article (< start article)) article start))
          (goto-char point)
          (while (re-search-forward
-                 "<a name=\"\\([0-9]+\\)\">\\([^<]+\\)</a>.*\n.*score:\\([^)]+\\))"
+                 "<a name=\"\\([0-9]+\\)\">\\([^<]+\\)</a>.*\n.*\n.*score:\\([^)]+\\))"
                  nil t)
            (setq cid (match-string 1)
                  subject (match-string 2)
index c89528a30dbd0b85632bec80261fedfbdcbe156b..aa30d9ba783ce340bcf170873c11fceb44942eea 100644 (file)
@@ -851,11 +851,8 @@ ENCODED-WORD)."
   (let (word charset cs encoding text rest)
     (while words
       (setq word (pop words))
-      (if (and (or (setq cs (rfc2047-charset-to-coding-system
-                            (setq charset (car word))))
-                  (progn
-                    (message "Unknown charset: %s" charset)
-                    nil))
+      (if (and (setq cs (rfc2047-charset-to-coding-system
+                        (setq charset (car word))))
               (condition-case code
                   (cond ((char-equal ?B (nth 1 word))
                          (setq text (base64-decode-string
index e5f77c35059f18e02d57d916a08c6d8f451a6953..37543f5d8da403643fa0ae9283d53145834a2fa8 100644 (file)
@@ -1,3 +1,12 @@
+2006-04-11  Reiner Steib  <Reiner.Steib@gmx.de>
+
+       * gnus.texi, gnus-faq.texi, message.texi: Gnus v5.10.8 is released.
+
+2006-04-10  Reiner Steib  <Reiner.Steib@gmx.de>
+
+       * gnus.texi (Misc Group Stuff, Summary Buffer, Article Keymap)
+       (Server Commands): Key `v' is reserved for users.
+
 2006-04-11  J.D. Smith  <jdsmith@as.arizona.edu>
 
        * files.texi (Old Versions): Update description of vc-annotate's
index 7fa00c37403f6213c13e93f7c20f12c3070190d1..a85a36c2d226750524e691242e95ed8380c189fa 100644 (file)
@@ -128,7 +128,7 @@ What is the latest version of Gnus?
 Jingle please: Gnus 5.10 is released, get it while it's
 hot! As well as the step in version number is rather
 small, Gnus 5.10 has tons of new features which you
-shouldn't miss. The current release (5.10.6) should be at
+shouldn't miss. The current release (5.10.8) should be at
 least as stable as the latest release of the 5.8 series.
 
 @node [1.2]
index 6493911afcf7264bb6506fbf8a594cd32d663f37..c5857f40ab4026ac3e56f9e70a9f14bdc7fe83d7 100644 (file)
@@ -4043,6 +4043,22 @@ happens.  You just have to be careful if you do stuff like that.
 
 @table @kbd
 
+@item v
+@kindex v (Group)
+@cindex keys, reserved for users (Group)
+The key @kbd{v} is reserved for users.  You can bind it key to some
+function or better use it as a prefix key.  For example:
+
+@lisp
+(define-key gnus-group-mode-map (kbd "v j d")
+  (lambda ()
+    (interactive)
+    (gnus-group-jump-to-group "nndraft:drafts")))
+@end lisp
+
+On keys reserved for users in Emacs and on keybindings in general
+@xref{Keymaps, Keymaps, , emacs, The Emacs Editor}.
+
 @item ^
 @kindex ^ (Group)
 @findex gnus-group-enter-server-mode
@@ -4438,6 +4454,14 @@ group buffer (@pxref{Selecting a Group}).
 
 You can have as many summary buffers open as you wish.
 
+@kindex v (Summary)
+@cindex keys, reserved for users (Summary)
+The key @kbd{v} is reserved for users.  You can bind it key to some
+function or better use it as a prefix key.  For example:
+@lisp
+(define-key gnus-summary-mode-map (kbd "v -") "LrS") ;; lower subthread
+@end lisp
+
 @menu
 * Summary Buffer Format::       Deciding how the summary buffer is to look.
 * Summary Maneuvering::         Moving around the summary buffer.
@@ -11242,6 +11266,11 @@ buffer, which means that you don't actually have to have a summary
 buffer displayed while reading.  You can do it all from the article
 buffer.
 
+@kindex v (Article)
+@cindex keys, reserved for users (Article)
+The key @kbd{v} is reserved for users.  You can bind it key to some
+function or better use it as a prefix key.
+
 A few additional keystrokes are available:
 
 @table @kbd
@@ -12272,6 +12301,12 @@ Also @pxref{Formatting Variables}.
 
 @table @kbd
 
+@item v
+@kindex v (Server)
+@cindex keys, reserved for users (Server)
+The key @kbd{v} is reserved for users.  You can bind it key to some
+function or better use it as a prefix key.
+
 @item a
 @kindex a (Server)
 @findex gnus-server-add-server