| Server IP : 217.160.0.212 / Your IP : 216.73.216.141 Web Server : Apache System : Linux www 6.18.51-i1-ampere #1196 SMP Fri Sep 11 20:43:55 CEST 2026 aarch64 User : sws1073854427 ( 1073854427) PHP Version : 8.4.23 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : OFF | Sudo : OFF | Pkexec : OFF Directory : /usr/share/emacs/28.2/lisp/eshell/ |
Upload File : |
;ELC ;;; Compiled ;;; in Emacs version 28.2 ;;; with all optimizations. (byte-code "\300\301!\210\300\302!\210\303\304\305\306\307\310\311\312&\210\313\314\315\"\207" [require cl-lib esh-util custom-declare-group eshell-xtra nil "This module defines some extra alias functions which are entirely\noptional. They can be viewed as samples for how to write Eshell alias\nfunctions, or as aliases which make some of Emacs's behavior more\nnaturally accessible within Emacs." :tag "Extra alias functions" :group eshell-module autoload eshell-parse-command "esh-cmd"] 8) #@66 Implementation of expr, using the calc package. (fn &rest ARGS) (defalias 'eshell/expr #[128 "\300C\301\302\303!\304#\262!\207" [calc-eval mapconcat eshell-stringify flatten-tree " "] 7 (#$ . 579)]) #@85 Easy front-end to `cl-substitute', for comparing lists of strings. (fn &rest ARGS) (defalias 'eshell/substitute #[128 "\300\301@A@\302\303AA&\207" [apply cl-substitute :test equal] 8 (#$ . 788)]) #@80 Easy front-end to `cl-count', for comparing lists of strings. (fn &rest ARGS) (defalias 'eshell/count #[128 "\300\301@A@\302\303AA&\207" [apply cl-count :test equal] 8 (#$ . 996)]) #@83 Easy front-end to `cl-mismatch', for comparing lists of strings. (fn &rest ARGS) (defalias 'eshell/mismatch #[128 "\300\301@A@\302\303AA&\207" [apply cl-mismatch :test equal] 8 (#$ . 1189)]) #@80 Easy front-end to `cl-union', for comparing lists of strings. (fn &rest ARGS) (defalias 'eshell/union #[128 "\300\301@A@\302\303AA&\207" [apply cl-union :test equal] 8 (#$ . 1392)]) #@87 Easy front-end to `cl-intersection', for comparing lists of strings. (fn &rest ARGS) (defalias 'eshell/intersection #[128 "\300\301@A@\302\303AA&\207" [apply cl-intersection :test equal] 8 (#$ . 1586)]) #@89 Easy front-end to `cl-set-difference', for comparing lists of strings. (fn &rest ARGS) (defalias 'eshell/set-difference #[128 "\300\301@A@\302\303AA&\207" [apply cl-set-difference :test equal] 8 (#$ . 1801)]) #@91 Easy front-end to `cl-set-exclusive-or', for comparing lists of strings. (fn &rest ARGS) (defalias 'eshell/set-exclusive-or #[128 "\300\301@A@\302\303AA&\207" [apply cl-set-exclusive-or :test equal] 8 (#$ . 2022)]) (byte-code "\300\301\302\"\210\300\303\304\"\210\305\306!\207" [defalias eshell/ff find-name-dired eshell/gf find-grep-dired provide em-xtra] 3)