Mercurial > emacs

comparison lisp/gnus/messcompat.el @ 88155:d7ddb3e565de

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
sync with trunk
author Henrik Enberg <henrik.enberg@telia.com>
date Mon, 16 Jan 2006 00:03:54 +0000
parents 52d99cc2e9e3
children
comparison
equal deleted inserted replaced
88154:8ce476d3ba36 88155:d7ddb3e565de
1 ;;; messcompat.el --- making message mode compatible with mail mode 1 ;;; messcompat.el --- making message mode compatible with mail mode
2 2
3 ;; Copyright (C) 1996, 1997, 1998, 1999, 2000, 2002 3 ;; Copyright (C) 1996, 1997, 1998, 1999, 2000, 2002, 2003, 2004,
4 ;; Free Software Foundation, Inc. 4 ;; 2005 Free Software Foundation, Inc.
5 5
6 ;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org> 6 ;; Author: Lars Magne Ingebrigtsen <larsi@gnus.org>
7 ;; Keywords: mail, news 7 ;; Keywords: mail, news
8 8
9 ;; This file is part of GNU Emacs. 9 ;; This file is part of GNU Emacs.
18 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 18 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
19 ;; GNU General Public License for more details. 19 ;; GNU General Public License for more details.
20 20
21 ;; You should have received a copy of the GNU General Public License 21 ;; You should have received a copy of the GNU General Public License
22 ;; along with GNU Emacs; see the file COPYING. If not, write to the 22 ;; along with GNU Emacs; see the file COPYING. If not, write to the
23 ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, 23 ;; Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
24 ;; Boston, MA 02111-1307, USA. 24 ;; Boston, MA 02110-1301, USA.
25 25
26 ;;; Commentary: 26 ;;; Commentary:
27 27
28 ;; This file tries to provide backward compatibility with sendmail.el 28 ;; This file tries to provide backward compatibility with sendmail.el
29 ;; for Message mode. It should be used by simply adding 29 ;; for Message mode. It should be used by simply adding
38 (require 'sendmail) 38 (require 'sendmail)
39 39
40 (defvar message-from-style mail-from-style 40 (defvar message-from-style mail-from-style
41 "*Specifies how \"From\" headers look. 41 "*Specifies how \"From\" headers look.
42 42
43 If `nil', they contain just the return address like: 43 If nil, they contain just the return address like:
44 king@grassland.com 44 king@grassland.com
45 If `parens', they look like: 45 If `parens', they look like:
46 king@grassland.com (Elvis Parsley) 46 king@grassland.com (Elvis Parsley)
47 If `angles', they look like: 47 If `angles', they look like:
48 Elvis Parsley <king@grassland.com> 48 Elvis Parsley <king@grassland.com>
89 The headers should be delimited by a line whose contents match the 89 The headers should be delimited by a line whose contents match the
90 variable `mail-header-separator'.") 90 variable `mail-header-separator'.")
91 91
92 (provide 'messcompat) 92 (provide 'messcompat)
93 93
94 ;;; arch-tag: a76673be-905e-4bbd-8966-615370494a7b
94 ;;; messcompat.el ends here 95 ;;; messcompat.el ends here