|
Server IP : 111.118.215.189 / Your IP : 3.18.102.38 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:41 2024
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/term/wyse50.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 wyse50-terminal-map (byte-code "\303 \304\305\211\203 \n@\306 @ A@#\210\nA\211\204 *)\207" [map key-definition --dolist-tail-- make-sparse-keymap ((" " [up]) ("\n" [down]) ("\f" [right]) ("" [left]) ("@
" [f1]) ("A
" [f2]) ("B
" [f3]) ("C
" [f4]) ("D
" [f5]) ("E
" [f6]) ("F
" [f7]) ("G
" [f8]) ("H
" [f9]) ("K" [next]) ("T" [clearline]) (" " [home]) (" " [end]) ("Q" [insert]) ("E" [insertline]) ("R" [deleteline]) ("P" [print]) ("r" [replace]) ("I
" [f10]) ("J
" [f11]) ("K
" [f12]) ("L
" [f13]) ("M
" [f14]) ("N
" [f15]) ("O
" [f16]) ("`
" [f17]) ("a
" [f18]) ("b
" [f19]) ("c
" [f20]) ("d
" [f21]) ("e
" [f22]) ("f
" [f23]) ("g
" [f24]) ("h
" [f25]) ("i
" [f26]) ("j
" [f27]) ("k
" [f28]) ("l
" [f29]) ("m
" [f30]) ("n
" [f31]) ("o
" [f32]) ("I" [key-stab]) ("J" [key-snext]) ("Y" [key-clear]) ("W" [127]) ("
" [funct-up]) ("\n
" [funct-down]) ("\f
" [funct-right]) ("
" [funct-left]) ("
" [funct-return]) ("
" [funct-tab])) nil define-key] 5))
#@46 Terminal initialization function for wyse50.
(defalias 'terminal-init-wyse50 #[nil "\303!\304 \305\n!\"\210\304\n \"\210)\306\307\310\"\207" [wyse50-terminal-map m input-decode-map copy-keymap set-keymap-parent keymap-parent add-hook kill-emacs-hook #[nil "\300\301\302 T\303Q!\207" [send-string-to-terminal "a23R" frame-width "CG0"] 4 nil nil]] 4 (#$ . 1575)])
#@293 To be called by `term-setup-hook'. Overrides 6 Emacs standard keys
whose functions are then typed as follows:
C-a Funct Left-arrow
C-h M-?
LFD Funct Return, some modes override down-arrow via LFD
C-k CLR Line
C-l Scrn CLR
M-r M-x move-to-window-line, Funct up-arrow or down-arrow are similar
(defalias 'enable-arrow-keys #[nil "\300\301M\207" [enable-arrow-keys nil] 2 (#$ . 1948) nil])