;ELC ;;; Compiled ;;; in Emacs version 29.3 ;;; with all optimizations. (byte-code "\300\301!\210\300\302\303\304#\207" [require evil-collection geiser nil t] 4) (defconst evil-collection-geiser-maps '(geiser-debug-mode-map geiser-doc-mode-map geiser-repl-mode-map geiser-mode-map))#@84 In normal-state or motion-state, last sexp ends at point. (fn COMMAND &rest ARGS) (defalias 'evil-collection-geiser-last-sexp #[385 "\204 \301 \204\302 \203 \212m\204l\204\303u\210\304\")\207\304\"\207" [evil-move-beyond-eol evil-normal-state-p evil-motion-state-p nil apply] 5 (#$ . 294)])#@31 Set up bindings for `geiser'. (defalias 'evil-collection-geiser-setup #[0 "\204\301\302\303\304#\210\301\305\303\304#\210\306\307\310\"\210\306\311\310\"\210\312\313\314\315#\210\312\316\317\320\321\322\323\324&\210\325\310\316\326\327\330\331\332\333&\210\312\316\334\335\336\337\340\335\341\337\342\343\344\345\346\335\347\337\314\350\351\352\353\354\355\354&\210\312\356\357\360\361\362\363\362\317\320\321\322\364\365\340\366\341\367\342\366\344\367&\210\312\370\317\320\321\322\364\365\323\371& \210\325\310\370\372\373$\207" [evil-move-beyond-eol advice-add geiser-eval-last-sexp :around evil-collection-geiser-last-sexp geiser-eval-last-sexp-and-print evil-set-initial-state geiser-debug-mode normal geiser-doc-mode evil-collection-bind geiser-debug-mode-map quit quit-window geiser-doc-mode-map find-definition geiser-edit-symbol-at-point pop-definition geiser-pop-symbol-stack goto-repl geiser-doc-switch-to-repl evil-collection-define-key ">" geiser-doc-next "<" geiser-doc-previous "X" geiser-doc-clean-history next-button forward-button previous-button backward-button next-item prev-item next-section geiser-doc-next-section prev-section geiser-doc-previous-section next-section-2 prev-section-2 View-quit refresh geiser-doc-refresh delete geiser-doc-kill-page delete-2 geiser-repl-mode-map repl-submit geiser-repl-maybe-send repl-newline geiser-repl--newline-and-indent repl-force-newline lookup-doc geiser-doc-symbol-at-point geiser-repl-next-prompt geiser-repl-previous-prompt geiser-mode-map geiser-mode-switch-to-repl "gZ" geiser-mode-switch-to-repl-and-enter] 26 (#$ . 604)]) (provide 'evil-collection-geiser)