瀏覽代碼

babel: Use `copy-sequence' instead of `copy-tree'

* lisp/ob.el: `copy-sequence' suffices to copy alist; no need for
`copy-tree'
Dan Davison 14 年之前
父節點
當前提交
ed5665e1e2
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      lisp/ob.el

+ 1 - 1
lisp/ob.el

@@ -611,7 +611,7 @@ the current subtree."
   (let ((print-level nil)
 	(info (or info (org-babel-get-src-block-info))))
     (setf (nth 2 info)
-	  (sort (copy-tree (nth 2 info))
+	  (sort (copy-sequence (nth 2 info))
 		(lambda (a b) (string< (car a) (car b)))))
     (let ((hash (sha1
 		 (format "%s-%s"