MMCT TEAM
Server IP : 111.118.215.189  /  Your IP : 18.188.23.45
Web Server : Apache
System : Linux md-in-83.webhostbox.net 4.19.286-203.ELK.el7.x86_64 #1 SMP Wed Jun 14 04:33:55 CDT 2023 x86_64
User : a1673wkz ( 2475)
PHP Version : 8.2.25
Disable Function : NONE
MySQL : OFF  |  cURL : ON  |  WGET : ON  |  Perl : ON  |  Python : ON
Directory (0755) :  /usr/share/emacs/24.3/lisp/eshell/

[  Home  ][  C0mmand  ][  Upload File  ]

Current File : //usr/share/emacs/24.3/lisp/eshell/eshell.elc
;ELC
;;; Compiled by mockbuild@buildfarm06-new.corp.cloudlinux.com on Fri Oct 11 10:10:55 2024
;;; from file /builddir/build/BUILD/emacs-24.3/lisp/eshell/eshell.el
;;; in Emacs version 24.3.1
;;; 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\303\304\305\306\307\310\311\312\313\314&	\207" [require esh-util esh-mode custom-declare-group eshell nil "Command shell implemented entirely in Emacs Lisp.\nIt invokes no external processes beyond those requested by the\nuser, and is intended to be a functional replacement for command\nshells such as bash, zsh, rc, 4dos." :link (info-link "(eshell)Top") :version "21.1" :group applications] 10)
#@57 Add `eshell-buffer-name' to `same-window-buffer-names'.
(defalias 'eshell-add-to-window-buffer-names #[nil "\301\302\"\207" [eshell-buffer-name add-to-list same-window-buffer-names] 3 (#$ . 993)])
(make-obsolete 'eshell-add-to-window-buffer-names nil "24.3")
#@62 Remove `eshell-buffer-name' from `same-window-buffer-names'.
(defalias 'eshell-remove-from-window-buffer-names #[nil "\302	\"\211\207" [eshell-buffer-name same-window-buffer-names delete] 3 (#$ . 1259)])
(byte-code "\300\301\302\303#\210\304\305\302\306\307\310\311\312&\210\304\313\314\315\307\310\311\312&\210\304\316\317\320\307\321\311\312&\210\304\322\323\324\307\325\311\312&\207" [make-obsolete eshell-remove-from-window-buffer-names nil "24.3" custom-declare-variable eshell-load-hook "A hook run once Eshell has been loaded." :type hook :group eshell eshell-unload-hook '(eshell-unload-all-modules) "A hook run when Eshell is unloaded from memory." eshell-buffer-name "*eshell*" "The basename used for Eshell buffers." string eshell-directory-name (locate-user-emacs-file "eshell/" ".eshell/") "The directory where Eshell control files should be kept." directory] 8)
#@479 Create an interactive Eshell buffer.
The buffer used for Eshell sessions is determined by the value of
`eshell-buffer-name'.  If there is already an Eshell session active in
that buffer, Emacs will simply switch to it.  Otherwise, a new session
will begin.  A numeric prefix arg (as in `C-u 42 M-x eshell RET')
switches to the session with that number, creating it if necessary.  A
nonnumeric prefix arg means to create a new session.  Returns the
buffer selected (or created).
(defalias 'eshell #[(&optional arg) "\204\n\304\305\300C\"\210	\247\203\306\307\310	#!\202&	\203#\311!\202&\306!\211\2031\312\n!\2047\304\305\313C\"\210\314\n!\210\315=\204D\315 \210\n)\207" [eshell-buffer-name arg buf major-mode signal cl-assertion-failed get-buffer-create format "%s<%d>" generate-new-buffer buffer-live-p (and buf (buffer-live-p buf)) pop-to-buffer-same-window eshell-mode] 6 (#$ . 2148) "P"])
(defalias 'eshell-return-exits-minibuffer #[nil "\301\302\303#\210\301\304\305#\210\301\306\305#\210\301\307\305#\210\301\310\305#\210\301\311\305#\207" [eshell-mode-map define-key [(control 103)] abort-recursive-edit [return] exit-minibuffer [(control 109)] [(control 106)] [(meta return)] [(meta control 109)]] 4])
#@194 A variable which is non-nil when Eshell is not running interactively.
Modules should use this variable so that they don't clutter
non-interactive sessions, such as when using `eshell-command'.
(defvar eshell-non-interactive-p nil (#$ . 3385))
#@109 Execute the Eshell command string COMMAND.
With prefix ARG, insert output into the current buffer at point.
(defalias 'eshell-command #[(&optional command arg) "\306\307!\210\204\n	\310\311\312\313\216\314\315\"\210\f\204#\316\317!\320\f!\210+\f\204,\321\322!\210\2039\f\323\324\325p!\"P\212\326\327!q\310\330 \210\331\332\333\f!D!6\31176\203_6<\203_\334\202c\3107\3358\336\3378!!\203s\3408!\210\3418!\2107\203\2449\203\207\3429!\2109\203\222\343\344\345C\"\210db\210n\203\244o\204\244\346\347!\210\202\225
\203\256\336
!\204\264\343\344\350C\"\210?\205	7\204\302\351\202\306\352ed\"\211:\353U\203\330\354\355!\210\340
!\202:\356U\203\353\354\357\360 \"\210\340
!\202\361 ;r\362\216\363\364
!!\210eb\2107\205<\205\365 +).\207" [arg current-prefix-arg eshell-non-interactive-p #1=#:setup-hook command buf require esh-cmd t nil #[nil "\301\302\"\210\303 \210\304 \207" [#1# remove-hook minibuffer-setup-hook eshell-mode eshell-return-exits-minibuffer] 3] ((byte-code "\301\302\"\207" [#1# remove-hook minibuffer-setup-hook] 3)) add-hook minibuffer-setup-hook read-from-minibuffer "Emacs shell command: " eshell-add-input-to-history error "No command specified!" format " >>> #<buffer %s>" buffer-name generate-new-buffer " *eshell cmd*" eshell-mode eshell-eval-command eshell-commands eshell-parse-command "*EShell Async Command Output*" "*EShell Command Output*" buffer-live-p get-buffer kill-buffer rename-buffer eshell-wait-for-process signal cl-assertion-failed (not (eshell-interactive-process)) delete-char -1 (and buf (buffer-live-p buf)) 2 count-lines 0 message "(There was no command output)" 1 "%s" buffer-string internal--before-save-selected-window ((internal--after-save-selected-window save-selected-window--state)) select-window display-buffer resize-temp-buffer-window proc intr bufname eshell-last-async-proc len save-selected-window--state temp-buffer-resize-mode] 6 (#$ . 3635) nil])
#@275 Execute the given Eshell COMMAND, and return the result.
The result might be any Lisp object.
If STATUS-VAR is a symbol, it will be set to the exit status of the
command.  This is the only way to determine whether the value returned
corresponding to a successful execution.
(defalias 'eshell-command-result #[(command &optional status-var) "\204\306	\203	9\203O	\307L\210\207\310\311!r\nq\210\312\216\313\314 \210\315\316\317\320!DD\313\"\211@\321=\204:\322\323\324C\"\210	\203G	9\203G	
L\210\f\211A@.\207" [command status-var #1=#:temp-buffer eshell-non-interactive-p result eshell-last-command-status nil 0 generate-new-buffer " *temp*" ((byte-code "\301!\203\n\302!\210\301\207" [#1# buffer-name kill-buffer] 2)) t eshell-mode eshell-do-eval eshell-commands eshell-command-to-value eshell-parse-command quote signal cl-assertion-failed (eq (car result) 'quote) x] 6 (#$ . 5606)])
(byte-code "\300\301\302\303#\210\304\301\302\305#\207" [defalias eshell-report-bug report-emacs-bug nil make-obsolete "23.1"] 4)
#@267 Unload all modules that were loaded by Eshell, if possible.
If the user has require'd in any of the modules, or customized a
variable with a :require tag (such as `eshell-prefer-to-shell'), it
will be impossible to unload Eshell completely without restarting
Emacs.
(defalias 'eshell-unload-all-modules #[nil "\302\303!\205)\303\304!\305\211\203%	@\306!\203\305\307\310\217\210	A\211\204*\311\312!\207" [module --dolist-tail-- fboundp eshell-subgroups eshell nil featurep (byte-code "\301\302\303!\"\210\304!\210\301\305\303!\"\207" [module message "Unloading %s..." symbol-name unload-feature "Unloading %s...done"] 4) ((error)) message "Unloading eshell...done"] 4 (#$ . 6645)])
(byte-code "\300\301!\210\302\303!\207" [run-hooks eshell-load-hook provide eshell] 2)

MMCT - 2023