1
0
mirror of https://git.savannah.gnu.org/git/emacs/org-mode.git synced 2024-11-23 07:18:53 +00:00

ob: only call copy-seq on proper lists

* lisp/ob.el (org-babel-sha1-hash): Only call copy-seq on proper
  lists.
This commit is contained in:
Eric Schulte 2011-07-21 11:05:19 -06:00
parent 4fd9989b58
commit 4b6bfab817

View File

@ -754,7 +754,7 @@ the current subtree."
(setq lst (remove p lst)))
lst)
(norm (arg)
(let ((v (if (listp (cdr arg))
(let ((v (if (and (listp (cdr arg)) (null (cddr arg)))
(copy-seq (cdr arg))
(cdr arg))))
(when (and v (not (and (sequencep v)