Mercurial > hg > xemacs-beta

diff lisp/x11/x-win-xfree86.el @ 4:b82b59fe008d r19-15b3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15b3
author cvs
date Mon, 13 Aug 2007 08:46:56 +0200
parents 376386a54a3c
children 131b0175ea99
line wrap: on
line diff
--- a/lisp/x11/x-win-xfree86.el	Mon Aug 13 08:46:35 2007 +0200
+++ b/lisp/x11/x-win-xfree86.el	Mon Aug 13 08:46:56 2007 +0200
@@ -55,6 +55,6 @@
 	(while mods
 	  (let ((k1 (vector (append (car mods) foo)))
 		(k2 (vector (append (car mods) bar))))
-	    (define-key global-map k1 k2))
+	    (define-key key-translation-map k1 k2))
 	  (setq mods (cdr mods))))
       (setq mapping (cdr mapping)))))