Mercurial > hg > xemacs-beta

diff lisp/x-init.el @ 3439:d1754e7f0cea

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2006-06-03 17:50:39 by aidan] Just-in-time Unicode code point support.
author aidan
date Sat, 03 Jun 2006 17:51:06 +0000
parents 316fddbf58e2
children c3175ca37443
line wrap: on
line diff
--- a/lisp/x-init.el	Fri Jun 02 22:18:08 2006 +0000
+++ b/lisp/x-init.el	Sat Jun 03 17:51:06 2006 +0000
@@ -247,7 +247,7 @@
       (when (and (not (get (intern sym-string) 'character-of-keysym))
 		 (string-match "^U[0-9A-F]+$" sym-string))
 	(pushnew (concat sym-string " ") unknown-code-points :test 'equal)))
-    (when unknown-code-points
+    (when (and (featurep 'mule) unknown-code-points)
       (lwarn 'key-mapping 'info
       "Undefined Unicode key mappings.
 Your keyboard has, among many others, the following keysyms defined: