mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2024-12-23 10:34:07 +00:00
Revision: miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-646
Merge from gnus--rel--5.10 Patches applied: * gnus--rel--5.10 (patch 152-156) - Update from CVS: lisp/mml.el (mml-preview): Doc fix. - Update from CVS 2005-11-09 Katsumi Yamaoka <yamaoka@jpl.org> * lisp/gnus/message.el (message-generate-headers): Downcase the argument given to message-check-element. 2005-11-01 Katsumi Yamaoka <yamaoka@jpl.org> * lisp/gnus/gnus.el (gnus-parameters-case-fold-search): New variable. (gnus-parameters-get-parameter): Use it. * lisp/gnus/gnus-score.el (gnus-home-score-file): Doc fix. 2005-11-01 Xavier Maillard <zedek@gnu-rox.org> (tiny change) * lisp/gnus/gnus-score.el (gnus-update-score-entry-dates): Doc fix. 2005-10-31 Katsumi Yamaoka <yamaoka@jpl.org> * lisp/gnus/mml.el (mml-preview): Doc fix. 2005-11-10 Katsumi Yamaoka <yamaoka@jpl.org> * man/gnus.texi (XVarious): Fix description of gnus-use-toolbar; add new variable gnus-toolbar-thickness. 2005-11-08 Katsumi Yamaoka <yamaoka@jpl.org> * man/gnus.texi (XVarious): Revert description of gnus-use-toolbar. 2005-11-07 Katsumi Yamaoka <yamaoka@jpl.org> * man/gnus.texi (X-Face): Fix description. (XVarious): Remove gnus-xmas-logo-color-alist and gnus-xmas-logo-color-style; fix description of gnus-use-toolbar. 2005-11-01 Katsumi Yamaoka <yamaoka@jpl.org> * man/gnus.texi (Group Parameters): Mention new varable gnus-parameters-case-fold-search. (Home Score File): Addition.
This commit is contained in:
parent
be93a2c448
commit
e8beac8a04
@ -1,3 +1,23 @@
|
||||
2005-11-09 Katsumi Yamaoka <yamaoka@jpl.org>
|
||||
|
||||
* message.el (message-generate-headers): Downcase the argument
|
||||
given to message-check-element.
|
||||
|
||||
2005-11-01 Katsumi Yamaoka <yamaoka@jpl.org>
|
||||
|
||||
* gnus.el (gnus-parameters-case-fold-search): New variable.
|
||||
(gnus-parameters-get-parameter): Use it.
|
||||
|
||||
* gnus-score.el (gnus-home-score-file): Doc fix.
|
||||
|
||||
2005-11-01 Xavier Maillard <zedek@gnu-rox.org> (tiny change)
|
||||
|
||||
* gnus-score.el (gnus-update-score-entry-dates): Doc fix.
|
||||
|
||||
2005-10-31 Katsumi Yamaoka <yamaoka@jpl.org>
|
||||
|
||||
* mml.el (mml-preview): Doc fix.
|
||||
|
||||
2005-10-27 Reiner Steib <Reiner.Steib@gmx.de>
|
||||
|
||||
* flow-fill.el (fill-flowed-encode-tests): Restore trailing
|
||||
|
@ -142,7 +142,7 @@ If this variable is nil, no score file entries will be expired."
|
||||
number))
|
||||
|
||||
(defcustom gnus-update-score-entry-dates t
|
||||
"*In non-nil, update matching score entry dates.
|
||||
"*If non-nil, update matching score entry dates.
|
||||
If this variable is nil, then score entries that provide matches
|
||||
will be expired along with non-matching score entries."
|
||||
:group 'gnus-score-expire
|
||||
@ -175,7 +175,7 @@ It is called with one parameter -- the score to be decayed."
|
||||
It can be:
|
||||
|
||||
* A string
|
||||
This file file will be used as the home score file.
|
||||
This file will be used as the home score file.
|
||||
|
||||
* A function
|
||||
The result of this function will be used as the home score file.
|
||||
@ -186,7 +186,7 @@ It can be:
|
||||
The elements in this list can be:
|
||||
|
||||
* `(regexp file-name ...)'
|
||||
If the `regexp' matches the group name, the first `file-name' will
|
||||
If the `regexp' matches the group name, the first `file-name'
|
||||
will be used as the home score file. (Multiple filenames are
|
||||
allowed so that one may use gnus-score-file-single-match-alist to
|
||||
set this variable.)
|
||||
|
@ -1104,6 +1104,17 @@ For example:
|
||||
:type '(repeat (cons regexp
|
||||
(repeat sexp))))
|
||||
|
||||
(defcustom gnus-parameters-case-fold-search 'default
|
||||
"If it is t, ignore case of group names specified in `gnus-parameters'.
|
||||
If it is nil, don't ignore case. If it is `default', which is for the
|
||||
backward compatibility, use the value of `case-fold-search'."
|
||||
:version "22.1"
|
||||
:group 'gnus-group-various
|
||||
:type '(choice :format "%{%t%}:\n %[Value Menu%] %v"
|
||||
(const :tag "Use `case-fold-search'" default)
|
||||
(const nil)
|
||||
(const t)))
|
||||
|
||||
(defvar gnus-group-parameters-more nil)
|
||||
|
||||
(defmacro gnus-define-group-parameter (param &rest rest)
|
||||
@ -3722,7 +3733,10 @@ You should probably use `gnus-find-method-for-group' instead."
|
||||
|
||||
(defun gnus-parameters-get-parameter (group)
|
||||
"Return the group parameters for GROUP from `gnus-parameters'."
|
||||
(let (params-list)
|
||||
(let ((case-fold-search (if (eq gnus-parameters-case-fold-search 'default)
|
||||
case-fold-search
|
||||
gnus-parameters-case-fold-search))
|
||||
params-list)
|
||||
(dolist (elem gnus-parameters)
|
||||
(when (string-match (car elem) group)
|
||||
(setq params-list
|
||||
|
@ -5077,7 +5077,8 @@ Headers already prepared in the buffer are not modified."
|
||||
;; The element is a symbol. We insert the value
|
||||
;; of this symbol, if any.
|
||||
(symbol-value header))
|
||||
((not (message-check-element header))
|
||||
((not (message-check-element
|
||||
(intern (downcase (symbol-name header)))))
|
||||
;; We couldn't generate a value for this header,
|
||||
;; so we just ask the user.
|
||||
(read-from-minibuffer
|
||||
|
@ -1102,7 +1102,7 @@ Should be adopted if code in `message-send-mail' is changed."
|
||||
|
||||
(defun mml-preview (&optional raw)
|
||||
"Display current buffer with Gnus, in a new buffer.
|
||||
If RAW, don't highlight the article."
|
||||
If RAW, display a raw encoded MIME message."
|
||||
(interactive "P")
|
||||
(save-excursion
|
||||
(let* ((buf (current-buffer))
|
||||
|
@ -1,3 +1,24 @@
|
||||
2005-11-10 Katsumi Yamaoka <yamaoka@jpl.org>
|
||||
|
||||
* gnus.texi (XVarious): Fix description of gnus-use-toolbar; add
|
||||
new variable gnus-toolbar-thickness.
|
||||
|
||||
2005-11-08 Katsumi Yamaoka <yamaoka@jpl.org>
|
||||
|
||||
* gnus.texi (XVarious): Revert description of gnus-use-toolbar.
|
||||
|
||||
2005-11-07 Katsumi Yamaoka <yamaoka@jpl.org>
|
||||
|
||||
* gnus.texi (X-Face): Fix description.
|
||||
(XVarious): Remove gnus-xmas-logo-color-alist and
|
||||
gnus-xmas-logo-color-style; fix description of gnus-use-toolbar.
|
||||
|
||||
2005-11-01 Katsumi Yamaoka <yamaoka@jpl.org>
|
||||
|
||||
* gnus.texi (Group Parameters): Mention new varable
|
||||
gnus-parameters-case-fold-search.
|
||||
(Home Score File): Addition.
|
||||
|
||||
2005-11-09 Luc Teirlinck <teirllm@auburn.edu>
|
||||
|
||||
* killing.texi (CUA Bindings): Add @section.
|
||||
|
@ -3060,6 +3060,19 @@ example:
|
||||
String value of parameters will be subjected to regexp substitution, as
|
||||
the @code{to-group} example shows.
|
||||
|
||||
@vindex gnus-parameters-case-fold-search
|
||||
By default, whether comparing the group name and one of those regexps
|
||||
specified in @code{gnus-parameters} is done in a case-sensitive manner
|
||||
or a case-insensitive manner depends on the value of
|
||||
@code{case-fold-search} at the time when the comparison is done. The
|
||||
value of @code{case-fold-search} is typically @code{t}; it means, for
|
||||
example, the element @code{("INBOX\\.FOO" (total-expire . t))} might be
|
||||
applied to both the @samp{INBOX.FOO} group and the @samp{INBOX.foo}
|
||||
group. If you want to make those regexps always case-sensitive, set the
|
||||
value of the @code{gnus-parameters-case-fold-search} variable to
|
||||
@code{nil}. Otherwise, set it to @code{t} if you want to compare them
|
||||
always in a case-insensitive manner.
|
||||
|
||||
|
||||
@node Listing Groups
|
||||
@section Listing Groups
|
||||
@ -19755,7 +19768,8 @@ group name, the @var{file-name} will be used as the home score file.
|
||||
|
||||
@item
|
||||
A function. If the function returns non-@code{nil}, the result will
|
||||
be used as the home score file.
|
||||
be used as the home score file. The function will be called with the
|
||||
name of the group as the parameter.
|
||||
|
||||
@item
|
||||
A string. Use the string as the home score file.
|
||||
@ -21967,11 +21981,11 @@ function, this function will be called with the face as the argument.
|
||||
If the @code{gnus-article-x-face-too-ugly} (which is a regexp) matches
|
||||
the @code{From} header, the face will not be shown.
|
||||
|
||||
The default action under Emacs 20 is to fork off the @code{display}
|
||||
program@footnote{@code{display} is from the ImageMagick package. For
|
||||
the @code{uncompface} and @code{icontopbm} programs look for a package
|
||||
like @code{compface} or @code{faces-xface} on a GNU/Linux system.} to
|
||||
view the face.
|
||||
The default action under Emacs without image support is to fork off the
|
||||
@code{display} program@footnote{@code{display} is from the ImageMagick
|
||||
package. For the @code{uncompface} and @code{icontopbm} programs look
|
||||
for a package like @code{compface} or @code{faces-xface} on a GNU/Linux
|
||||
system.} to view the face.
|
||||
|
||||
Under XEmacs or Emacs 21+ with suitable image support, the default
|
||||
action is to display the face before the @code{From} header. (It's
|
||||
@ -22217,18 +22231,6 @@ This is where Gnus will look for pictures. Gnus will normally
|
||||
auto-detect this directory, but you may set it manually if you have an
|
||||
unusual directory structure.
|
||||
|
||||
@item gnus-xmas-logo-color-alist
|
||||
@vindex gnus-xmas-logo-color-alist
|
||||
This is an alist where the key is a type symbol and the values are the
|
||||
foreground and background color of the splash page glyph.
|
||||
|
||||
@item gnus-xmas-logo-color-style
|
||||
@vindex gnus-xmas-logo-color-style
|
||||
This is the key used to look up the color in the alist described above.
|
||||
Valid values include @code{flame}, @code{pine}, @code{moss},
|
||||
@code{irish}, @code{sky}, @code{tin}, @code{velvet}, @code{grape},
|
||||
@code{labia}, @code{berry}, @code{neutral}, and @code{september}.
|
||||
|
||||
@item gnus-xmas-modeline-glyph
|
||||
@vindex gnus-xmas-modeline-glyph
|
||||
A glyph displayed in all Gnus mode lines. It is a tiny gnu head by
|
||||
@ -22242,9 +22244,19 @@ default.
|
||||
|
||||
@item gnus-use-toolbar
|
||||
@vindex gnus-use-toolbar
|
||||
If @code{nil}, don't display toolbars. If non-@code{nil}, it should be
|
||||
one of @code{default-toolbar}, @code{top-toolbar}, @code{bottom-toolbar},
|
||||
@code{right-toolbar}, or @code{left-toolbar}.
|
||||
This variable specifies the position to display the toolbar. If
|
||||
@code{nil}, don't display toolbars. If it is non-nil, it should be one
|
||||
of the symbols @code{default}, @code{top}, @code{bottom}, @code{right},
|
||||
and @code{left}. @code{default} means to use the default toolbar, the
|
||||
rest mean to display the toolbar on the place which those names show.
|
||||
The default is @code{default}.
|
||||
|
||||
@item gnus-toolbar-thickness
|
||||
@vindex gnus-toolbar-thickness
|
||||
Cons of the height and the width specifying the thickness of a toolbar.
|
||||
The height is used for the toolbar displayed on the top or the bottom,
|
||||
the width is used for the toolbar displayed on the right or the left.
|
||||
The default is that of the default toolbar.
|
||||
|
||||
@item gnus-group-toolbar
|
||||
@vindex gnus-group-toolbar
|
||||
|
Loading…
Reference in New Issue
Block a user