|
| From: | Gennady Uraltsev |
| Subject: | Bug: ob-eshell session breaks with long running commands [9.3.1 (release_9.3.1-73-g93c11d @ /home/guraltsev/.emacs.d/straight/build/org/)] |
| Date: | Wed, 08 Jan 2020 12:53:57 +0000 |
Hello everyone,
Org babel eshell does not work well with the :session argument. In
particular if the the command does not exit immediately then the results
can be arbitrary and can vary from one call to the other. Also, the
results often include the actual calling line.
Notice that executing things with sh src code does not have this session
management problem. So it seems to really be bug.
This code illustrates the problem.
#+BEGIN_SRC eshell :results output drawer
echo test
#+END_SRC
#+RESULTS:
:results:
test
:end:
#+BEGIN_SRC eshell :results output drawer :session test1
echo test
#+END_SRC
#+RESULTS:
:results:
test
:end:
#+BEGIN_SRC eshell :results output drawer
sleep 1 ; echo test
#+END_SRC
#+RESULTS:
:results:
test
:end:
#+BEGIN_SRC eshell :results output drawer :session test2
sleep 1 ; echo test
#+END_SRC
#+RESULTS:
:results:
~/Mail $ sleep 1 ; echo test
:end:
Best,
Gennady
Emacs : GNU Emacs 26.3 (build 1, x86_64-pc-linux-gnu, GTK+ Version 3.24.10)
of 2019-08-29
Package: Org mode version 9.3.1 (release_9.3.1-73-g93c11d @
/home/guraltsev/.emacs.d/straight/build/org/)
current state:
==============
(setq
org-src-mode-hook '(org-src-babel-configure-edit-buffer
org-src-mode-configure-edit-buffer)
org-link-shell-confirm-function 'yes-or-no-p
org-metadown-hook '(org-babel-pop-to-session-maybe)
org-clock-out-hook '(org-clock-remove-empty-clock-drawer)
org-html-format-inlinetask-function
'org-html-format-inlinetask-default-function
org-edit-src-content-indentation 0
org-src-tab-acts-natively t
org-odt-format-headline-function 'org-odt-format-headline-default-function
org-special-ctrl-a/e t
org-ascii-format-inlinetask-function 'org-ascii-format-inlinetask-default
org-reveal-start-hook '(org-decrypt-entry)
org-modules '(ol-bbdb ol-bibtex ol-docview ol-eww ol-gnus org-id ol-info
ol-irc ol-mhe org-mouse org-protocol ol-rmail ol-w3m
ol-eshell ol-git-link ol-man org-toc)
org-id-link-to-org-use-id 'create-if-interactive-and-no-custom-id
org-mode-hook '(#[0
"\205. \301 \205. \302\303\301
!\304P!\305.!\205. \306.!\262.\207"
[org-ctags-enabled-p buffer-file-name expand-file-name
file-name-directory "/TAGS" file-exists-p
visit-tags-table]
3]
#[0 "\301\211.\207"
[imenu-create-index-function org-imenu-get-tree] 2]
#[0
"\305.\306 >\203. \307\n\310\311#\210\307
\312\313#\210\307 \314\315#\210\306
>\203,.\307\n\316\317#\210\307\n\320\321#\210\322 >\203>.\307
\323\324#\210\307 \325\324#\210\326
>\203P.\307\n\327\317#\210\307\n\330\321#\210\331
>\203_.\332\311\f\333BC\334#\210\335 >\203k.\332\311\336\334#\210\337
>\203w.\332\311\340\334#\210\341\342\343\344\311$\210\345\342\311\"\210\342\207"
[org-mouse-context-menu-function
org-mouse-features
org-mouse-map
org-mode-map
org-outline-regexp
org-mouse-context-menu
context-menu
org-defkey
[mouse-3]
nil
[mouse-3]
org-mouse-show-context-menu
[down-mouse-1]
org-mouse-down-mouse
[C-drag-mouse-1]
org-mouse-move-tree
[C-down-mouse-1]
org-mouse-move-tree-start
yank-link
[S-mouse-2]
org-mouse-yank-link
[drag-mouse-3]
move-tree
[drag-mouse-3]
[down-mouse-3]
activate-stars
font-lock-add-keywords
(0
(\`
(face
org-link
mouse-face
highlight
keymap
(\, org-mouse-map)
)
)
(quote prepend)
)
t
activate-bullets
(("^[ ]*\\([-+*]\\|[0-9]+[.)]\\) +"
(1
(\`
(face
org-link
keymap
(\, org-mouse-map)
mouse-face highlight)
)
(quote prepend)
)
)
)
activate-checkboxes
(("^[ ]*\\([-+*]\\|[0-9]+[.)]\\) +\\(\\[[ X]\\]\\)"
(2
(\`
(face
bold
keymap
(\, org-mouse-map)
mouse-face highlight)
)
t)
)
)
ad-add-advice
org-open-at-point
(org-mouse-open-at-point
nil
t
(advice
lambda
nil
(let
((context
(org-context)
)
)
(cond
((assq :headline-stars context)
(org-cycle)
)
((assq :checkbox context)
(org-toggle-checkbox)
)
((assq :item-bullet context)
(let
((org-cycle-include-plain-lists t)
)
(org-cycle)
)
)
((org-footnote-at-reference-p)
nil)
(t ad-do-it)
)
)
)
)
around ad-activate]
5]
#[0 "\300\301\302\303\304$\207"
[add-hook change-major-mode-hook org-show-all append
local]
5]
#[0 "\300\301\302\303\304$\207"
[add-hook change-major-mode-hook
org-babel-show-result-all append local]
5]
org-babel-result-hide-spec org-babel-hide-all-hashes
org-bullets-mode)
org-odt-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]
org-archive-hook '(org-attach-archive-delete-maybe)
org-confirm-elisp-link-function 'yes-or-no-p
org-agenda-before-write-hook '(org-agenda-add-entry-text)
org-metaup-hook '(org-babel-load-in-session-maybe)
org-bibtex-headline-format-function #[257 "\300.\236A\207" [:title] 3 "\n\n(fn
ENTRY)"]
org-adapt-indentation nil
org-latex-format-drawer-function #[514 "\207" [] 3 "\n\n(fn _ CONTENTS)"]
org-babel-pre-tangle-hook '(save-buffer)
org-tab-first-hook '(org-babel-hide-result-toggle-maybe
org-babel-header-arg-expand)
org-babel-load-languages '((emacs-lisp . t) (shell . t) (python . t))
org-highlight-latex-and-related '(latex script entities)
org-ascii-format-drawer-function #[771 ".\207" [] 4 "\n\n(fn NAME CONTENTS
WIDTH)"]
org-catch-invisible-edits 'show-and-error
org-occur-hook '(org-first-headline-recenter)
org-agenda-mode-hook '(#[0
"\302.\303 \304\305#\210\303
\306\307#\210\303 \310\311#\210\303 \312\313#\210\303
\314\315#\207"
[org-mouse-context-menu-function
org-agenda-mode-map
org-mouse-agenda-context-menu
org-defkey
[mouse-3]
org-mouse-show-context-menu
[down-mouse-3]
org-mouse-move-tree-start
[C-mouse-4]
org-agenda-earlier
[C-mouse-5]
org-agenda-later
[drag-mouse-3]
#[257
"\300.!\301.\302\"\203. \303\304!\202. \301.\305\"\205. \306\304!\207"
[org-mouse-get-gesture eql :left
org-agenda-earlier 1 :right org-agenda-later]
5 "\n\n(fn EVENT)" "e"]
]
4]
)
org-edit-src-auto-save-idle-delay 1
org-cycle-hook '(org-cycle-hide-archived-subtrees
org-cycle-show-empty-lines
org-optimize-window-after-visibility-change)
org-speed-command-hook '(org-speed-command-activate
org-babel-speed-command-activate)
org-odt-format-inlinetask-function 'org-odt-format-inlinetask-default-function
org-babel-tangle-lang-exts '(("vala" . "vala") ("ruby" . "rb")
("picolisp" . "l") ("ocaml" . "ml")
("maxima" . "max") ("lua" . "lua")
("lisp" . "lisp") ("LilyPond" . "ly")
("latex" . "tex") ("java" . "java")
("groovy" . "groovy") ("clojure" . "clj")
("D" . "d") ("C++" . "cpp") ("python" . "py")
("emacs-lisp" . "el") ("elisp" . "el"))
org-src-ask-before-returning-to-edit-buffer nil
org-id-locations-file "~/.emacs.d/cache/org-id-locations"
org-confirm-shell-link-function 'yes-or-no-p
org-link-parameters '(("attachment" :follow org-attach-open-link :export
org-attach-export-link :complete
org-attach-complete-link)
("eshell" :follow org-eshell-open :store
org-eshell-store-link)
("w3m" :store org-w3m-store-link)
("rmail" :follow org-rmail-open :store
org-rmail-store-link)
("mhe" :follow org-mhe-open :store
org-mhe-store-link)
("irc" :follow org-irc-visit :store
org-irc-store-link :export org-irc-export)
("info" :follow org-info-open :export
org-info-export :store org-info-store-link)
("gnus" :follow org-gnus-open :store
org-gnus-store-link)
("eww" :follow eww :store org-eww-store-link)
("docview" :follow org-docview-open :export
org-docview-export :store org-docview-store-link)
("bibtex" :follow org-bibtex-open :store
org-bibtex-store-link)
("bbdb" :follow org-bbdb-open :export
org-bbdb-export :complete org-bbdb-complete-link
:store org-bbdb-store-link)
("id" :follow org-id-open) ("file+sys")
("file+emacs")
("shell" :follow org-link--open-shell)
("news" :follow
#[257 "\301\300\302.Q!\207"
["news" browse-url ":"] 5 "\n\n(fn URL)"]
)
("mailto" :follow
#[257 "\301\300\302.Q!\207"
["mailto" browse-url ":"] 5 "\n\n(fn URL)"]
)
("https" :follow
#[257 "\301\300\302.Q!\207"
["https" browse-url ":"] 5 "\n\n(fn URL)"]
)
("http" :follow
#[257 "\301\300\302.Q!\207"
["http" browse-url ":"] 5 "\n\n(fn URL)"]
)
("ftp" :follow
#[257 "\301\300\302.Q!\207" ["ftp" browse-url ":"]
5 "\n\n(fn URL)"]
)
("help" :follow org-link--open-help)
("file" :complete org-link-complete-file)
("elisp" :follow org-link--open-elisp)
("doi" :follow org-link--open-doi))
org-latex-format-headline-function 'org-latex-format-headline-default-function
org-link-elisp-confirm-function 'yes-or-no-p
org-latex-format-inlinetask-function
'org-latex-format-inlinetask-default-function
org-html-format-drawer-function #[514 "\207" [] 3 "\n\n(fn NAME CONTENTS)"]
org-image-actual-width '(0)
org-latex-classes '(("beamer" "\\documentclass[presentation]{beamer}"
("\\section{%s}" . "\\section*{%s}")
("\\subsection{%s}" . "\\subsection*{%s}")
("\\subsubsection{%s}" . "\\subsubsection*{%s}"))
("article" "\\documentclass[11pt]{article}"
("\\section{%s}" . "\\section*{%s}")
("\\subsection{%s}" . "\\subsection*{%s}")
("\\subsubsection{%s}" . "\\subsubsection*{%s}")
("\\paragraph{%s}" . "\\paragraph*{%s}")
("\\subparagraph{%s}" . "\\subparagraph*{%s}"))
("report" "\\documentclass[11pt]{report}"
("\\part{%s}" . "\\part*{%s}")
("\\chapter{%s}" . "\\chapter*{%s}")
("\\section{%s}" . "\\section*{%s}")
("\\subsection{%s}" . "\\subsection*{%s}")
("\\subsubsection{%s}" . "\\subsubsection*{%s}"))
("book" "\\documentclass[11pt]{book}"
("\\part{%s}" . "\\part*{%s}")
("\\chapter{%s}" . "\\chapter*{%s}")
("\\section{%s}" . "\\section*{%s}")
("\\subsection{%s}" . "\\subsection*{%s}")
("\\subsubsection{%s}" . "\\subsubsection*{%s}"))
)
org-html-format-headline-function 'org-html-format-headline-default-function
org-confirm-babel-evaluate nil
org-ctrl-k-protect-subtree 'error
)
| [Prev in Thread] | Current Thread | [Next in Thread] |