Mercurial > hg > xemacs-beta

comparison lisp/x-win-sun.el @ 3171:4cad7ff4a200

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2005-12-24 19:53:53 by aidan] Incremental changes to improve Russian C-x processing--support punctuation, XFree86 and Sun keyboards, document the facility.
author aidan
date Sat, 24 Dec 2005 19:54:01 +0000
parents 7039e6323819
children e34711681f30
comparison
equal deleted inserted replaced
3170:db0631f96757 3171:4cad7ff4a200
240 ;; kp-enter is ok 240 ;; kp-enter is ok
241 'SunF36 'f11 ; Type 5 keyboards 241 'SunF36 'f11 ; Type 5 keyboards
242 'SunF37 'f12 ; Used to be Stop & Again 242 'SunF37 'f12 ; Used to be Stop & Again
243 )) 243 ))
244 244
245 ;; Initialise the information needed for processing of function keys on
246 ;; keyboards without Roman-alpabet characters available. This keyboard
247 ;; description was taken from gkb-new/xmodmap.sun/xmodmap.us in the
248 ;; gnome-applets 2.12.0 distribution.
249 (setq x-us-keymap-first-keycode 37
250 x-us-keymap-description
251 [[?1 ?!] [?2 ?@] [?3 ?\#] [?4 ?$] [?5 ?%] [?6 ?^] [?7 ?&] [?8 ?*]
252 [?9 ?\(] [?0 ?\)] [?- ?_] [?= ?+] [?\` ?~] nil nil nil ?/ ?* nil
253 nil ?\. nil nil ?\t [?q ?Q] [?w ?W] [?e ?E] [?r ?R] [?t ?T] [?y ?Y]
254 [?u ?U] [?i ?I] [?o ?O] [?p ?P] [?\[ ?{] [?\] ?}] nil nil ?7 ?8 ?9
255 ?- nil nil nil nil nil [?a ?A] [?s ?S] [?d ?D] [?f ?F] [?g ?G]
256 [?h ?H] [?j ?J] [?k ?K] [?l ?L] [?\; ?:] [?\' ?\"] [?\\ ?|] nil nil
257 ?4 ?5 ?6 ?0 nil nil nil nil nil [?z ?Z] [?x ?X] [?c ?C] [?v ?V]
258 [?b ?B] [?n ?N] [?m ?M] [?\, ?<] [?\. ?>] [?/ ?\?] nil nil ?1 ?2
259 ?3 nil nil nil nil nil nil ?\ nil nil nil ?+])
245 260
246 ;;; OpenWindows-like "find" processing. 261 ;;; OpenWindows-like "find" processing.
247 ;;; As far as I know, the `find' key is a Sunism, so we do that binding 262 ;;; As far as I know, the `find' key is a Sunism, so we do that binding
248 ;;; here. This is the only Sun-specific keybinding. (The functions 263 ;;; here. This is the only Sun-specific keybinding. (The functions
249 ;;; themselves are in x-win.el in case someone wants to use them when 264 ;;; themselves are in x-win.el in case someone wants to use them when