| commit | author | age | ||
| 76bbd0 | 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 | (byte-code "\300\301!\210\300\302!\210\300\303!\210\304\305\306\307\310\311%\207" [require org eshell esh-mode org-link-set-parameters "eshell" :follow org-eshell-open :store org-eshell-store-link] 6) | |
| 16 | #@217 Switch to am eshell buffer and execute a command line. | |
| 17 | The link can be just a command line (executed in the default | |
| 18 | eshell buffer) or a command line prefixed by a buffer name | |
| 19 | followed by a colon. | |
| 20 | ||
| 21 | (fn LINK) | |
| 22 | (defalias 'org-eshell-open #[257 "\301\302\"\203 \303\304\"\303\305\"D\202 D\211@\211A@\306!\203) \307!\210\202, \310 \210db\210\311 \210\211c\210\312 )\207" [eshell-buffer-name string-match "\\([A-Za-z0-9-+*]+\\):\\(.*\\)" match-string 1 2 get-buffer pop-to-buffer-same-window eshell eshell-kill-input eshell-send-input] 5 (#$ . 610)]) | |
| 23 | #@114 Store a link that, when opened, switches back to the current eshell buffer | |
| 24 | and the current working directory. | |
| 25 | (defalias 'org-eshell-store-link #[0 "\302=\205 \303 P\304 \305Q\306\307\310P\311$\266\202\207" [major-mode dired-directory eshell-mode "cd " buffer-name ":" org-store-link-props :link "eshell:" :description] 7 (#$ . 1180)]) | |
| 26 | (provide 'org-eshell) | |
