;ELC
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.



(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\312\305&\207" [require esh-util eshell esh-opt custom-declare-group eshell-basic nil "The \"basic\" code provides a set of convenience functions which\nare traditionally considered shell builtins.  Since all of the\nfunctionality provided by them is accessible through Lisp, they are\nnot really builtins at all, but offer a command-oriented way to do the\nsame thing." :tag "Basic shell commands" :group eshell-module custom-declare-variable eshell-plain-echo-behavior funcall function #[0 "\300\207" [nil] 1 ""] "If non-nil, `echo' tries to behave like an ordinary shell echo.\nThis comes at some detriment to Lisp functionality.  However, the Lisp\nequivalent of `echo' can always be achieved by using `identity'." :type boolean] 8)
#@188 Implementation code for a Lisp version of `echo'.
It returns a formatted value that should be passed to `eshell-print'
or `eshell-printn' for display.

(fn ARGS &optional OUTPUT-NEWLINE)
(defalias 'eshell-echo #[513 "\203\301\302\"\303P\207
G\304U\203\305\202&
G\306U\203\"
@\202&\307\310\"
\203D\211;\2033\211\303P\207\211<\203>\311
\303C\"\207\312
!\303P\207\207" [eshell-plain-echo-behavior apply eshell-flatten-and-stringify "\n" 0 "" 1 mapcar #[257 "\211;\203
\300\301G\302$\210\207" [set-text-properties 0 nil] 6 "\n\n(fn ARG)"] append eshell-stringify] 6 (#$ . 946)])
#@79 Implementation of `echo'.  See `eshell-plain-echo-behavior'.

(fn &rest ARGS)
(defalias 'eshell/echo #[128 "\300\301\302#\211
A\262\242\303\"\207" [eshell--do-opts "echo" ((110 nil nil output-newline "terminate with a newline") (104 "help" nil nil "output this help screen") :preserve-args :usage "[-n] [object]") eshell-echo] 6 (#$ . 1543)])
#@74 Print out each of the arguments, separated by newlines.

(fn &rest ARGS)
(defalias 'eshell/printnl #[128 "\301
!\211\205!\302
@C!\211\303
\"\266\304\303
\"\266\211A\262
\202\207" [eshell-output-handle flatten-tree eshell-echo eshell-output-object "\n"] 7 (#$ . 1896)])
#@59 Return the argument(s) as a single list.

(fn &rest ARGS)
(defalias 'eshell/listify #[128 "\211G\300V\203\207\211@<\203\211@\207\211@C\207" [1] 3 (#$ . 2178)])
#@56 Shell-like implementation of `umask'.

(fn &rest ARGS)
(defalias 'eshell/umask #[128 "\301
!\302\303\"\262
\304\305\306#\211
A\262\242
\203\211\203\256\307\310\311\312\313\314 !\315\"\"P\211
G\316Z\317O\262

\203\234\314 \310\320\312\321\"\321U\205C\322\312\323\"\323U\205M\324\312\325\"\325U\205W\326Q\312\327\"\327U\205b\322\312\330\"\330U\205l\324\312\331\"\331U\205w\326Q\312\332\"\332U\205\202\322\312\333\"\333U\205\215\324\312\334\"\334U\205\230\326Q$\266\202\211\211\335
\"\266\336\335
\"\266\202\330
\337@!\240\210
@\247\203\315\340\315\341\342\343@!P!@Z!\210\202\321\344\345!\210\346\335
\"\266\317\207" [eshell-output-handle flatten-tree mapcar eshell-stringify eshell--do-opts "umask" ((83 "symbolic" nil symbolic-p "display umask symbolically") (104 "help" nil nil "display this usage message") :usage "[-S] [mode]") "000" format "%o" logand lognot default-file-modes 511 3 nil "u=%s,g=%s,o=%s" 64 "r" 128 "w" 256 "x" 8 16 32 1 2 4 eshell-output-object "\n" eshell-convert set-default-file-modes read-from-string "?\\" number-to-string error "Setting umask symbolically is not yet implemented" "Warning: umask changed for all new files created by Emacs.\n"] 15 (#$ . 2348)])
(provide 'em-basic)