Server IP : 111.118.215.189 / Your IP : 18.188.23.45 Web Server : Apache System : Linux md-in-83.webhostbox.net 4.19.286-203.ELK.el7.x86_64 #1 SMP Wed Jun 14 04:33:55 CDT 2023 x86_64 User : a1673wkz ( 2475) PHP Version : 8.2.25 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : ON Directory (0755) : /usr/share/emacs/24.3/lisp/term/ |
[ Home ] | [ C0mmand ] | [ Upload File ] |
---|
;ELC ;;; Compiled by mockbuild@buildfarm06-new.corp.cloudlinux.com on Fri Oct 11 10:10:40 2024 ;;; from file /builddir/build/BUILD/emacs-24.3/lisp/term/rxvt.el ;;; in Emacs version 24.3.1 ;;; 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. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; #@34 Function key overrides for rxvt. (defvar rxvt-function-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\302\377\201@ #\210\302\201A \201B #\210\302\201C \201D #\210\302\201E \201F #\210\302\201G \201H #\210\302\201I \201J #\210\302\201K \201L #\210\302\355\201M #\210\302\201N \201O #\210\302\201P \201Q #\210\302\201R \201S #\210\302\201T \201U #\210\302\201V \201W #\210\302\201X \201Y #\210\302\201Z \201[ #\210\302\201\\ \201] #\210\302\201^ \201_ #\210\302\201` \201a #\210\302\201b \201c #\210\302\201d \201e #\210\302\201f \201g #\210\302\201h \201i #\210\302\201j \201k #\210\302\201l \201m #\210\302\201n \201o #\210\302\201p \201q #\210\302\201r \201s #\210\302\201t \201u #\210\302\201v \201w #\210\302\201x \201y #\210\302\201z \201{ #\210\302\201| \201} #\210\302\201~ \201 #\210\302\201\200 \201\201 #\210\302\201\202 \201\203 #\210\302\201\204 \201\205 #\210\302\201\206 \201\207 #\210\302\201\210 \201\211 #\210\302\201\212 \201\213 #\210\302\201\214 \201\215 #\210\302\201\216 \201\217 #\210\302\201\220 \201\221 #\210)\207" [map make-sparse-keymap define-key "[A" [up] "[B" [down] "[C" [right] "[D" [left] "[2~" [insert] "[3~" [delete] "[4~" [select] "[5~" [prior] "[6~" [next] "[7~" [home] "[8~" [end] "[11~" [f1] "[12~" [f2] "[13~" [f3] "[14~" [f4] "[15~" [f5] "[17~" [f6] "[18~" [f7] "[19~" [f8] "[20~" [f9] "[21~" [f10] "[29~" [print] "[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] "[23~" [S-f1] "[24~" [S-f2] "[25~" [S-f3] "[26~" [S-f4] "[28~" [S-f5] [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] "[2;2~" [S-insert] "[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) (#$ . 552)) #@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) (#$ . 3296)) #@44 Terminal initialization function for rxvt. (defalias 'terminal-init-rxvt #[nil "\306!\307 \310\n!\"\210\307\n \"\210)\306!\307\f\310 !\"\210\307 \f\"\210)\311 \210\312 \210\313 \207" [rxvt-alternatives-map map local-function-key-map rxvt-function-map m input-decode-map copy-keymap set-keymap-parent keymap-parent rxvt-register-default-colors rxvt-set-background-mode tty-set-up-initial-frame-faces] 4 (#$ . 4418)]) #@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))) (#$ . 4844)) #@76 Convert an 8-bit primary color value PRIM to a corresponding 16-bit value. (defalias 'rxvt-rgb-convert-to-16bit #[(prim) "\301\302\303\245\304_!^\207" [prim 65535 round 255.0 65535.0] 4 (#$ . 5383)]) #@183 Register the default set of colors for rxvt or compatible emulator. This function registers the number of colors returned by `display-color-cells' for the currently selected frame. (defalias 'rxvt-register-default-colors #[nil "\306 \211@\307V\203 \310 \210\307V\203= \n\203= \311@\211A@)\312\313\211AA)@\"#\210\nA\211@S\211\202 \307V\203\\\314U\203\306 \307\211\211$%\315V\203\236 \311\316\317\320Z\"\320Z\312\313\321%\322_!\321$\323_!\321 \324_!E\"#\210 T\211\325V\203\210 $T$\307$\325V\203\227 %T%\307$S\211\202R +\307V\203\\\313\326\315Z\327_\\!\311\316\317\320Z\"\320Z\211\211E#\210S\211\202\240 \330U\203U\331\307\211\211$%&\326V\203!\311\316\317\332Z\"\332Z\312\313%&8$&8 &8E\"#\210 T\211\333V\203$T$\307$\333V\203%T%\307$S\211\202\330 ,\307V\203\\\313\334\326U\2034\335\202;\326Z\336_\337\\!!\311\316\317\332Z\"\332Z\211\211E#\210S\211\202#\340\341\342\\\"\210\343 +\207" [ncolors rxvt-standard-colors colors color x b display-color-cells 0 tty-color-clear tty-color-define mapcar rxvt-rgb-convert-to-16bit 240 24 format "color-%d" 256 round 42.5 42.5 42.5 5 8 10 72 (0 139 205 255) 88 3 floor 46.36363636 23.18181818 69.54545454 error "Unsupported number of rxvt colors (%d)" 16 clear-face-cache g r levels] 11 (#$ . 5591)]) #@65 Set background mode as appropriate for the default rxvt colors. (defalias 'rxvt-set-background-mode #[nil "\305\306!\307\211\310\307\311\312#\210\n\205F \313\314\n\"\205F \315\n\316\224\307O!\2118\211AA)@\317\320\"\317\320\3218\211AA)@\"\322_W\205F \310\307\311\323#+\207" [rgb bg fgbg rxvt-standard-colors x getenv "COLORFGBG" nil set-terminal-parameter background-mode light string-match ".*;\\([0-9][0-9]?\\)\\'" string-to-number 1 apply + 15 0.6 dark] 6 (#$ . 6922)])