commit | author | age
|
5cb5f7
|
1 |
;ELC |
C |
2 |
;;; Compiled |
|
3 |
;;; in Emacs version 26.1 |
|
4 |
;;; with all optimizations. |
|
5 |
|
|
6 |
;;; This file uses dynamic docstrings, first added in Emacs 19.29. |
|
7 |
|
|
8 |
;;; This file does not contain utf-8 non-ASCII characters, |
|
9 |
;;; and so can be loaded in Emacs versions earlier than 23. |
|
10 |
|
|
11 |
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
|
12 |
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
|
13 |
|
|
14 |
|
|
15 |
(require 'smartparens) |
|
16 |
#@46 ID, ACTION, CONTEXT. |
|
17 |
|
|
18 |
(fn ID ACTION CONTEXT) |
|
19 |
(defalias 'sp-latex-insert-spaces-inside-pair #[771 "\301=\203\f \302c\210\303u\210\304=\205O \212\305\306\"\305\307\"G\\\262b\210\310\311!)?\205O \212\305\312\"\305\313\"GZ\262b\210\314c\210\305\306\"\305\307\"G\\\262b\210\314c)\207" [sp-last-wrapped-region insert " " -1 wrap plist-get :beg :op sp--looking-back-p "[[{(]" :end :cl " "] 8 (#$ . 431)]) |
|
20 |
#@28 MS, MB, ME. |
|
21 |
|
|
22 |
(fn MS MB ME) |
|
23 |
(defalias 'sp-latex-skip-match-apostrophe #[771 "\301\232\205 \212\211b\210\302\303\304!)\262)\207" [inhibit-changing-match-data "'" "\\sw" t looking-at] 6 (#$ . 850)]) |
|
24 |
#@46 ID, ACTION, CONTEXT. |
|
25 |
|
|
26 |
(fn ID ACTION CONTEXT) |
|
27 |
(defalias 'sp-latex-skip-double-quote #[771 "\301=\205 \302\303\304!)\262\205 \305\306!\210\305\307!\210\307u\207" [inhibit-changing-match-data insert "''''" t looking-at delete-char -2 2] 6 (#$ . 1057)]) |
|
28 |
#@150 Return t if point follows a backslash, nil otherwise. |
|
29 |
This predicate is only tested on "insert" action. |
|
30 |
ID, ACTION, CONTEXT. |
|
31 |
|
|
32 |
(fn ID ACTION CONTEXT) |
|
33 |
(defalias 'sp-latex-point-after-backslash #[771 "\300=\205 \301\302\"\303\304\305\203 \202 !P\306\"\262\207" [insert sp-get-pair :trigger looking-back "\\\\" regexp-quote nil] 8 (#$ . 1320)]) |
|
34 |
(byte-code "\300\301\302\"\210\303\304\305\306\307\310\311\312\313\314& \210\304\315\211#\210\304\316\317\313\320%\210\304\321\322\307\322%\210\304\306\322\307\322%\210\304\323\322\307\322%\210\304\324\325\326\327\313\330\331\332& \210\304\333\322\334\335%\210\304\333\336#\210\304\337\340#\210\304\341\342#\210\304\343\344\326\345\346\347\331\350& \210\304\351\352\326\353\346\354\331\355& \210\304\356\357\326\360\346\361\331\362& \210\304\363\364\326\365\346\366\331\367& \210\304\370\371\331\372%\210\304\373\374\331\375%\210\304\376\377\331\201@ %\210\304\201A \201B \331\201C %\210\304\201D \201E \331\201F %\210\304\201G \201H \331\201I %\210\304\201J \201K \331\201L %\210\304\201M \201N \331\201O %\210\304\201P \201Q \331\201R %\210\304\201S \201T \331\201U %\210\304\201V \201W \331\201X %\210\304\201Y \201Z \331\201[ %\210\304\201\\ \201] \331\201^ %\210\304\201_ \201` \331\201a %\210\304\201b \201c \331\201d %\210\304\201e \201f \346\201g \326\201e \331\201h & \210\304\201i \201j \346\201k \326\201i \331\201l & \210\201m \327\324\325\307\201n &\210\201m \201o \201p \201q $\210\201m \201r \201s \201t $\210\201m \201u \201v \201w $\266\201x \201y !\207" [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-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) "\\lVert" "\\rVert" (sp-in-math-p) (sp-latex-insert-spaces-inside-pair) "\\lvert" "\\rvert" (sp-in-math-p) (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] 11) |