Fbind compare-strings for XEmacs.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 2a0ffc4..c1ea21d 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2003-04-17  Katsumi Yamaoka  <yamaoka@jpl.org>
+
+       * lpath.el: Fbind compare-strings for XEmacs.
+
 2003-04-17  Lars Magne Ingebrigtsen  <larsi@gnus.org>
 
        * gnus-srvr.el (gnus-browse-make-menu-bar): Fix typo.

diff --git a/lisp/lpath.el b/lisp/lpath.el
index 20412b9..43a05ae 100644 (file)
--- a/lisp/lpath.el
+++ b/lisp/lpath.el
@@ -30,15 +30,14 @@
 
 (if (featurep 'xemacs)
     (progn
-      (maybe-fbind '(ccl-execute-on-string
-                    Info-directory Info-menu
-                    char-charset charsetp coding-system-get
-                    coding-system-list coding-system-p decode-coding-region
-                    decode-coding-string define-ccl-program delete-overlay
-                    detect-coding-region encode-coding-region
-                    encode-coding-string event-click-count event-end
-                    event-start find-charset-region
-                    find-coding-systems-for-charsets
+      (maybe-fbind '(Info-directory
+                    Info-menu ccl-execute-on-string char-charset charsetp
+                    coding-system-get coding-system-list coding-system-p
+                    compare-strings decode-coding-region decode-coding-string
+                    define-ccl-program delete-overlay detect-coding-region
+                    encode-coding-region encode-coding-string
+                    event-click-count event-end event-start
+                    find-charset-region find-coding-systems-for-charsets
                     find-coding-systems-region find-coding-systems-string
                     get-charset-property mail-abbrevs-setup
                     mouse-minibuffer-check mouse-movement-p mouse-scroll-subr