%PDF-
%PDF-
Mini Shell
Mini Shell
;ELC
;;; Compiled
;;; in Emacs version 27.2
;;; 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.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(byte-code "\300\301!\210\302\303\304\305\306\307\310\311&\210\312\313\304\314\315\316\310\303&\207" [require disp-table custom-declare-group iso-ascii nil "Set up char tables for ISO 8859/1 on ASCII terminals." :prefix "iso-ascii-" :group i18n custom-declare-variable iso-ascii-convenient "Non-nil means `iso-ascii' should aim for convenience, not precision." :type boolean] 8)
#@40 Display table used for ISO-ASCII mode.
(defvar iso-ascii-display-table (make-display-table) (#$ . 789))
#@48 Display table used when not in ISO-ASCII mode.
(defvar iso-ascii-standard-display-table nil (#$ . 899))
(byte-code "\204 \302\207" [iso-ascii-standard-display-table standard-display-table nil] 1)
(defalias 'iso-ascii-display #[(code string &optional convenient-string) "\203
\206 \n\202 \305\n\306Q \f\nI\210 \307\310\f\311Z\"\nI\207" [iso-ascii-convenient convenient-string string iso-ascii-display-table code "{" "}" make-char latin-iso8859-1 128] 5])
(byte-code "\300\301\302\303#\210\300\304\305\"\210\300\306\307\"\210\300\310\311\"\210\300\312\313\"\210\300\314\315\"\210\300\316\317\"\210\300\320\321\322#\210\300\323\324\"\210\300\325\326\327#\210\300\330\331\"\210\300\332\333\"\210\300\334\335\"\210\300\336\337\"\210\300\340\341\342#\210\300\343\344\"\210\300\345\346\"\210\300\347\350\"\210\300\351\352\"\210\300\353\354\"\210\300\355\356\"\210\300\357\360\"\210\300\361\362\363#\210\300\364\365\"\210\300\366\367\"\210\300\370\371\"\210\300\372\373\"\210\300\374\375\"\210\300\376\377\"\210\300\201@ \201A \"\210\300\201B \201C \"\210\300\201D \201E \"\210\300\201F \201G \"\210\300\201H \201I \"\210\300\201J \201K \"\210\300\201L \201M \"\210\300\201N \201O \"\210\300\201P \201Q \"\210\300\201R \201S \"\210\300\201T \201U \"\210\300\201V \201W \"\210\300\201X \201Y \"\210\300\201Z \201[ \"\210\300\201\\ \201] \"\210\300\201^ \201_ \"\210\300\201` \201a \"\210\300\201b \201c \"\210\300\201d \201e \"\210\300\201f \201g \"\210\300\201h \201i \"\210\300\201j \201k \"\210\300\201l \201m \"\210\300\201n \201o \"\210\300\201p \201q \"\210\300\201r \201s \"\210\300\201t \201u \"\210\300\201v \201w \"\210\300\201x \201y \"\210\300\201z \201{ \"\210\300\201| \201} \"\210\300\201~ \201 \"\210\300\201\200 \201\201 \"\210\300\201\202 \201\203 \"\210\300\201\204 \201\205 \"\210\300\201\206 \201\207 \"\210\300\201\210 \201\211 \"\210\300\201\212 \201\213 \"\210\300\201\214 \201\215 \"\210\300\201\216 \201\217 \"\210\300\201\220 \201\221 \"\210\300\201\222 \201\223 \"\210\300\201\224 \201\225 \"\210\300\201\226 \201\227 \"\210\300\201\230 \201\231 \"\210\300\201\232 \201\233 \"\210\300\201\234 \201\235 \"\210\300\201\236 \201\237 \"\210\300\201\240 \201\241 \"\210\300\201\242 \201\243 \"\210\300\201\244 \201\245 \"\210\300\201\246 \201\247 \"\210\300\201\250 \201\251 \"\210\300\201\252 \201\253 \"\210\300\201\254 \201\255 \"\210\300\201\256 \201\257 \"\210\300\201\260 \201\261 \"\210\300\201\262 \201\263 \"\210\300\201\264 \201\265 \"\210\300\201\266 \201\267 \"\210\300\201\270 \201\271 \"\210\300\201\272 \201\273 \"\210\300\201\274 \201\275 \"\210\300\201\276 \201\277 \"\210\300\201\300 \201\301 \"\210\300\201\302 \201\303 \"\210\300\201\304 \201\305 \"\207" [iso-ascii-display 160 "_" " " 161 "!" 162 "c" 163 "GBP" 164 "$" 165 "JPY" 166 "|" 167 "S" "(S)" 168 "\"" 169 "C" "(C)" 170 "_a" 171 "<<" 172 "~" 173 "-" 174 "R" "(R)" 175 "=" 176 "o" 177 "+-" 178 "2" 179 "3" 180 "'" 181 "u" 182 "P" "(P)" 183 "." 184 "," 185 "1" 186 "_o" 187 ">>" 188 "1/4" 189 "1/2" 190 "3/4" 191 "?" 192 "`A" 193 "'A" 194 "^A" 195 "~A" 196 "\"A" 197 "AA" 198 "AE" 199 ",C" 200 "`E" 201 "'E" 202 "^E" 203 "\"E" 204 "`I" 205 "'I" 206 "^I" 207 "\"I" 208 "-D" 209 "~N" 210 "`O" 211 "'O" 212 "^O" 213 "~O" 214 "\"O" 215 "x" 216 "/O" 217 "`U" 218 "'U" 219 "^U" 220 "\"U" 221 "'Y" 222 "TH" 223 "ss" 224 "`a" 225 "'a" 226 "^a" 227 "~a" 228 "\"a" 229 "aa" 230 "ae" 231 ",c" 232 "`e" 233 "'e" 234 "^e" 235 "\"e" 236 "`i" 237 "'i" 238 "^i" 239 "\"i" 240 "-d" 241 "~n" 242 "`o" 243 "'o" 244 "^o" 245 "~o" 246 "\"o" 247 "/" 248 "/o" 249 "`u" 250 "'u" 251 "^u" 252 "\"u" 253 "'y" 254 "th" 255 "\"y"] 4)
#@266 Toggle ISO-ASCII mode.
If called interactively, enable Iso-Ascii mode if ARG is positive, and
disable it if ARG is zero or negative. If called from Lisp, also
enable the mode if ARG is omitted or nil, and toggle it if ARG is
`toggle'; disable the mode otherwise.
(defalias 'iso-ascii-mode #[(&optional arg) "\306 \307=\203 \n =?\202 \310 !\311V\211 \203 \202) \n =\203(
\202) \n)\312\313\n =\2037 \314\2028 \315\"\210\316\317!\203a \306 \203L \306 \232\203a \320 \321\322\n =\203[ \323\202\\ \324#\210))\325 \210\n =\207" [#1=#:last-message arg standard-display-table iso-ascii-display-table v iso-ascii-standard-display-table current-message toggle prefix-numeric-value 0 run-hooks iso-ascii-mode-hook iso-ascii-mode-on-hook iso-ascii-mode-off-hook called-interactively-p any " in current buffer" message "Iso-Ascii mode %sabled%s" "en" "dis" force-mode-line-update local] 5 (#$ . 4515) (list (or current-prefix-arg 'toggle))])
(defvar iso-ascii-mode-hook nil)
(byte-code "\300\301N\204\f \302\300\301\303#\210\304\305!\207" [iso-ascii-mode-hook variable-documentation put "Hook run after entering or leaving `iso-ascii-mode'.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it. (This is true for all hook variables.)" provide iso-ascii] 4)
Zerion Mini Shell 1.0