Mercurial > emacs
annotate lisp/gnus/mail-prsvr.el @ 54736:b94de166de9d
(ethio-sera-being-called-by-w3): New
variable.
(ethio-sera-to-fidel-ethio): Check ethio-sera-being-called-by-w3
instead of sera-being-called-by-w3.
(ethio-fidel-to-sera-buffer): Likewise.
(ethio-find-file): Bind ethio-sera-being-called-by-w3 to t
instead of sera-being-called-by-w3.
(ethio-write-file): Likewise.
| author | Kenichi Handa <handa@m17n.org> |
|---|---|
| date | Mon, 05 Apr 2004 23:27:37 +0000 |
| parents | 695cf19ef79e |
| children | 55fd4f77387a 375f2633d815 |
| rev | line source |
|---|---|
|
38413
a26d9b55abb6
Some fixes to follow coding conventions in files from Gnus.
Pavel Jan?k <Pavel@Janik.cz>
parents:
31717
diff
changeset
|
1 ;;; mail-prsvr.el --- interface variables for parsing mail |
| 31717 | 2 ;; Copyright (C) 1999, 2000 Free Software Foundation, Inc. |
| 3 | |
| 4 ;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org> | |
| 5 ;; This file is part of GNU Emacs. | |
| 6 | |
| 7 ;; GNU Emacs is free software; you can redistribute it and/or modify | |
| 8 ;; it under the terms of the GNU General Public License as published by | |
| 9 ;; the Free Software Foundation; either version 2, or (at your option) | |
| 10 ;; any later version. | |
| 11 | |
| 12 ;; GNU Emacs is distributed in the hope that it will be useful, | |
| 13 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of | |
| 14 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
| 15 ;; GNU General Public License for more details. | |
| 16 | |
| 17 ;; You should have received a copy of the GNU General Public License | |
| 18 ;; along with GNU Emacs; see the file COPYING. If not, write to the | |
| 19 ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, | |
| 20 ;; Boston, MA 02111-1307, USA. | |
| 21 | |
| 22 ;;; Commentary: | |
| 23 | |
| 24 ;;; Code: | |
| 25 | |
| 26 (defvar mail-parse-charset nil | |
| 27 "Default charset used by low-level libraries. | |
| 28 This variable should never be set. Instead, it should be bound by | |
| 29 functions that wish to call mail-parse functions and let them know | |
| 30 what the desired charset is to be.") | |
| 31 | |
| 32 (defvar mail-parse-mule-charset nil | |
| 33 "Default MULE charset used by low-level libraries. | |
| 34 This variable should never be set.") | |
| 35 | |
| 36 (defvar mail-parse-ignored-charsets nil | |
| 37 "Ignored charsets used by low-level libraries. | |
| 38 This variable should never be set. Instead, it should be bound by | |
| 39 functions that wish to call mail-parse functions and let them know | |
| 40 what the desired charsets is to be ignored.") | |
| 41 | |
| 42 (provide 'mail-prsvr) | |
| 43 | |
| 52401 | 44 ;;; arch-tag: 9ba878cc-8b43-4f7a-85b1-69b1a9a5d9f5 |
| 31717 | 45 ;;; mail-prsvr.el ends here |
