;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (require 'smartparens) #@22 ID, ACTION, CONTEXT. (defalias 'sp-latex-insert-spaces-inside-pair #[(id action context) "\305=\203\f\306c\210\307u\210\310=\205O\212 \311\n\312\"\311\n\313\"G\\)b\210\314\315!)?\205O\212 \311 \316\"\311 \317\"GZ)b\210\320c\210 \311\f\312\"\311\f\313\"G\\)b\210\320c)\207" [action sp-last-wrapped-region #1=#:struct #2=#:struct #3=#:struct insert " " -1 wrap plist-get :beg :op sp--looking-back-p "[[{(]" :end :cl " "] 4 (#$ . 110)]) #@13 MS, MB, ME. (defalias 'sp-latex-skip-match-apostrophe #[(ms mb me) "\303\232\205\212 b\210\304\305\306!)\262)\207" [ms me inhibit-changing-match-data "'" "\\sw" t looking-at] 3 (#$ . 559)]) #@22 ID, ACTION, CONTEXT. (defalias 'sp-latex-skip-double-quote #[(id action context) "\302=\205\303\304\305!)\262\205\306\307!\210\306\310!\210\310u\207" [action inhibit-changing-match-data insert "''''" t looking-at delete-char -2 2] 3 (#$ . 761)]) #@126 Return t if point follows a backslash, nil otherwise. This predicate is only tested on "insert" action. ID, ACTION, CONTEXT. (defalias 'sp-latex-point-after-backslash #[(id action context) "\303=\205\304 \305\"\306\307\310\n\203\n\202 !P!)\207" [action id trigger insert sp-get-pair :trigger looking-back "\\\\" regexp-quote] 4 (#$ . 1022)]) #@83 Return t if point is before a word while in navigate action. ID, ACTION, CONTEXT. (defalias 'sp-latex-point-before-word-p #[(id action context) "\302=\205\303\304\305!)\262\207" [action inhibit-changing-match-data navigate "\\sw" t looking-at] 3 (#$ . 1378)]) (byte-code "\301\302\303\"\210\304\305\306\307\310\311\312\313\314\315& \210\305\316\211#\210\305\317\320\314\321%\210\305\322\323\310\323%\210\305\324\323\310\323%\210\305\307\323\310\323%\210\305\325\323\310\323%\210\305\326\327\330\331\314\332\333\334& \210\305\335\323\336\337%\210\305\335\340#\210\305\341\342#\210\305\343\344#\210\305\345\346\330\347\350\351\333\352& \210\305\353\354\330\355\350\356\333\357& \210\305\360\361\330\362\350\363\333\364& \210\305\365\366\330\367\350\370\333\371& \210\305\372\373\333\374%\210\305\375\376\333\377%\210\305\201@\201A\333\201B%\210\305\201C\201D\333\201E%\210\305\201F\201G\333\201H%\210\305\201I\201J\333\201K%\210\305\201L\201M\333\201N%\210\305\201O\201P\333\201Q%\210\305\201R\201S\333\201T%\210\305\201U\201V\333\201W%\210\305\201X\201Y\333\201Z%\210\305\201[\201\\\333\201]%\210\305\201^\201_\333\201`%\210\305\201a\201b\333\201c%\210\305\201d\201e\333\201f%\210\201g\331\326\327\310\201h&\210\201g\201i\201j\201k$\210\201g\201l\201m\201n$\210\201g\201o\201p\201q$\210)\201r\201s!\207" [#:modes add-to-list sp-navigate-skip-match ((tex-mode plain-tex-mode latex-mode) . sp--backslash-skip-match) (tex-mode plain-tex-mode latex-mode LaTeX-mode) sp-local-pair "`" "'" :actions (:rem autoskip) :skip-match sp-latex-skip-match-apostrophe :unless (sp-latex-point-after-backslash sp-latex-point-before-word-p) "$" "\\[" "\\]" (sp-latex-point-after-backslash) "/*" nil "\\\\(" "\\\"" "``" "''" :trigger "\"" (sp-latex-point-after-backslash) :post-handlers (sp-latex-skip-double-quote) "{" :prefix "\\\\\\(\\sw\\|\\s_\\)*" "}" "(" ")" "[" "]" "\\left(" "\\right)" "\\l(" :when (sp-in-math-p) (sp-latex-insert-spaces-inside-pair) "\\left[" "\\right]" "\\l[" (sp-in-math-p) (sp-latex-insert-spaces-inside-pair) "\\left\\{" "\\right\\}" "\\l{" (sp-in-math-p) (sp-latex-insert-spaces-inside-pair) "\\left|" "\\right|" "\\l|" (sp-in-math-p) (sp-latex-insert-spaces-inside-pair) "\\bigl(" "\\bigr)" (sp-latex-insert-spaces-inside-pair) "\\biggl(" "\\biggr)" (sp-latex-insert-spaces-inside-pair) "\\Bigl(" "\\Bigr)" (sp-latex-insert-spaces-inside-pair) "\\Biggl(" "\\Biggr)" (sp-latex-insert-spaces-inside-pair) "\\bigl[" "\\bigr]" (sp-latex-insert-spaces-inside-pair) "\\biggl[" "\\biggr]" (sp-latex-insert-spaces-inside-pair) "\\Bigl[" "\\Bigr]" (sp-latex-insert-spaces-inside-pair) "\\Biggl[" "\\Biggr]" (sp-latex-insert-spaces-inside-pair) "\\bigl\\{" "\\bigr\\}" (sp-latex-insert-spaces-inside-pair) "\\biggl\\{" "\\biggr\\}" (sp-latex-insert-spaces-inside-pair) "\\Bigl\\{" "\\Bigr\\}" (sp-latex-insert-spaces-inside-pair) "\\Biggl\\{" "\\Biggr\\}" (sp-latex-insert-spaces-inside-pair) "\\lfloor" "\\rfloor" (sp-latex-insert-spaces-inside-pair) "\\lceil" "\\rceil" (sp-latex-insert-spaces-inside-pair) "\\langle" "\\rangle" (sp-latex-insert-spaces-inside-pair) sp-local-tag (wrap) "\\b" "\\begin{_}" "\\end{_}" "bi" "\\begin{itemize}" "\\end{itemize}" "be" "\\begin{enumerate}" "\\end{enumerate}" provide smartparens-latex] 10)