Edit file

File name : vt100.elc

Content :;ELC��� ;;; Compiled ;;; in Emacs version 26.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. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; #@45 Terminal initialization function for vt100. (defalias 'terminal-init-vt100 #[nil "\300\301 \302\"\207" [tty-run-terminal-initialization selected-frame "lk201"] 3 (#$ . 408)]) #@266 Non-nil if Vt100-Wide mode is enabled. See the `vt100-wide-mode' command for a description of this minor mode. Setting this variable directly does not take effect; either customize it (see the info node `Easy Customization') or call the function `vt100-wide-mode'. (custom-declare-variable 'vt100-wide-mode '(= (frame-width) 132) '(#$ . 590) :set 'custom-set-minor-mode :initialize 'custom-initialize-default :group 'terminals :type 'boolean) #@217 Toggle 132/80 column mode for vt100s. With a prefix argument ARG, switch to 132-column mode if ARG is positive, and 80-column mode otherwise. If called from Lisp, switch to 132-column mode if ARG is omitted or nil. (defalias 'vt100-wide-mode #[(&optional arg) "\305 \306\302 \307=\203�\310\302!?\202�\311 !\312V\"\210\313\n\203\"�\314\202#�\315!\210\316\n\203/�\317\2020�\320\"\210\321\322\310\302!\203>�\323\202?�\324\"\210\325\326!\203j�\327\302!\210\305 \203W�\305 \232\203j�\330\331\332\310\302!\203e�\333\202f�\334\f#\210))\335 \210\310\302!\207" [#1=#:last-message arg vt100-wide-mode terminal-frame local current-message set-default toggle default-value prefix-numeric-value 0 send-string-to-terminal "[?3h" "[?3l" set-frame-width 132 80 run-hooks vt100-wide-mode-hook vt100-wide-mode-on-hook vt100-wide-mode-off-hook called-interactively-p any customize-mark-as-set "" message "Vt100-Wide mode %sabled%s" "en" "dis" force-mode-line-update] 4 (#$ . 1040) (list (or current-prefix-arg 'toggle))]) (defvar vt100-wide-mode-hook nil) (byte-code "\301\302N\204\f�\303\301\302\304#\210\305\306\307\310\300!\205�\307\211%\210\311\312!\207" [vt100-wide-mode-map vt100-wide-mode-hook variable-documentation put "Hook run after entering or leaving `vt100-wide-mode'.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it. (This is true for all hook variables.)" add-minor-mode vt100-wide-mode nil boundp provide term/vt100] 6)

Save