ikan Uploader :
Directory : /usr/share/emacs/25.2/lisp/eshell/
Upload File : |
| Current File : //usr/share/emacs/25.2/lisp/eshell/esh-module.elc |
;ELC
;;; Compiled
;;; in Emacs version 25.2.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\302\303!\210\302\304!\210\305\306\307\310\311\312\313\303&\210\314\315\307\316#\210\317\320\321\322\323DD\324\325\326\313\306&\210\317\327\321\322\330DD\331\325\332\333\311\334E\335\336\337\335\340\341\306!\"\342\"\"\343#\313\306&\207" [provide esh-module require eshell esh-util custom-declare-group eshell-module nil "The `eshell-module' group is for Eshell extension modules, which\nprovide optional behavior which the user can enable or disable by\ncustomizing the variable `eshell-modules-list'." :tag "Extension modules" :group load "esh-groups" nomessage custom-declare-variable eshell-module-unload-hook funcall function #[0 "\300\207" [(eshell-unload-extension-modules)] 1] "A hook run when `eshell-module' is unloaded." :type hook eshell-modules-list #[0 "\300\207" [(eshell-alias eshell-banner eshell-basic eshell-cmpl eshell-dirs eshell-glob eshell-hist eshell-ls eshell-pred eshell-prompt eshell-script eshell-term eshell-unix)] 1] "A list of optional add-on modules to be loaded by Eshell.\nChanges will only take effect in future Eshell buffers." append set "Supported modules" mapcar #[257 "\300!\301\302\303\304\305N#\306\307N@@\310\311\312N\313Q\257\207" [intern const :tag format "%s -- %s" custom-tag :link custom-links :doc "\n" group-documentation "\n "] 11 "\n\n(fn MODNAME)"] sort symbol-name eshell-subgroups string-lessp ((repeat :inline t :tag "Other modules" symbol))] 14)
#@190 Return non-nil if a certain Eshell MODULE is in use.
The MODULE should be a symbol corresponding to that module's
customization group. Example: `eshell-cmpl' for that module.
(fn MODULE)
(defalias 'eshell-using-module #[257 "\211>\207" [eshell-modules-list] 3 (#$ . 1850)])
(put 'eshell-using-module 'byte-optimizer 'byte-compile-inline-expand)
#@47 Unload any memory resident extension modules.
(defalias 'eshell-unload-extension-modules #[0 "\300\301!\211\2054 \211@\302!\203- \3031( \304\305\306!\"\210\307!\210\304\310\306!\"0\202, \210\202- \210A\266\202\202 \207" [eshell-subgroups eshell-module featurep (error) message "Unloading %s..." symbol-name unload-feature "Unloading %s...done"] 6 (#$ . 2204)])
Kontol Shell Bypass