X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=lisp%2Fmessagexmas.el;h=a82b64ea13c0f9d4ed1184a31cee6dfd68167dd6;hb=54024523631631b5d73346a620e46ac873598374;hp=65baf8300ccc3f2679d22c83b68592bce5c87662;hpb=a707b63af25b91cb730c12e65156ca364bf49a44;p=elisp%2Fgnus.git-

diff --git a/lisp/messagexmas.el b/lisp/messagexmas.el
index 65baf83..a82b64e 100644
--- a/lisp/messagexmas.el
+++ b/lisp/messagexmas.el
@@ -101,8 +101,8 @@ If it is non-nil, it must be a toolbar.  The five valid values are
   "Create a rot table with offset N."
   (let ((i -1)
 	(table (make-string 256 0))
-	(a (mm-char-int ?a))
-	(A (mm-char-int ?A)))
+	(a (char-int ?a))
+	(A (char-int ?A)))
     (while (< (incf i) 256)
       (aset table i i))
     (concat
@@ -118,7 +118,7 @@ If it is non-nil, it must be a toolbar.  The five valid values are
 
 (defun message-xmas-redefine ()
   "Redefine message functions for XEmacs."
-  (defalias 'message-exchange-point-and-mark 
+  (defalias 'message-exchange-point-and-mark
     'message-xmas-exchange-point-and-mark)
 
   (when (>= emacs-major-version 20)