emacs/lisp/mh-e mh-comp.el

CVSROOT:	/sources/emacs
Module name:	emacs
Changes by:	John Paul Wallington <jpw>	08/06/08 21:48:06

Modified files:
	lisp/mh-e      : mh-comp.el 

Log message:
	(mh-letter-mode-syntax-table): Define within defvar.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/mh-e/mh-comp.el?cvsroot=emacs&r1=1.64&r2=1.65

Patches:
Index: mh-comp.el
===================================================================
RCS file: /sources/emacs/emacs/lisp/mh-e/mh-comp.el,v
retrieving revision 1.64
retrieving revision 1.65
diff -u -b -r1.64 -r1.65
--- mh-comp.el	6 May 2008 03:56:45 -0000	1.64
+++ mh-comp.el	8 Jun 2008 21:48:05 -0000	1.65
@@ -116,15 +116,12 @@
   "Regexp of header lines to remove before offering a message as a new draft\\<mh-folder-mode-map>.
 Used by the \\[mh-edit-again] and \\[mh-extract-rejected-mail] commands.")

-(defvar mh-letter-mode-syntax-table nil
+(defvar mh-letter-mode-syntax-table
+  (let ((syntax-table (make-syntax-table text-mode-syntax-table)))
+    (modify-syntax-entry ?% "." syntax-table)