lisp/ob-haskell.el: Fix org-babel-script-escape expects a string

* lisp/ob-haskell.el (org-babel-interpret-haskell): Don't call
`org-babel-script-escape' when the result is nil.
This commit is contained in:
Bruno BARBIER 2022-11-08 19:19:32 +01:00 committed by Ihor Radchenko
parent 5a6d00a3a3
commit 7f72807aea
No known key found for this signature in database
GPG key ID: 6470762A7DA11D8B

View file

@ -150,7 +150,7 @@ a parameter, such as \"ghc -v\"."
(`output (mapconcat #'identity (reverse results) "\n"))
(`value (car results)))))
(org-babel-result-cond (cdr (assq :result-params params))
result (org-babel-script-escape result)))
result (when result (org-babel-script-escape result))))
(org-babel-pick-name (cdr (assq :colname-names params))
(cdr (assq :colname-names params)))
(org-babel-pick-name (cdr (assq :rowname-names params))