---- On Wed, 22 Feb 2023 05:29:59 -0500 Ihor Radchenko wrote --- > > +(defun ob-shell-async-chunk-callback (string) > > + "Filter applied to results before insertion. > > +See `org-babel-comint-async-chunk-callback'." > > + (replace-regexp-in-string (concat org-babel-sh-prompt "*") "" string)) > > Why not using `comint-prompt-regexp'? > > > +(ert-deftest test-ob-shell/session-async-valid-header-arg-values () > > + "Test that session runs asynchronously for certain :async values." > > + (let ((session-name > > "test-ob-shell/session-async-valid-header-arg-values") > > + (kill-buffer-query-functions nil)) > > + (cl-loop > > A simple `dolist' would do here. There is no reason to use `cl-loop'.
Great points! Changed.
0002-ob-shell-Add-async-evaluation.patch
Description: Binary data
