hiro/emacs-jupyter
1
0
Fork 0
mirror of https://github.com/vale981/emacs-jupyter synced 2025-03-05 07:41:37 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

Update note on injecting render parameters for displaying org-mode results

Browse source
This commit is contained in:
Nathaniel Nicandro 2018-10-02 12:47:08 -05:00
parent 34e52de1d4
commit 394a82a5c2
1 changed files with 9 additions and 2 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
jupyter-org-client.el
View file

@ -337,6 +337,12 @@ an \"EXPORT markdown\" block. See `org-babel-insert-result'."
(setcar render-result "scalar"))
(unless (cdr render-result)
(setcdr render-result "")))))
;; NOTE: The parameters are destructively added to the result parameters passed
;; to `org-babel-insert-result' in order to avoid advising
;; `org-babel-execute-src-block', but this might be the way to go to avoid
;; depending on the the priority of result parameters in
;; `org-babel-insert-result'.
(defun jupyter-org--inject-render-param (render-param params)
"Destructively modify result parameters for `org-babel-insert-result'.
RENDER-PARAM is the first element of the list returned by
@ -481,8 +487,9 @@ it does not need to be added by the user."
(unless (car-safe (car results))
(setq results (list results)))
(cl-loop
;; FIXME: This is a hack that relies on `org-babel-insert-result' only
;; caring about the parameters of the info and not anything else.
;; NOTE: This relies on `org-babel-insert-result' only
;; caring about the parameters of the info and not
;; anything else.
with info = (list nil nil params)
with result-params = (alist-get :result-params params)
for (render-param . result) in (mapcar #'jupyter-org-transform-result results)