Location: lg@xxxxxxxxxxxxxx http://arch.xwem.org/2005/
Revision: xwem--main--2.2--patch-17
Archive: lg@xxxxxxxxxxxxxx
Creator: Zajcev Evgeny <lg@xxxxxxxx>
Date: Sat May 21 01:19:58 MSD 2005
Standard-date: 2005-05-20 21:19:58 GMT
Modified-files: lisp/xwem-keyboard.el
New-patches: dev@xxxxxxxxxxxxxxxx/xwem--dev--2.2--patch-11
lg@xxxxxxxxxxxxxx/xwem--main--2.2--patch-17
Summary: local-keymap fix
Keywords: local-keymap, property
* lisp/xwem-keyboard.el (local-keymap): [fix] Since keymap is not
readable object, we can't store it as general client property. This
fixes bug when client properties are not imported from XProperty.
* added files
{arch}/xwem/xwem--dev/xwem--dev--2.2/dev@xxxxxxxxxxxxxxxx/patch-log/patch-11
{arch}/xwem/xwem--main/xwem--main--2.2/lg@xxxxxxxxxxxxxx/patch-log/patch-17
* modified files
--- orig/lisp/xwem-keyboard.el
+++ mod/lisp/xwem-keyboard.el
@@ -381,13 +381,13 @@
(not (keymapp (xwem-kbd-fixup-keymap
def))))))
;; Install new keymap
- (xwem-cl-put-prop cl prop keymap) ; save it in props
+ (xwem-cl-put-sys-prop cl prop keymap) ; save it in system props
(when (keymapp nkeymap)
(xwem-kbd-install-grab nkeymap (xwem-cl-xwin cl))
(xwem-focus-mode-invoke cl 'after-keymap-change))))
(defun xwem-client-get-local-keymap (cl prop)
- (xwem-kbd-fixup-keymap (xwem-cl-get-prop cl prop)))
+ (xwem-kbd-fixup-keymap (xwem-cl-get-sys-prop cl prop)))
(define-xwem-client-property local-keymap nil
"CL's local keymap."
|