Mercurial > emacs
comparison lisp/gnus/gnus-art.el @ 34818:2c66e24f2398
* gnus-art.el (article-treat-dumbquotes): Quote \.
* gnus-art.el (gnus-treat-emphasize): Don't treat emphasis if
Emacs 20 runs on a terminal.
* gnus-art.el (article-treat-dumbquotes): More doc, provided by
Paul Stevenson <p.stevenson@surrey.ac.uk>
author | ShengHuo ZHU <zsh@cs.rochester.edu> |
---|---|
date | Fri, 22 Dec 2000 05:54:53 +0000 |
parents | 4b9a7a10deaa |
children | aaf69bc74739 |
comparison
equal
deleted
inserted
replaced
34817:41f50ad22d7a | 34818:2c66e24f2398 |
---|---|
729 See the manual for details." | 729 See the manual for details." |
730 :group 'gnus-article-treat | 730 :group 'gnus-article-treat |
731 :type gnus-article-treat-head-custom) | 731 :type gnus-article-treat-head-custom) |
732 (put 'gnus-treat-buttonize-head 'highlight t) | 732 (put 'gnus-treat-buttonize-head 'highlight t) |
733 | 733 |
734 (defcustom gnus-treat-emphasize 50000 | 734 (defcustom gnus-treat-emphasize |
735 (and (or window-system | |
736 (featurep 'xemacs) | |
737 (>= (string-to-number emacs-version) 21)) | |
738 50000) | |
735 "Emphasize text. | 739 "Emphasize text. |
736 Valid values are nil, t, `head', `last', an integer or a predicate. | 740 Valid values are nil, t, `head', `last', an integer or a predicate. |
737 See the manual for details." | 741 See the manual for details." |
738 :group 'gnus-article-treat | 742 :group 'gnus-article-treat |
739 :type gnus-article-treat-custom) | 743 :type gnus-article-treat-custom) |
1315 ;; Do nothing. | 1319 ;; Do nothing. |
1316 )) | 1320 )) |
1317 (forward-line 1)))))) | 1321 (forward-line 1)))))) |
1318 | 1322 |
1319 (defun article-treat-dumbquotes () | 1323 (defun article-treat-dumbquotes () |
1320 "Translate M******** sm*rtq**t*s into proper text. | 1324 "Translate M****s*** sm*rtq**t*s into proper text. |
1321 Note that this function guesses whether a character is a sm*rtq**t* or | 1325 Note that this function guesses whether a character is a sm*rtq**t* or |
1322 not, so it should only be used interactively." | 1326 not, so it should only be used interactively. |
1327 | |
1328 Sm*rtq**t*s are M****s***'s unilateral extension to the character map | |
1329 in an attempt to provide more quoting characters. If you see | |
1330 something like \\222 or \\264 where you're expecting some kind of | |
1331 apostrophe or quotation mark, then try this wash." | |
1323 (interactive) | 1332 (interactive) |
1324 (article-translate-strings gnus-article-dumbquotes-map)) | 1333 (article-translate-strings gnus-article-dumbquotes-map)) |
1325 | 1334 |
1326 (defun article-translate-characters (from to) | 1335 (defun article-translate-characters (from to) |
1327 "Translate all characters in the body of the article according to FROM and TO. | 1336 "Translate all characters in the body of the article according to FROM and TO. |