;ELC ;;; Compiled ;;; in Emacs version 25.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. ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; #@65 Do beamer-specific stuff after the insertion of an environment. (defalias 'LaTeX-beamer-after-insert-env #[(env start _end) "\305\306 \307#\205N\212 b\210\310 \311\230)\205N\212\312\313\314\315#\205M\316\225\211b\210\317\320!\204$\314f\321 !=\203G\314u\210\322c\210\323\324\fP!?\205L\325c\202L\nb\210\326c))\207" [env start end-of-begin LaTeX-optop LaTeX-optcl TeX-member LaTeX-verbatim-environments string-equal LaTeX-current-environment "frame" re-search-backward "\\\\begin[ ]*{frame}" nil t 0 forward-comment 1 string-to-char "fragile" looking-at "[ ]*" "," "[fragile]"] 5 (#$ . 410)]) #@36 History of frame titles in beamer. (defvar LaTeX-beamer-frametitle-history nil (#$ . 1017)) (TeX-add-style-hook "beamer" #[nil "\305\306\307\310\311$\210\312\313\314\315\316\317\320\321\322\323& \210\204\324\301!\210\325\326\327\n\"\330\331\332!\210\333\334\335\336\337\340\341\342\343\344\345\346\347\350\351\352\353\354\355\356\357\360\361\362\363\364\365\366\367\370\371\372\373\374\375\376\377\201@\201A\201B\201C\201D\201E\201F&+\210\201G\201H\201I\201J\201K\201L\201M\201N\201O\201P\201Q\201R\201S\201T& \210\201U\201V!\210\201W\201X\201Y\201V\201Z\201[\201\\\201]\201^\201_\201`&\n\210\201a\201b!\210\201c\324\201d!\201e\311#\210\201c\201f\201T\"\210\201g\201h!\205\f\201i=\205\201j\201k\201l\"\210\201m\311!\207" [LaTeX-beamer-section-labels-flag LaTeX-section-hook LaTeX-item-list LaTeX-default-document-environment TeX-install-font-lock add-hook LaTeX-after-insert-env-hooks LaTeX-beamer-after-insert-env nil t TeX-run-style-hooks "amsmath" "amssymb" "amsthm" "color" "geometry" "hyperref" "inputenc" "translator" "xcolor" make-local-variable (LaTeX-section-heading LaTeX-section-title LaTeX-section-section) append (("itemize" . LaTeX-item-beamer) ("enumerate" . LaTeX-item-beamer)) "frame" LaTeX-paragraph-commands-add-locally "frametitle" TeX-add-symbols ("alert" 1) ("alt" TeX-arg-beamer-overlay-spec 2) ("beamerbutton" 1) ("beamergotobutton" 1) ("beamerreturnbutton" 1) ("beamerskipbutton" 1) ("frame" TeX-arg-beamer-frametitle) ("frametitle" (TeX-arg-eval TeX-read-string "Title: " nil 'LaTeX-beamer-frametitle-history)) ("hyperlink" TeX-arg-beamer-overlay-spec 2) ("hyperlinkslideprev" TeX-arg-beamer-overlay-spec 1) ("hyperlinkslidenext" TeX-arg-beamer-overlay-spec 1) ("hyperlinkframestart" TeX-arg-beamer-overlay-spec 1) ("hyperlinkframeend" TeX-arg-beamer-overlay-spec 1) ("hyperlinkframestartnext" TeX-arg-beamer-overlay-spec 1) ("hyperlinkframeendprev" TeX-arg-beamer-overlay-spec 1) ("hyperlinkpresentationstart" TeX-arg-beamer-overlay-spec 1) ("hyperlinkpresentationend" TeX-arg-beamer-overlay-spec 1) ("hyperlinkappendixstart" TeX-arg-beamer-overlay-spec 1) ("hyperlinkappendixend" TeX-arg-beamer-overlay-spec 1) ("hyperlinkdocumentstart" TeX-arg-beamer-overlay-spec 1) ("hyperlinkdocumentend" TeX-arg-beamer-overlay-spec 1) ("hypertarget" TeX-arg-beamer-overlay-spec 2) ("institute" 1) ("invisible" TeX-arg-beamer-overlay-spec 1) ("label" TeX-arg-beamer-overlay-spec 1) ("logo" 1) ("note" TeX-arg-beamer-note 1) ("only" TeX-arg-beamer-overlay-spec 1) ("onslide" TeX-arg-beamer-overlay-spec) ("partpage") ("pause" ["Slide number"]) ("structure" TeX-arg-beamer-overlay-spec 1) ("temporal" TeX-arg-beamer-overlay-spec 3) ("titlepage") ("titlegraphic" 1) ("uncover" TeX-arg-beamer-overlay-spec 1) ("usetheme" LaTeX-arg-beamer-theme) ("useinnertheme" LaTeX-arg-beamer-inner-theme) ("useoutertheme" LaTeX-arg-beamer-outer-theme) ("usecolortheme" LaTeX-arg-beamer-color-theme) ("usefonttheme" LaTeX-arg-beamer-font-theme) ("usetheme" LaTeX-arg-beamer-theme) ("visible" TeX-arg-beamer-overlay-spec 1) LaTeX-add-environments ("actionenv") ("alertblock" 1) ("beamerboxesrounded" 1) ("block" (lambda (env &rest ignore) (LaTeX-insert-environment env (format "{%s}" (TeX-read-string "Title: "))))) ("column" "Width") "columns" "columnsonlytextwidth" ("exampleblock" 1) ("frame" (lambda (env &rest ignore) (let ((title (TeX-read-string "(Optional) Title: " nil 'LaTeX-beamer-frametitle-history))) (LaTeX-insert-environment env) (unless (zerop (length title)) (save-excursion (LaTeX-find-matching-begin) (end-of-line) (LaTeX-newline) (insert (format "\\frametitle{%s}" title)) (backward-char) (LaTeX-fill-paragraph)))))) ("onlyenv" (lambda (env &rest ignore) (LaTeX-insert-environment env (let ((overlay (TeX-read-string "(Optional) Overlay: "))) (unless (zerop (length overlay)) (format "<%s>" overlay)))))) ("overlayarea" "Area width" "Area height") ("overprint" (lambda (env &rest ignore) (LaTeX-insert-environment env (let ((width (TeX-read-string "(Optional) Area width: "))) (unless (zerop (length width)) (format "[%s]" width)))))) "semiverbatim" LaTeX-largest-level-set "section" LaTeX-add-counters "lecture" "part" "subsection" "subsubsection" "subsectionslide" "framenumber" "figure" "table" "beamerpauses" LaTeX-add-pagestyles "navigation" add-to-list LaTeX-indent-environment-list ("semiverbatim" current-indentation) LaTeX-verbatim-environments-local featurep font-latex font-latex-setup font-latex-add-keywords (("title" "[{") ("subtitle" "[{") ("author" "[{") ("date" "[{") ("frametitle" "<[{")) slide-title font-latex-update-font-lock] 44] LaTeX-dialect) #@35 Prompt for overlay specification. (defalias 'TeX-arg-beamer-overlay-spec #[(_optional &optional _prompt) "\301\302!\211G\303U\204\304\305\261\210\306 )\207" [overlay TeX-read-string "(Optional) Overlay: " 0 "<" ">" indent-according-to-mode] 4 (#$ . 5665)]) #@28 Prompt for the frametitle. (defalias 'TeX-arg-beamer-frametitle #[(_optional &optional _prompt) "\304\305\306\307#\211G\310U\204 \n\311  \211\261\202 \261)\207" [title TeX-grop TeX-esc TeX-grcl TeX-read-string "Title: " nil LaTeX-beamer-frametitle-history 0 "frametitle"] 8 (#$ . 5933)]) #@258 Insert a new item with an optional overlay argument. You can turn off the prompt for the overlay argument by setting `LaTeX-beamer-item-overlay-flag' to nil. Calling the function with a prefix argument prompts for the overlay specification unconditionally. (defalias 'LaTeX-item-beamer #[nil "<\203@\302\303!\210\304 \210\204 \203\305\306!\210\307c\210\310 \207" [current-prefix-arg LaTeX-beamer-item-overlay-flag TeX-insert-macro "item" delete-horizontal-space TeX-arg-beamer-overlay-spec 0 " " indent-according-to-mode] 2 (#$ . 6237)]) #@57 Prompt for overlay specification and optional argument. (defalias 'TeX-arg-beamer-note #[(_optional &optional _prompt) "\302\303!\302\304!\211G\305U\204\306 \307\261\210G\305U\204\"\310\311\261\210\312 *\207" [options overlay TeX-read-string "(Optional) Overlay: " "(Optional) Options: " 0 "<" ">" "[" "]" indent-according-to-mode] 4 (#$ . 6791)]) #@239 Search for beamer themes matching REGEXP with EXTENSIONS. The function removes the first LENGTH characters and the extension of the file and returns a list of strings. LENGTH may also be a string. Then the length of the string is used. (defalias 'LaTeX-beamer-search-themes #[(&optional regexp extensions length) "\206\306\n\206 \307\f\250\203\f\2027\f;\203 \310\f!\2027\f\2043\311\312 \"\2033\313\225\313\224Z\2027\314\315\f\"\316\317\320\321\322\323\320 \324\211$\"\"!+\207" [regexp match extensions exts length chars "^beamertheme[A-Z]" ("tex" "sty") string-width string-match "beamer[A-Za-z0-9]*theme" 0 error "Invalid length: `%s'" TeX-delete-duplicate-strings delete nil mapcar #[(file) "\304\305 \n\"\247\205\n \304O)\207" [case-fold-search match file chars nil string-match] 3] TeX-search-files t] 10 (#$ . 7155)]) #@42 Prompt for beamer theme with completion. (defalias 'LaTeX-arg-beamer-theme #[(&rest _ignore) "\301\302\303\304\211\305#\306\307\310=\203\311\300!\210\312 \211\2022\313!\203% \2022<\203.\2022\314\315\"\"\304\211\211%\316\"\207" [LaTeX-beamer-themes TeX-argument-insert completing-read TeX-argument-prompt nil "Theme" mapcar list local make-local-variable LaTeX-beamer-search-themes functionp error "`LaTeX-beamer-themes' should be a list: `%s'" t] 8 (#$ . 8004)]) #@48 Prompt for beamer inner theme with completion. (defalias 'LaTeX-arg-beamer-inner-theme #[(&rest _ignore) "\301\302\303\304\211\305#\306\307\310=\203\311\300!\210\312\313!\211\2023\314!\203& \2023<\203/\2023\315\316\"\"\304\211\211%\317\"\207" [LaTeX-beamer-inner-themes TeX-argument-insert completing-read TeX-argument-prompt nil "Theme" mapcar list local make-local-variable LaTeX-beamer-search-themes "^beamerinnertheme" functionp error "`LaTeX-beamer-inner-themes' should be a list: `%s'" t] 8 (#$ . 8487)]) #@48 Prompt for beamer outer theme with completion. (defalias 'LaTeX-arg-beamer-outer-theme #[(&rest _ignore) "\301\302\303\304\211\305#\306\307\310=\203\311\300!\210\312\313!\211\2023\314!\203& \2023<\203/\2023\315\316\"\"\304\211\211%\317\"\207" [LaTeX-beamer-outer-themes TeX-argument-insert completing-read TeX-argument-prompt nil "Theme" mapcar list local make-local-variable LaTeX-beamer-search-themes "^beameroutertheme" functionp error "`LaTeX-beamer-outer-themes' should be a list: `%s'" t] 8 (#$ . 9018)]) #@48 Prompt for beamer color theme with completion. (defalias 'LaTeX-arg-beamer-color-theme #[(&rest _ignore) "\301\302\303\304\211\305#\306\307\310=\203\311\300!\210\312\313!\211\2023\314!\203& \2023<\203/\2023\315\316\"\"\304\211\211%\317\"\207" [LaTeX-beamer-color-themes TeX-argument-insert completing-read TeX-argument-prompt nil "Theme" mapcar list local make-local-variable LaTeX-beamer-search-themes "^beamercolortheme" functionp error "`LaTeX-beamer-color-themes' should be a list: `%s'" t] 8 (#$ . 9549)]) #@47 Prompt for beamer font theme with completion. (defalias 'LaTeX-arg-beamer-font-theme #[(&rest _ignore) "\301\302\303\304\211\305#\306\307\310=\203\311\300!\210\312\313!\211\2023\314!\203& \2023<\203/\2023\315\316\"\"\304\211\211%\317\"\207" [LaTeX-beamer-font-themes TeX-argument-insert completing-read TeX-argument-prompt nil "Theme" mapcar list local make-local-variable LaTeX-beamer-search-themes "^beamerfonttheme" functionp error "`LaTeX-beamer-font-themes' should be a list: `%s'" t] 8 (#$ . 10080)]) #@46 Read the beamer class options from the user. (defalias 'LaTeX-beamer-class-options #[nil "\300\301\302\"\207" [TeX-read-key-val t (("usepdftitle" ("false")) ("envcountsect") ("notheorems") ("noamsthm") ("compress") ("t") ("c") ("leqno") ("fleqn") ("handout") ("trans") ("pdftex") ("nativepdf") ("pdfmark") ("dvips") ("dviwindo") ("dvipsone") ("vtex") ("ps2pdf") ("ignorenonframetext") ("noamssymb") ("bigger") ("smaller") ("8pt") ("9pt") ("10pt") ("11pt") ("12pt") ("14pt") ("17pt") ("20pt") ("draft") ("CJK") ("cjk") ("pgf") ("hyperref" LaTeX-hyperref-package-options-list) ("color") ("xcolor") ("ucs") ("utf8x") ("utf8") ("aspectratio" ("1610" "169" "149" "54" "43" "32")))] 3 (#$ . 10607)])