%PDF- %PDF-
Direktori : /usr/local/share/emacs/27.2/lisp/term/ |
Current File : //usr/local/share/emacs/27.2/lisp/term/rxvt.elc |
;ELC ;;; Compiled ;;; in Emacs version 27.2 ;;; with all optimizations. ;;; This file uses dynamic docstrings, first added in Emacs 19.29. ;;; This file does not contain utf-8 non-ASCII characters, ;;; and so can be loaded in Emacs versions earlier than 23. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (require 'term/xterm) #@34 Function key overrides for rxvt. (defvar rxvt-function-map (byte-code "\302 \303 \"\210\304\305\306#\210\304\307\310#\210\304\311\312#\210\304\313\314#\210\304\315\316#\210\304\317\320#\210\304\321\322#\210\304\323\324#\210\304\325\326#\210\304\327\330#\210\304\331\332#\210\304\333\334#\210\304\335\336#\210\304\337\340#\210\304\341\342#\210\304\343\344#\210\304\345\346#\210\304\347\350#\210\304\351\352#\210\304\353\354#\210\304\355\356#\210\304\357\360#\210\304\361\362#\210\304\363\364#\210\304\365\366#\210\304\367\370#\210\304\371\372#\210\304\373\374#\210\304\375\376#\210\304\377\201@ #\210\304\201A \201B #\210\304\201C \201D #\210\304\201E \201F #\210\304\201G \201H #\210\304\201I \201J #\210\304\201K \201L #\210\304\201M \201N #\210\304\201O \201P #\210\304\201Q \201R #\210\304\201S \201T #\210\304\201U \201V #\210\304\201W \201X #\210\304\201Y \201Z #\210\304\201[ \201\\ #\210\304\201] \201^ #\210\304\201_ \201` #\210\304\201a \201b #\210\304\201c \201d #\210\304\201e \201f #\210\304\201g \201h #\210\304\201i \201j #\210)\207" [map xterm-rxvt-function-map make-sparse-keymap set-keymap-parent define-key "[7~" [home] "[8~" [end] "[23~" [S-f1] "[24~" [S-f2] "[11^" [C-f1] "[12^" [C-f2] "[13^" [C-f3] "[14^" [C-f4] "[15^" [C-f5] "[17^" [C-f6] "[18^" [C-f7] "[19^" [C-f8] "[20^" [C-f9] "[21^" [C-f10] "[25~" [S-f3] "[26~" [S-f4] "[28~" [S-f5] "[29~" [S-f6] "[31~" [S-f7] "[32~" [S-f8] "[33~" [S-f9] "[34~" [S-f10] "[23^" [C-S-f1] "[24^" [C-S-f2] "[25^" [C-S-f3] "[26^" [C-S-f4] "[28^" [C-S-f5] "[29^" [C-S-f6] "[31^" [C-S-f7] "[32^" [C-S-f8] "[33^" [C-S-f9] "[34^" [C-S-f10] "[2^" [C-insert] "[3^" [C-delete] "[5^" [C-prior] "[6^" [C-next] "[7^" [C-home] "[8^" [C-end] "Od" [C-left] "Oc" [C-right] "Oa" [C-up] "Ob" [C-down] "[3$" [S-delete] "[5$" [S-prior] "[6$" [S-next] "[7$" [S-home] "[8$" [S-end] "[d" [S-left] "[c" [S-right] "[a" [S-up] "[b" [S-down]] 4) (#$ . 430)) #@56 Keymap of possible alternative meanings for some keys. (defvar rxvt-alternatives-map (byte-code "\301 \302\303\304#\210\302\305\306#\210\302\307\310#\210\302\311\312#\210\302\313\314#\210\302\315\316#\210\302\317\320#\210\302\321\322#\210\302\323\324#\210\302\325\326#\210\302\327\330#\210\302\331\332#\210\302\333\334#\210\302\335\336#\210\302\337\340#\210\302\341\342#\210\302\343\344#\210\302\345\346#\210\302\347\350#\210\302\351\352#\210\302\353\354#\210\302\355\356#\210\302\357\360#\210\302\361\362#\210\302\363\364#\210\302\365\366#\210\302\367\370#\210\302\371\372#\210\302\373\374#\210\302\375\376#\210)\207" [map make-sparse-keymap define-key [f11] [S-f1] [f12] [S-f2] [f13] [S-f3] [f14] [S-f4] [f15] [S-f5] [f16] [S-f6] [f17] [S-f7] [f18] [S-f8] [f19] [S-f9] [f20] [S-f10] [f23] [C-f1] [f24] [C-f2] [f25] [C-f3] [f26] [C-f4] [f27] [C-f5] [f28] [C-f6] [f29] [C-f7] [f30] [C-f8] [f31] [C-f9] [f32] [C-f10] [f33] [C-S-f1] [f34] [C-S-f2] [f35] [C-S-f3] [f36] [C-S-f4] [f37] [C-S-f5] [f38] [C-S-f6] [f39] [C-S-f7] [f40] [C-S-f8] [f41] [C-S-f9] [f42] [C-S-f10]] 4) (#$ . 2431)) #@66 Names of 16 standard rxvt colors, their numbers, and RGB values. (defvar rxvt-standard-colors '(("black" 0 (0 0 0)) ("red" 1 (205 0 0)) ("green" 2 (0 205 0)) ("yellow" 3 (205 205 0)) ("blue" 4 (0 0 205)) ("magenta" 5 (205 0 205)) ("cyan" 6 (0 205 205)) ("white" 7 (229 229 229)) ("brightblack" 8 (77 77 77)) ("brightred" 9 (255 0 0)) ("brightgreen" 10 (0 255 0)) ("brightyellow" 11 (255 255 0)) ("brightblue" 12 (0 0 255)) ("brightmagenta" 13 (255 0 255)) ("brightcyan" 14 (0 255 255)) ("brightwhite" 15 (255 255 255))) (#$ . 3553)) #@44 Terminal initialization function for rxvt. (defalias 'terminal-init-rxvt #[nil "\305 \"\210\305\n\"\210\306\f!\210\307 \210\310 \207" [rxvt-alternatives-map local-function-key-map rxvt-function-map input-decode-map rxvt-standard-colors xterm--push-map xterm-register-default-colors rxvt-set-background-mode tty-set-up-initial-frame-faces] 3 (#$ . 4092)]) #@65 Set background mode as appropriate for the default rxvt colors. (defalias 'rxvt-set-background-mode #[nil "\304\305!\306\211\307\306\310\311#\210\n\205@ \312\313\n\"\205@ \314\315\n\316\224\"!\2118AA@\317\320\"\317\320\3218AA@\"\322_W\205@ \307\306\310\323#+\207" [rgb bg fgbg rxvt-standard-colors getenv "COLORFGBG" nil set-terminal-parameter background-mode light string-match ".*;\\([0-9][0-9]?\\)\\'" string-to-number substring 1 apply + 15 0.6 dark] 6 (#$ . 4455)]) (provide 'term/rxvt)