;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (byte-code "\300\301!\210\302\303\304\305\306\307#\310#\207" [require eval-in-repl defalias eir-send-to-shell apply-partially eir-send-to-repl #[0 "\301!\207" [eir-shell-buffer-name switch-to-buffer-other-window] 2] comint-send-input "Send expression to 'eir-shell-buffer-name and have it evaluated."] 6) #@25 eval-in-repl for shell. (defalias 'eir-eval-in-shell #[0 "`\304\305!\306\307#\210 \203\n\203\310\311`\312 \"!\207\313 \210\314`!\210\315\210`\312 \232\2045\310\311`\312 \"!\210\2027\315 \203>\316 \207\211b\207" [eir-shell-buffer-name transient-mark-mode mark-active eir-jump-after-eval eir-repl-start regexp-quote #[0 "\301!\207" [eir-shell-buffer-name shell] 2 nil nil] t eir-send-to-shell buffer-substring-no-properties mark beginning-of-line set-mark nil eir-next-code-line] 5 (#$ . 393) nil]) (provide 'eval-in-repl-shell)