%PDF- %PDF-
Mini Shell

Mini Shell

Direktori : /usr/local/share/emacs/27.2/lisp/international/
Upload File :
Create Path :
Current File : //usr/local/share/emacs/27.2/lisp/international/latexenc.elc

;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.

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


#@200 Mapping from LaTeX encodings in "inputenc.sty" to Emacs coding systems.
LaTeX encodings are specified with "\usepackage[encoding]{inputenc}".
Used by the function `latexenc-find-file-coding-system'.
(custom-declare-variable 'latex-inputenc-coding-alist '(purecopy '(("ansinew" . windows-1252) ("applemac" . mac-roman) ("ascii" . us-ascii) ("cp1250" . windows-1250) ("cp1252" . windows-1252) ("cp1257" . cp1257) ("cp437de" . cp437) ("cp437" . cp437) ("cp850" . cp850) ("cp852" . cp852) ("cp858" . cp858) ("cp865" . cp865) ("latin1" . iso-8859-1) ("latin2" . iso-8859-2) ("latin3" . iso-8859-3) ("latin4" . iso-8859-4) ("latin5" . iso-8859-9) ("latin9" . iso-8859-15) ("latin10" . iso-8859-16) ("next" . next) ("utf8" . utf-8) ("utf8x" . utf-8))) '(#$ . 409) :group 'files :group 'mule :type '(alist :key-type (string :tag "LaTeX input encoding") :value-type (coding-system :tag "Coding system")))
#@128 Return the corresponding coding-system for the specified input encoding.
Return nil if no matching coding system can be found.
(defalias 'latexenc-inputenc-to-coding-system #[(inputenc) "\302	\"A\207" [inputenc latex-inputenc-coding-alist assoc] 3 (#$ . 1312)])
#@129 Return the corresponding input encoding for the specified coding system.
Return nil if no matching input encoding can be found.
(defalias 'latexenc-coding-system-to-inputenc #[(cs) "\306\3002?	\306\211\203:@\211A\307\f!\2032\307
!\2032\310
!\310\f!=\2032\n@\311\300\"\210)A\211\204\306*0)\207" [result latex-inputenc-coding-alist elem --dolist-tail-- elem-cs cs nil coding-system-p coding-system-base throw] 4 (#$ . 1582)])
#@66 Non-nil means don't follow TeX-master to find the coding system.
(defvar latexenc-dont-use-TeX-master-flag nil (#$ . 2031))
#@71 Non-nil means don't use tex-guessmain-file to find the coding system.
(defvar latexenc-dont-use-tex-guess-main-file-flag nil (#$ . 2161))
#@206 Determine the coding system of a LaTeX file if it uses "inputenc.sty".
The mapping from LaTeX's "inputenc.sty" encoding names to Emacs
coding system names is determined from `latex-inputenc-coding-alist'.
(defalias 'latexenc-find-file-coding-system #[(arg-list) "@\306=\2032\212eb\210\3072=\310\311\312\310\313#\205;\314\224b\210\315 \210\316\317!\204,\316\320!\2034\321\307\313\"\210\202\314\225b\210\202)0\203o\322\323!\324\n!\206M\325\n!\326!\203X\202k\327\330\310\313#\203j\326!\203j\202k\331*\2020A@;\203~\332A@!\202\f\3100\204\345db\210\333\334d\335Ze]\336#\210\311\337\310\313#\210\340\341\310\313#\203\345\322\342!1\343\344\345!\203\265\346%P\202\266\343\347BB\3102\2113\203\3443@2
\204\333\35012P!\203\33312P3A\2113\204\302+4\204\373
\204\373\351\352!\203\373\3535\352 )
\203.\354
!\203.\355
!\203.\313\21140\356
\313\"6\357r6q\2107\206(8\206(\331)!+\202/\331*)\207\331\207" [arg-list case-fold-search match sym default-directory latexenc-main-file insert-file-contents cs nil search-forward "inputenc" t 0 beginning-of-line looking-at "[^%\n]*\\\\usepackage\\[\\([^]]*\\)\\]{\\([^}]*,\\)?inputenc\\(,[^}]*\\)?}" "[^%\n]*\\\\inputencoding{\\([^}]*\\)}" throw match-string 1 latexenc-inputenc-to-coding-system intern coding-system-p require code-pages undecided file-name-directory search-backward "\n\f" 3000 move "Local Variables:" re-search-forward "^%+ *\\(TeX-master\\|tex-main-file\\): *\"\\(.+\\)\"" 2 "" boundp TeX-default-extension "." (".tex" ".ltx" ".dtx" ".drv") file-exists-p fboundp tex-guess-main-file "\\\\document\\(style\\|class\\)" file-regular-p file-readable-p find-file-noselect coding-system-base latexenc-dont-use-TeX-master-flag file ext --dolist-tail-- latexenc-dont-use-tex-guess-main-file-flag tex-start-of-header latexenc-main-buffer coding-system-for-write buffer-file-coding-system] 5 (#$ . 2306)])
(provide 'latexenc)

Zerion Mini Shell 1.0