Mercurial > emacs

comparison lisp/mh-e/mh-e.el @ 83532:b19aaf4ab0ee

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Merged from emacs@sv.gnu.org. Patches applied: * emacs@sv.gnu.org/emacs--devo--0--patch-331 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-332 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-333 Merge from gnus--rel--5.10 * emacs@sv.gnu.org/emacs--devo--0--patch-334 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-335 Add note about "link" button-class to etc/TODO * emacs@sv.gnu.org/emacs--devo--0--patch-336 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-337 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-338 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-339 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-340 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-341 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-342 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-343 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-344 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-345 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-346 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-347 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-348 Update for ERC 5.1.3. * emacs@sv.gnu.org/emacs--devo--0--patch-349 Update from CVS * emacs@sv.gnu.org/emacs--devo--0--patch-350 Merge from gnus--rel--5.10 * emacs@sv.gnu.org/gnus--rel--5.10--patch-111 Update from CVS: texi/gnus.texi (Summary Buffer Lines): Fix typo. * emacs@sv.gnu.org/gnus--rel--5.10--patch-112 Update from CVS * emacs@sv.gnu.org/gnus--rel--5.10--patch-113 Merge from emacs--devo--0 * emacs@sv.gnu.org/gnus--rel--5.10--patch-114 Update from CVS git-archimport-id: lorentey@elte.hu--2004/emacs--multi-tty--0--patch-572
author Karoly Lorentey <lorentey@elte.hu>
date Fri, 14 Jul 2006 05:56:32 +0000
parents a387c138b28e 3ee41d91071d
children c71725faff1a
comparison
equal deleted inserted replaced
83531:a387c138b28e 83532:b19aaf4ab0ee
4 ;; 1990, 1992, 1993, 1994, 1995, 1997, 1999, 4 ;; 1990, 1992, 1993, 1994, 1995, 1997, 1999,
5 ;; 2000, 2001, 2002, 2003, 2004, 2005, 2006 Free Software Foundation, Inc. 5 ;; 2000, 2001, 2002, 2003, 2004, 2005, 2006 Free Software Foundation, Inc.
6 6
7 ;; Author: Bill Wohler <wohler@newt.com> 7 ;; Author: Bill Wohler <wohler@newt.com>
8 ;; Maintainer: Bill Wohler <wohler@newt.com> 8 ;; Maintainer: Bill Wohler <wohler@newt.com>
9 ;; Version: 8.0.1 9 ;; Version: 8.0.2
10 ;; Keywords: mail 10 ;; Keywords: mail
11 11
12 ;; This file is part of GNU Emacs. 12 ;; This file is part of GNU Emacs.
13 13
14 ;; GNU Emacs is free software; you can redistribute it and/or modify 14 ;; GNU Emacs is free software; you can redistribute it and/or modify
94 ;; for if it does it will introduce a require loop. 94 ;; for if it does it will introduce a require loop.
95 (require 'mh-loaddefs) 95 (require 'mh-loaddefs)
96 96
97 (mh-require-cl) 97 (mh-require-cl)
98 98
99 (require 'mh-buffers)
100 (require 'mh-compat)
101
99 (eval-and-compile 102 (eval-and-compile
100 (defvar mh-xemacs-flag (featurep 'xemacs) 103 (defvar mh-xemacs-flag (featurep 'xemacs)
101 "Non-nil means the current Emacs is XEmacs.")) 104 "Non-nil means the current Emacs is XEmacs."))
102 105
103 (mh-do-in-xemacs 106 (mh-do-in-xemacs
104 (require 'mh-xemacs)) 107 (require 'mh-xemacs))
105
106 (require 'mh-buffers)
107 (require 'mh-compat)
108 108
109 (mh-font-lock-add-keywords 109 (mh-font-lock-add-keywords
110 'emacs-lisp-mode 110 'emacs-lisp-mode
111 (eval-when-compile 111 (eval-when-compile
112 `((,(concat "(\\(" 112 `((,(concat "(\\("
131 ;;; Global Variables 131 ;;; Global Variables
132 132
133 ;; Try to keep variables local to a single file. Provide accessors if 133 ;; Try to keep variables local to a single file. Provide accessors if
134 ;; variables are shared. Use this section as a last resort. 134 ;; variables are shared. Use this section as a last resort.
135 135
136 (defconst mh-version "8.0.1" "Version number of MH-E.") 136 (defconst mh-version "8.0.2" "Version number of MH-E.")
137 137
138 ;; Variants 138 ;; Variants
139 139
140 (defvar mh-sys-path 140 (defvar mh-sys-path
141 '("/usr/local/nmh/bin" ; nmh default 141 '("/usr/local/nmh/bin" ; nmh default