Fbind codepage-setup for XEmacs.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index f353464..dbcd2ed 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2005-10-14  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+       * lpath.el: Fbind codepage-setup for XEmacs.
+
 2005-10-13  Reiner Steib  <Reiner.Steib@gmx.de>
 
        * mml-sec.el (mml-secure-method): New internal variable.

diff --git a/lisp/lpath.el b/lisp/lpath.el
index 6e10cfd..b723820 100644 (file)
--- a/lisp/lpath.el
+++ b/lisp/lpath.el
@@ -28,14 +28,14 @@
 
 (if (featurep 'xemacs)
     (progn
-      (maybe-fbind '(delete-overlay
-                    detect-coding-string eudc-expand-inline event-click-count
-                    event-end event-start find-coding-systems-for-charsets
+      (maybe-fbind '(codepage-setup
+                    delete-overlay detect-coding-string eudc-expand-inline
+                    event-click-count event-end event-start
+                    find-coding-systems-for-charsets
                     find-coding-systems-region find-coding-systems-string
-                    mail-abbrevs-setup mouse-minibuffer-check
-                    mouse-movement-p mouse-scroll-subr overlay-lists
-                    posn-point posn-window read-event set-buffer-multibyte
-                    track-mouse window-edges))
+                    mail-abbrevs-setup mouse-minibuffer-check mouse-movement-p
+                    mouse-scroll-subr overlay-lists posn-point posn-window
+                    read-event set-buffer-multibyte track-mouse window-edges))
       (maybe-bind '(adaptive-fill-first-line-regexp
                    buffer-display-table buffer-file-coding-system
                    current-language-environment