;ELC ;;; Compiled ;;; in Emacs version 29.3 ;;; with all optimizations. (byte-code "\300\301!\210\300\302\303\304#\207" [require evil-collection eval-sexp-fu nil t] 4) (defconst evil-collection-eval-sexp-fu-maps nil)#@84 In normal-state or motion-state, last sexp ends at point. (fn COMMAND &rest ARGS) (defalias 'evil-collection-eval-sexp-fu-bounds-of-thing-at-point-sexp #[385 "\211@\301=\203'\204'\302 \204\303 \203'\212m\204!l\204!\304u\210\305\")\207\305\"\207" [evil-move-beyond-eol sexp evil-normal-state-p evil-motion-state-p nil apply] 5 (#$ . 228)])#@102 Advise `bounds-of-thing-at-point' to handle `evil's `evil-move-beyond-eol'. (fn COMMAND &rest ARGS) (defalias 'evil-collection-eval-sexp-fu-advise-bounds-of-thing-at-point #[385 "\300\301\302\303#\210\304\"\210\305\301\303\"\207" [advice-add bounds-of-thing-at-point :around evil-collection-eval-sexp-fu-bounds-of-thing-at-point-sexp apply advice-remove] 6 (#$ . 586)])#@36 Set up `evil' with `eval-sexp-fu'. (defalias 'evil-collection-eval-sexp-fu-setup #[0 "?\205\n\301\302\303\304#\207" [evil-move-beyond-eol advice-add ad-Advice-eval-last-sexp :around evil-collection-eval-sexp-fu-advise-bounds-of-thing-at-point] 4 (#$ . 964)]) (provide 'evil-collection-eval-sexp-fu)