;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.



#@45 Terminal initialization function for vt100.
(defalias 'terminal-init-vt100 #[0 "\300\301 \302\"\207" [tty-run-terminal-initialization selected-frame "lk201"] 3 (#$ . 84)])
(byte-code "\300\301\302\303\304DD\305\306\307\310\311\312\313\314\315&\207" [custom-declare-variable vt100-wide-mode funcall function #[0 "\300 \301U\207" [frame-width 132] 2 ""] "Non-nil if Vt100-Wide mode is enabled.\nSee the `vt100-wide-mode' command\nfor a description of this minor mode.\nSetting this variable directly does not take effect;\neither customize it (see the info node `Easy Customization')\nor call the function `vt100-wide-mode'." :set custom-set-minor-mode :initialize custom-initialize-default :type boolean :group terminals] 12)
#@613 Toggle 132/80 column mode for vt100s.

This is a minor mode.  If called interactively, toggle the `Vt100-Wide
mode' mode.  If the prefix argument is positive, enable the mode, and
if it is zero or negative, disable the mode.

If called from Lisp, toggle the mode if ARG is `toggle'.  Enable the
mode if ARG is nil, omitted, or is a positive number.  Disable the
mode if ARG is a negative number.

To check whether the minor mode is enabled in the current buffer,
evaluate `(default-value \='vt100-wide-mode)'.

The mode's hook is called both when the mode is enabled and when it is
disabled.

(fn &optional ARG)
(defalias 'vt100-wide-mode #[256 "\303 \304\301\305=\203\306\301!?\202!\247\203 \307W\203 \310\202!\311\"\210\312\300!\2038\313\301\"\306\301!\2038\301B\314	\203A\315\202B\316!\210\317\n	\203N\320\202O\321\"\210\322\323\306\301!\203]\324\202^\325\"\210\326\327!\203\206\330\301!\210\303 \203v\211\303 \232\203\206\331\332\306\301!\203\202\333\202\203\334\335#\210\210\336 \210\306\301!\207" [global-minor-modes vt100-wide-mode terminal-frame current-message set-default toggle default-value 1 nil t boundp delq 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] 6 (#$ . 817) (byte-code "\203\n\301!\202\302C\207" [current-prefix-arg prefix-numeric-value toggle] 2)])
(defvar vt100-wide-mode-hook nil)
(byte-code "\301\302N\204\f\303\301\302\304#\210\303\301\305\306#\210\303\301\307\310C#\210\311\312\310\313\300!\205#\310\211%\210\314\315!\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.)" custom-type hook standard-value nil add-minor-mode vt100-wide-mode boundp provide term/vt100] 6)