Gecko [ fernandoquevedodop.com ]

Name	Size	Permission
em-alias.elc	6.13 KB	-rw-r--r--
em-banner.elc	1.65 KB	-rw-r--r--
em-basic.elc	3.86 KB	-rw-r--r--
em-cmpl.elc	11.92 KB	-rw-r--r--
em-dirs.elc	15.94 KB	-rw-r--r--
em-glob.elc	8.56 KB	-rw-r--r--
em-hist.elc	29.22 KB	-rw-r--r--
em-ls.elc	26.61 KB	-rw-r--r--
em-pred.elc	15.45 KB	-rw-r--r--
em-prompt.elc	5.75 KB	-rw-r--r--
em-rebind.elc	7.38 KB	-rw-r--r--
em-script.elc	3.82 KB	-rw-r--r--
em-smart.elc	8.68 KB	-rw-r--r--
em-term.elc	5.79 KB	-rw-r--r--
em-tramp.elc	3.47 KB	-rw-r--r--
em-unix.elc	34.51 KB	-rw-r--r--
em-xtra.elc	4.64 KB	-rw-r--r--
esh-arg.elc	11.07 KB	-rw-r--r--
esh-cmd.elc	36.27 KB	-rw-r--r--
esh-ext.elc	10.28 KB	-rw-r--r--
esh-groups.el	7.87 KB	-rw-r--r--
esh-io.elc	12.91 KB	-rw-r--r--
esh-mode.elc	30.69 KB	-rw-r--r--
esh-module.elc	2.49 KB	-rw-r--r--
esh-opt.elc	7.21 KB	-rw-r--r--
esh-proc.elc	16.79 KB	-rw-r--r--
esh-util.elc	19.95 KB	-rw-r--r--
esh-var.elc	15.05 KB	-rw-r--r--
eshell.elc	7.41 KB	-rw-r--r--

Code Editor : em-cmpl.elc

;ELC���
;;; Compiled
;;; in Emacs version 27.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\300\303!\210\304\305\306\307\310\311\312\313&\210\314\315\316\317\320DD\321\322\323\324\325\312\305&	\210\314\326\316\317\327DD\330\324\331\312\305&\210\314\332\316\317\333DD\334\324\331\312\305&\210\314\335\316\317\336DD\337\324\331\312\305&\210\314\340\316\317\341DD\342\324\343\312\305&\207" [require pcomplete esh-mode esh-util custom-declare-group eshell-cmpl nil "This module provides a programmable completion function bound to\nthe TAB key, which allows for completing command names, file names,\nvariable names, arguments, etc." :tag "Argument completion" :group eshell-module custom-declare-variable eshell-cmpl-load-hook funcall function #[0 "\300\207" [nil] 1] "A list of functions to run when `eshell-cmpl' is loaded." :version "24.1" :type hook eshell-show-lisp-completions #[0 "\300\207" [nil] 1] "If non-nil, include Lisp functions in the command completion list.\nIf this variable is nil, Lisp completion can still be done in command\nposition by using M-TAB instead of TAB." boolean eshell-show-lisp-alternatives #[0 "\300\207" [t] 1] "If non-nil, and no other completions found, show Lisp functions.\nSetting this variable means nothing if `eshell-show-lisp-completions'\nis non-nil." eshell-no-completion-during-jobs #[0 "\300\207" [t] 1] "If non-nil, don't allow completion while a process is running." eshell-command-completions-alist #[0 "\300\207" [(("acroread" . "\\.pdf\\'") ("xpdf" . "\\.pdf\\'") ("ar" . "\\.[ao]\\'") ("gcc" . "\\.[Cc]\$[Cc]\\|[Pp][Pp]\$?\\'") ("g++" . "\\.[Cc]\$[Cc]\\|[Pp][Pp]\$?\\'") ("cc" . "\\.[Cc]\$[Cc]\\|[Pp][Pp]\$?\\'") ("CC" . "\\.[Cc]\$[Cc]\\|[Pp][Pp]\$?\\'") ("acc" . "\\.[Cc]\$[Cc]\\|[Pp][Pp]\$?\\'") ("bcc" . "\\.[Cc]\$[Cc]\\|[Pp][Pp]\$?\\'") ("readelf" . "\$\\`[^.]*\\|\\.\\([ao]\\|so\$\\)\\'") ("objdump" . "\$\\`[^.]*\\|\\.\\([ao]\\|so\$\\)\\'") ("nm" . "\$\\`[^.]*\\|\\.\\([ao]\\|so\$\\)\\'") ("gdb" . "\\`\$[^.]*\\|a\\.out\$\\'") ("dbx" . "\\`\$[^.]*\\|a\\.out\$\\'") ("sdb" . "\\`\$[^.]*\\|a\\.out\$\\'") ("adb" . "\\`\$[^.]*\\|a\\.out\$\\'"))] 1] "An alist that defines simple argument type correlations.\nThis is provided for common commands, as a simplistic alternative\nto writing a completion function." (repeat (cons string regexp))] 10)
#@95 Generate the docstring of a variable derived from a pcomplete-* variable.

(fn PCOMPLETE-VAR)
(defalias 'eshell-cmpl--custom-variable-docstring #[257 "\300\301\302\303\304#\305!#\207" [format "%s\n\nIts value is assigned to `%s' locally after eshell starts." documentation-property variable-documentation t symbol-name] 7 (#$ . 2687)])
(byte-code "\300\301\302\303\304DD\305\306!\307\306\310N\311\312&\210\300\313\302\303\314DD\305\315!\307\315\310N\311\312&\210\300\316\302\303\317DD\305\320!\307\320\310N\311\312&\210\300\321\302\303\322DD\305\323!\307\323\310N\311\312&\210\300\324\302\303\325DD\305\326!\307\326\310N\311\327&\210\330\324\331\332#\210\300\333\302\303\334DD\305\335!\307\335\310N\311\312&\210\300\336\302\303\337DD\305\340!\307\340\310N\311\312&\210\300\341\302\303\342DD\305\343!\307\343\310N\311\312&\210\300\344\302\303\345DD\305\346!\307\346\310N\311\312&\210\300\347\302\303\350DD\305\351!\307\351\310N\311\312&\210\300\352\302\303\353DD\305\354!\307\354\310N\311\312&\210\300\355\302\303\356DD\305\357!\307\357\310N\311\312&\210\300\360\302\303\361DD\305\362!\307\362\310N\311\312&\210\300\363\302\303\364DD\305\365!\307\365\310N\311\312&\210\300\366\302\303\367DD\305\370!\307\370\310N\311\312&\210\300\371\302\303\372DD\305\373!\307\373\310N\311\312&\207" [custom-declare-variable eshell-cmpl-file-ignore funcall function #[0 "\300\207" [#1="~\\'"] 1 #1#] eshell-cmpl--custom-variable-docstring pcomplete-file-ignore :type custom-type :group eshell-cmpl eshell-cmpl-dir-ignore #[0 "\300\207" [#2="\\`\$\\.\\.?\\|CVS\$/\\'"] 1 #2#] pcomplete-dir-ignore eshell-cmpl-ignore-case #[0 "\301>\207" [system-type (ms-dos windows-nt)] 2] pcomplete-ignore-case eshell-cmpl-autolist #[0 "\300\207" [nil] 1] pcomplete-autolist eshell-cmpl-suffix-list #[0 "\300\301D\207" [47 58] 2] pcomplete-suffix-list pcomplete make-obsolete-variable nil "24.1" eshell-cmpl-recexact #[0 "\300\207" [nil] 1] pcomplete-recexact eshell-cmpl-man-function #[0 "\300\207" [man] 1] pcomplete-man-function eshell-cmpl-compare-entry-function #[0 "\300\207" [file-newer-than-file-p] 1] pcomplete-compare-entry-function eshell-cmpl-expand-before-complete #[0 "\300\207" [nil] 1] pcomplete-expand-before-complete eshell-cmpl-cycle-completions #[0 "\300\207" [t] 1] pcomplete-cycle-completions eshell-cmpl-cycle-cutoff-length #[0 "\300\207" [5] 1] pcomplete-cycle-cutoff-length eshell-cmpl-restore-window-delay #[0 "\300\207" [1] 1] pcomplete-restore-window-delay eshell-command-completion-function #[0 "\300\207" [#[0 "\300\301\302\211\211$\207" [pcomplete--here #[0 "\300 \207" [eshell-complete-commands-list] 1] nil] 5]] 1] pcomplete-command-completion-function eshell-cmpl-command-name-function #[0 "\300\207" [eshell-completion-command-name] 1] pcomplete-command-name-function eshell-default-completion-function #[0 "\300\207" [#[0 "\300\301\302\211\211$\205\f�\202��\207" [pcomplete--here #[0 "\302 	\"A\303\304\303\305\306\307\310\311\"\312\"\313\314%\"\207" [eshell-cmpl-command-name-function eshell-command-completions-alist assoc nil pcomplete-entries make-byte-code 257 "\302!\206�\300\203�\303\300\"\205�\301?\206�\301!\207" vconcat vector [file-directory-p string-match] 4 "\n\n(fn F)"] 11] nil] 5]] 1] pcomplete-default-completion-function eshell-cmpl-use-paring #[0 "\300\207" [t] 1] pcomplete-use-paring] 8)
#@57 Try to complete the text around point as a Lisp symbol.
(defalias 'eshell-complete-lisp-symbol #[0 "\301\302 )\207" [completion-at-point-functions (elisp-completion-at-point) completion-at-point] 1 (#$ . 6038) nil])
#@36 Initialize the completions module.
(defalias 'eshell-cmpl-initialize #[0 "\306\301!\210\306\303!\210\n\306\305!\210\f\306\307!\210\310\306\311!\2101	\306\312!\2102\n\306\313!\2103\306\314!\2104\f\315\316!\203G�\306\316!\2105\306\317!\2106\306\320!\2107\306\321!\2108\306\322!\2109\306\323!\210:\306\324!\210;\306\325!\210<\306\326!\210=\327\330\331\332\333$\210\327\334\335\332\333$\210\336>\337\340#\210\336?\341\342#\210\336?\343\344#\210\336?\345\344#\210\336?\346\347#\210\336?\350\347#\210\336>\351\352#\210\327\353\354\332\333$\210\336>\355\356#\210\336>\357\360#\207" [eshell-command-completion-function pcomplete-command-completion-function eshell-cmpl-command-name-function pcomplete-command-name-function eshell-default-completion-function pcomplete-default-completion-function make-local-variable pcomplete-parse-arguments-function eshell-complete-parse-arguments pcomplete-file-ignore pcomplete-dir-ignore pcomplete-ignore-case pcomplete-autolist boundp pcomplete-suffix-list pcomplete-recexact pcomplete-man-function pcomplete-compare-entry-function pcomplete-expand-before-complete pcomplete-cycle-completions pcomplete-cycle-cutoff-length pcomplete-restore-window-delay pcomplete-use-paring add-hook eshell-mode-hook #[0 "\302\301!\210\211\207" [eshell-special-chars-outside-quoting comint-file-name-quote-list make-local-variable] 2] nil t pcomplete-quote-arg-hook eshell-quote-backslash define-key [(meta control 105)] eshell-complete-lisp-symbol [(meta 104)] eshell-completion-help [tab] pcomplete-expand-and-complete [(control 105)] [space] pcomplete-expand [32] [(control 105)] completion-at-point completion-at-point-functions pcomplete-completions-at-point [backtab] pcomplete-reverse [(meta 63)] completion-help-at-point eshell-cmpl-file-ignore eshell-cmpl-dir-ignore eshell-cmpl-ignore-case eshell-cmpl-autolist eshell-cmpl-suffix-list eshell-cmpl-recexact eshell-cmpl-man-function eshell-cmpl-compare-entry-function eshell-cmpl-expand-before-complete eshell-cmpl-cycle-completions eshell-cmpl-cycle-cutoff-length eshell-cmpl-restore-window-delay eshell-cmpl-use-paring eshell-mode-map eshell-command-map] 5 (#$ . 6261)])
#@50 Return the command name, possibly sans globbing.
(defalias 'eshell-completion-command-name #[0 "\302\303\304!!\211G\305V\203�\211\305H=\203�\306\307\"\202�\211\262	\310>\203*�\311!\202+�\211\207" [eshell-explicit-command-char system-type file-name-nondirectory pcomplete-arg first 0 substring 1 (ms-dos windows-nt) file-name-sans-extension] 4 (#$ . 8466)])
(defalias 'eshell-completion-help #[0 "`U\203	�\301 \207\302\303!\207" [eshell-last-output-end describe-prefix-bindings call-interactively pcomplete-help] 2 nil nil])
#@60 Parse the command line arguments for `pcomplete-argument'.
(defalias 'eshell-complete-parse-arguments #[0 "\203�	\203�\303\304!\210\305\306\307\"\210\310 \212\311 \210`)\307C\312\211\n\313>\2037�\314\315#\210U\2033�\312\210\310 \262\3162D�\312\317\"\2620\211\262\203|�\211@\320>\203a�\211A@T\262\317\"\262\202|�\211@\321=\203s�\322 \210\305\306\307\"\210\202|�\303\304!\210\305\306\307\"\210\323S\324\"\203\215�\303\304!\210\305\306\307\"\210\211W\203\250�\323\325\"\203\241�C\244\210\211T\262\202\216�\210A\262GGU\204\271�\326\327!\210\330\312\203\334�@:\203\321�@@\331=\203\321�\262A\262T\262\202\274�\211\203\355�\211T\233\262\211T\233\262\266GGU\204\373�\326\332!\210\203#\206`Sfz\333=\203#S\206`Sf\334=\204#\335C\244\210`C\244\210\336\337\"B\207" [eshell-no-completion-during-jobs eshell-last-async-proc this-command insert-and-inherit "	" throw pcompleted t point-marker eshell-bol nil (pcomplete-expand pcomplete-expand-and-complete) run-hook-with-args eshell-expand-input-functions eshell-incomplete eshell-parse-arguments (123 60) 40 eshell-complete-lisp-symbol get-text-property comment arg-begin cl--assertion-failed (= (length args) (length posns)) 0 eshell-operator (= (length args) (length posns)) 32 92 #1="" mapcar #[257 "\211<\203�\300\301D\302\"\211@\303=\204�\304\305!\210\211A@\262\202�\211\211\247\203)�\306!\262\211\206.�\307\207" [eshell-do-eval eshell-commands t quote cl--assertion-failed (eq (car result) 'quote) number-to-string #1#] 4 "\n\n(fn ARG)"]] 10 (#$ . 9004)])
#@48 Generate list of applicable, visible commands.
(defalias 'eshell-complete-commands-list #[0 "\306 \307\310!\2030�\203&�\307\311\312\307\313\314\315\316\317\"\320\"\321\322%\"\266\202\202\374�\307\312\323\"\262\202\374�G\324V\203J�\324H	=\203J�\325\326\"\262\327\262\330 \331\332!!\333\307\333\211\307\203\272�\331\332@\206d�\334!!\262\335!\205t�\336	\"\262\203\262�@\262P\262\235\204\253�\230\204\226�\337!\204\253�\203\240�\311!\202\243�\323!\203\253�B\262A\262\202v�A\262\202V�\340\203\304�\202\371�\341\342\343!\205\317�\343!\344\345\346\347\350P\f\351#\"\307\352##\262\341
\204\361�+\205\367�?\205\367�\347\f\351#\"!\266\207\207" [eshell-force-execution eshell-explicit-command-char pcomplete-stub default-directory obarray eshell-show-lisp-completions pcomplete-arg nil file-name-directory file-readable-p pcomplete-entries make-byte-code 257 "\302!\206�\300\203�\303\300\"\205�\301?\206�\301!\207" vconcat vector [file-directory-p string-match] 4 "\n\n(fn F)" file-executable-p 0 substring 1 t eshell-get-path file-name-as-directory expand-file-name "" "." file-accessible-directory-p file-name-all-completions file-directory-p pcomplete-uniquify-list append fboundp eshell-alias-completions eshell-winnow-list mapcar #[257 "\300\301\"\207" [substring 7] 4 "\n\n(fn NAME)"] all-completions "eshell/" functionp (eshell-find-alias-function) eshell-show-lisp-alternatives] 19 (#$ . 10578)])
(byte-code "\300\301\302\303#\210\304\301\302\305#\210\306\307!\207" [defalias eshell-pcomplete completion-at-point nil make-obsolete "27.1" provide em-cmpl] 4)

${this.title}

Code Editor : em-cmpl.elc