;ELC ;;; Compiled ;;; in Emacs version 26.3 ;;; 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\300\302!\210\300\303!\210\300\304!\207" [require cl-lib expand-region-core html-mode-expansions nxml-mode] 2) #@33 Marks one nxml element e.g.
(defalias 'er/mark-nxml-tag #[nil "\300\301!\203 \302 \207\303\304!\203 \305u\210\302 \207\306\307\310\"\205 \302 \207" [looking-at "<" nxml-mark-token-after er/looking-back-exact ">" -1 er/looking-back-max "<[^<>]*" 1000] 3 (#$ . 544) nil]) #@40 Marks one nxml element e.g.
...
(defalias 'er/mark-nxml-element #[nil "\300\301!\204 \302 \207\303`!\210\304 \210\305 \207" [looking-at "<[^/]" er/mark-nxml-containing-element set-mark nxml-forward-element exchange-point-and-mark] 2 (#$ . 827) nil]) #@52 Marks one nxml element, but always e.g....
(defalias 'er/mark-nxml-containing-element #[nil "\300 \210\301`!\210\302 \207" [nxml-up-element set-mark nxml-backward-element] 2 (#$ . 1091) nil]) #@49 Marks the inside Nxml statement, eg....
(defalias 'er/mark-nxml-inside-element #[nil "\301\302 \210\303\304!\210\305`!\210\306 \210\303\307!)\207" [nxml-sexp-element-flag nil nxml-up-element nxml-forward-balanced-item -1 set-mark nxml-backward-up-element 1] 2 (#$ . 1297) nil]) #@89 Returns the attribute from `xmltok-attributes' array that point is in, or otherwise nil (defalias 'er/inside-nxml-attribute-string\? #[nil "\212\301u\210\302 \210)\303\304\"\207" [xmltok-attributes 1 nxml-token-before cl-find-if #[(att) "\211\301H\262`X\205 \211\302H\262`Y\207" [att 3 4] 3]] 3 (#$ . 1590)]) #@27 Marks an attribute string (defalias 'er/mark-nxml-attribute-inner-string #[nil "\301 \211\205 \302\211\303H\262!\210\211\304H\262b\210\305 )\207" [attr er/inside-nxml-attribute-string\? set-mark 3 4 exchange-point-and-mark] 5 (#$ . 1911) nil]) #@42 Marks an attribute string inside quotes. (defalias 'er/mark-nxml-attribute-string #[nil "\301 \211\205 \302\211\303H\262S!\210\211\304H\262Tb\210\305 )\207" [attr er/inside-nxml-attribute-string\? set-mark 3 4 exchange-point-and-mark] 5 (#$ . 2167) nil]) #@56 Adds Nxml-specific expansions for buffers in nxml-mode (defalias 'er/add-nxml-mode-expansions #[nil "\301\300!\210\302\303\304\305\304\306\304\307\"\"\"\"\211\207" [er/try-expand-list make-local-variable append (nxml-mark-paragraph er/mark-nxml-tag er/mark-nxml-inside-element er/mark-nxml-element er/mark-nxml-containing-element er/mark-nxml-attribute-string er/mark-nxml-attribute-inner-string er/mark-html-attribute) remove er/mark-method-call er/mark-symbol-with-prefix er/mark-symbol] 9 (#$ . 2434) nil]) (byte-code "\300\301\302\"\210\303\304!\207" [er/enable-mode-expansions nxml-mode er/add-nxml-mode-expansions provide nxml-mode-expansions] 3)