Gecko [ goons4good.org ]

Name	Size	Permission	Date
AT386.elc	1.12 KB	-rw-r--r--	2023-06-07 04:14
README	10.8 KB	-rw-r--r--	2013-01-01 15:37
apollo.elc	728 B	-rw-r--r--	2023-06-07 04:14
bobcat.elc	715 B	-rw-r--r--	2023-06-07 04:14
common-win.elc	16.28 KB	-rw-r--r--	2023-06-07 04:19
cygwin.elc	680 B	-rw-r--r--	2023-06-07 04:14
internal.elc	18.45 KB	-rw-r--r--	2023-06-07 04:19
iris-ansi.elc	7.58 KB	-rw-r--r--	2023-06-07 04:14
linux.elc	934 B	-rw-r--r--	2023-06-07 04:14
lk201.elc	2.44 KB	-rw-r--r--	2023-06-07 04:14
news.elc	1.34 KB	-rw-r--r--	2023-06-07 04:14
ns-win.elc	23.56 KB	-rw-r--r--	2023-06-07 04:19
pc-win.elc	12.05 KB	-rw-r--r--	2023-06-07 04:19
rxvt.elc	7.23 KB	-rw-r--r--	2023-06-07 04:14
screen.elc	753 B	-rw-r--r--	2023-06-07 04:14
sun.elc	3.77 KB	-rw-r--r--	2023-06-07 04:14
sup-mouse.elc	4.1 KB	-rw-r--r--	2023-06-07 04:14
tty-colors.elc	28.99 KB	-rw-r--r--	2023-06-07 04:19
tvi970.elc	3.05 KB	-rw-r--r--	2023-06-07 04:14
vt100.elc	2.18 KB	-rw-r--r--	2023-06-07 04:14
vt102.elc	725 B	-rw-r--r--	2023-06-07 04:14
vt125.elc	725 B	-rw-r--r--	2023-06-07 04:14
vt200.elc	837 B	-rw-r--r--	2023-06-07 04:14
vt201.elc	837 B	-rw-r--r--	2023-06-07 04:14
vt220.elc	837 B	-rw-r--r--	2023-06-07 04:14
vt240.elc	837 B	-rw-r--r--	2023-06-07 04:14
vt300.elc	837 B	-rw-r--r--	2023-06-07 04:14
vt320.elc	837 B	-rw-r--r--	2023-06-07 04:14
vt400.elc	837 B	-rw-r--r--	2023-06-07 04:14
vt420.elc	837 B	-rw-r--r--	2023-06-07 04:14
w32-win.elc	6.51 KB	-rw-r--r--	2023-06-07 04:19
w32console.elc	2.12 KB	-rw-r--r--	2023-06-07 04:14
wyse50.elc	2.28 KB	-rw-r--r--	2023-06-07 04:14
x-win.elc	28.65 KB	-rw-r--r--	2023-06-07 04:19
xterm.elc	21.53 KB	-rw-r--r--	2023-06-07 04:14

Rename

;ELC���
;;; Compiled by mockbuild@buildfarm06.corp.cloudlinux.com on Wed Jun  7 08:14:38 2023
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/term/tvi970.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.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(defvar tvi970-terminal-map (byte-code "\305 \306\307\211\203�\n@\310	@	A@#\210\nA\211\204�*\311\312\fW\203B�\310\313\314\315\\\"\316\317\313\320\"!!#\210T\211\202$�*\321\312\fW\203z�\310\313\322\323\\\"\316\317\313\324T\"!!#\210\310\313\322\325\\\"\316\317\313\326T\"!!#\210T\211\202H�*)\207" [map key-binding --dolist-tail-- i --dotimes-limit-- make-sparse-keymap (("[H" [home]) ("[Z" [backtab]) ("[i" [print]) ("[@" [insert]) ("[L" [insertline]) ("[M" [deleteline]) ("[U" [next]) ("Om" [kp-subtract]) ("Ol" [kp-separator]) ("On" [kp-decimal]) ("OM" [kp-enter]) ("[K" [key_eol]) ("[J" [key_eos]) ("[2J" [key_clear]) ("[P" [key_dc]) ("[g" [S-tab]) ("[2N" [clearentry]) ("[2K" [S-clearentry]) ("[E" [10]) ("[g" [S-backtab]) ("[?1i" [key_sprint]) ("[4h" [key_sic]) ("[4l" [S-delete]) ("[Q" [S-insertline]) ("[1Q" [key_sdl]) ("[19l" [key_seol]) ("[19h" [S-erasepage]) ("[V" [S-page]) ("S" [send]) ("5" [S-send])) nil define-key 10 0 format "O%c" 112 vector intern "kp-%d" 16 "?%c" 97 "f%d" 65 "S-f%d"] 9))
#@46 Terminal initialization function for tvi970.
(defalias 'terminal-init-tvi970 #[nil "\303!\304	\305\n!\"\210\304\n	\"\210)\306\307!\207" [tvi970-terminal-map m input-decode-map copy-keymap set-keymap-parent keymap-parent tvi970-set-keypad-mode 1] 4 (#$ . 1614)])
#@473 Toggle alternate keypad mode on TVI 970 keypad.
With a prefix argument ARG, enable the mode if ARG is positive,
and disable it otherwise.  If called from Lisp, enable the mode
if ARG is omitted or nil.

In ``alternate keypad mode'', the keys send distinct escape
sequences, meaning that they can have their own bindings,
independent of the normal number keys.

When disabled, the terminal enters ``numeric keypad mode'', in
which the keypad's keys act as ordinary digits.
(defalias 'tvi970-set-keypad-mode #[(&optional arg) "\302 \303\304\305	\306=\203�\307\304\305\"?\202�\310	!\311V#\210\312\307\304\305\"\203'�\313\202(�\314!\210\315\316\307\304\305\"\2037�\317\2028�\320\"\210\321\322!\203\\�\302 \203L�\302 \232\203\\�\323\324\307\304\305\"\203Y�\325\202Z�\326\"\210)\327 \210\307\304\305\"\207" [#1=#:last-message arg current-message set-terminal-parameter nil tvi970-keypad-numeric toggle terminal-parameter prefix-numeric-value 0 send-string-to-terminal "=" ">" run-hooks tvi970-set-keypad-mode-hook tvi970-set-keypad-mode-on-hook tvi970-set-keypad-mode-off-hook called-interactively-p any message "Tvi970-Set-Keypad mode %sabled" "en" "dis" force-mode-line-update] 6 (#$ . 1885) (list (or current-prefix-arg 'toggle))])