forked from mirrors/org-mode
better directory handling for lisp code blocks
* lisp/ob-lisp.el (org-babel-execute:lisp): Removed an if in which the else branch was never taken.
This commit is contained in:
parent
5b397e8917
commit
c076b41c9e
|
@ -89,10 +89,9 @@ current directory string."
|
|||
,(let ((dir (if (assoc :dir params)
|
||||
(cdr (assoc :dir params))
|
||||
default-directory)))
|
||||
(format
|
||||
(if dir (format org-babel-lisp-dir-fmt dir) "(progn %s)")
|
||||
(buffer-substring-no-properties
|
||||
(point-min) (point-max)))))
|
||||
(format (format org-babel-lisp-dir-fmt dir)
|
||||
(buffer-substring-no-properties
|
||||
(point-min) (point-max)))))
|
||||
(cdr (assoc :package params))))))
|
||||
(org-babel-pick-name (cdr (assoc :colname-names params))
|
||||
(cdr (assoc :colnames params)))
|
||||
|
|
Loading…
Reference in a new issue