/[emacs]/emacs/lisp/gnus/gnus-cite.el
ViewVC logotype

Diff of /emacs/lisp/gnus/gnus-cite.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.13 by miles, Mon Sep 20 12:03:05 2004 UTC revision 1.14 by miles, Mon Nov 1 23:06:36 2004 UTC
# Line 124  The text matching the first grouping wil Line 124  The text matching the first grouping wil
124  (defcustom gnus-cite-unsightly-citation-regexp  (defcustom gnus-cite-unsightly-citation-regexp
125    "^-----Original Message-----\nFrom: \\(.+\n\\)+\n"    "^-----Original Message-----\nFrom: \\(.+\n\\)+\n"
126    "Regexp matching Microsoft-type rest-of-message citations."    "Regexp matching Microsoft-type rest-of-message citations."
127      :version "21.4"
128    :group 'gnus-cite    :group 'gnus-cite
129    :type 'regexp)    :type 'regexp)
130    
# Line 131  The text matching the first grouping wil Line 132  The text matching the first grouping wil
132    "Non-nil means don't regard lines beginning with \">From \" as cited text.    "Non-nil means don't regard lines beginning with \">From \" as cited text.
133  Those lines may have been quoted by MTAs in order not to mix up with  Those lines may have been quoted by MTAs in order not to mix up with
134  the envelope From line."  the envelope From line."
135      :version "21.4"
136    :group 'gnus-cite    :group 'gnus-cite
137    :type 'boolean)    :type 'boolean)
138    
# Line 141  the envelope From line." Line 143  the envelope From line."
143  (defcustom gnus-cite-attribution-face 'gnus-cite-attribution-face  (defcustom gnus-cite-attribution-face 'gnus-cite-attribution-face
144    "Face used for attribution lines.    "Face used for attribution lines.
145  It is merged with the face for the cited text belonging to the attribution."  It is merged with the face for the cited text belonging to the attribution."
146      :version "21.4"
147    :group 'gnus-cite    :group 'gnus-cite
148    :type 'face)    :type 'face)
149    
# Line 278  This should make it easier to see who wr Line 281  This should make it easier to see who wr
281    
282  (defcustom gnus-cite-blank-line-after-header t  (defcustom gnus-cite-blank-line-after-header t
283    "If non-nil, put a blank line between the citation header and the button."    "If non-nil, put a blank line between the citation header and the button."
   :version "21.4"  
284    :group 'gnus-cite    :group 'gnus-cite
285    :type 'boolean)    :type 'boolean)
286    
# Line 290  This should make it easier to see who wr Line 292  This should make it easier to see who wr
292  If an article has more pages below the one you are looking at, but  If an article has more pages below the one you are looking at, but
293  nothing on those pages is a word of at least three letters that is not  nothing on those pages is a word of at least three letters that is not
294  in a boring face, then the pages will be skipped."  in a boring face, then the pages will be skipped."
   :version "21.4"  
295    :type '(repeat face)    :type '(repeat face)
296    :group 'gnus-article-hiding)    :group 'gnus-article-hiding)
297    

Legend:
Removed from v.1.13  
changed lines
  Added in v.1.14

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26