forked from mirrors/org-mode
ob-R.el/ob-python: Update `md5' calls to `org-id-uuid'
* ob-R.el (ob-session-async-org-babel-R-evaluate-session): Use `org-id-uuid' instead of `md5' as results placeholder. * ob-python.el (org-babel-python-async-evaluate-session): Use `org-id-uuid' instead of `md5' as results placeholder.
This commit is contained in:
parent
5a52ee57d4
commit
cb95d88936
|
@ -519,7 +519,7 @@ by `org-babel-comint-async-filter'."
|
|||
(ess-eval-buffer nil)))
|
||||
tmp-file))
|
||||
(output
|
||||
(let ((uuid (md5 (number-to-string (random 100000000))))
|
||||
(let ((uuid (org-id-uuid))
|
||||
(ess-local-process-name
|
||||
(process-name (get-buffer-process session)))
|
||||
(ess-eval-visibly-p nil))
|
||||
|
|
|
@ -398,7 +398,7 @@ by `org-babel-comint-async-filter'."
|
|||
(let ((python-shell-buffer-name (org-babel-python-without-earmuffs session)))
|
||||
(pcase result-type
|
||||
(`output
|
||||
(let ((uuid (md5 (number-to-string (random 100000000)))))
|
||||
(let ((uuid (org-id-uuid)))
|
||||
(with-temp-buffer
|
||||
(insert (format org-babel-python-async-indicator "start" uuid))
|
||||
(insert "\n")
|
||||
|
|
Loading…
Reference in New Issue