Current File : //usr/local/share/emacs/27.2/lisp/org/ob-sed.elc
;ELC
;;; Compiled
;;; in Emacs version 27.2
;;; 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.
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(require 'ob)
#@37 Name of the sed executable command.
(defvar org-babel-sed-command "sed" (#$ . 422))
(add-to-list 'org-babel-tangle-lang-exts '("sed" . "sed"))
#@32 Sed specific header arguments.
(defconst org-babel-header-args:sed '((:cmd-line . :any) (:in-file . :any)) (#$ . 571))
#@54 Default arguments for evaluating a sed source block.
(defvar org-babel-default-header-args:sed nil (#$ . 696))
#@239 Execute a block of sed code with Org Babel.
BODY is the source inside a sed source block and PARAMS is an
association list over the source block configurations. This
function is called by `org-babel-execute-src-block'.
(fn BODY PARAMS)
(defalias 'org-babel-execute:sed #[514 "\301\302!\210\303\236A\304\236A\305\236A\306\307!\211\310\311!\312\313\314\315\316!\317\"\320$\216r\211q\210c\210)r\211q\210\321\322\211\322\313%\210*\266\211\262\323\236A\211\205v \306\324!\325!\310\311!\312\313\314\315\316!\326\"\320$\216r\211q\210c\210)r\211q\210\321\322\211\322\313%\210*\266\266\202\262\327\330\331\322\332\333\" F\"\334#\335\203\260 \310\336!r\211q\210\312\313\314\315\316!\337\"\320$\216\340p#\210\341 *\262\202\264 \342\343\"\211\2058\344\235?\2056\345\235\204\346\235\204\347\235\204\350\235\204\351\235\204\352\235\204\353\235\204\375 \354\235\204\375 \355\235\204\375 \356\235\203\357\235\204\2026\306\360!\211\310\311!\312\313\314\315\316!\361\"\320$\216r\211q\210c\210)r\211q\210\321\322\211\322\313%\210*\266\362!\262\262\262\363\364\n\236A\365 \236A\"\363\366 \236A\367\f\236A\"#\207" [org-babel-sed-command message "executing sed source code block" :result-params :cmd-line :in-file org-babel-temp-file "sed-" generate-new-buffer " *temp file*" make-byte-code 0 "\301\300!\205 \302\300!\207" vconcat vector [buffer-name kill-buffer] 2 write-region nil :stdin "sed-stdin-" org-babel-ref-resolve [buffer-name kill-buffer] mapconcat identity remq format "-f \"%s\"" " " org-babel-reassemble-table " *temp*" [buffer-name kill-buffer] call-process-shell-command buffer-string org-babel-eval "" "none" "scalar" "verbatim" "html" "code" "pp" "file" "output" "raw" "org" "drawer" "table" "sed-results-" [buffer-name kill-buffer] org-babel-import-elisp-from-file org-babel-pick-name :colname-names :colnames :rowname-names :rownames] 20 (#$ . 814)])
(provide 'ob-sed)
Mini Shell