forked from mirrors/org-mode
assoc -> assq
* lisp/ob-sqlite.el (org-babel-execute:sqlite): Change `assoc' to `assq'.
This commit is contained in:
parent
a3adfb062b
commit
c997bf7ff1
|
@ -66,7 +66,7 @@ This function is called by `org-babel-execute-src-block'."
|
||||||
(nullvalue (cdr (assoc :nullvalue params)))
|
(nullvalue (cdr (assoc :nullvalue params)))
|
||||||
(headers-p (equal "yes" (cdr (assoc :colnames params))))
|
(headers-p (equal "yes" (cdr (assoc :colnames params))))
|
||||||
(others (delq nil (mapcar
|
(others (delq nil (mapcar
|
||||||
(lambda (arg) (car (assoc arg params)))
|
(lambda (arg) (car (assq arg params)))
|
||||||
(list :header :echo :bail :column
|
(list :header :echo :bail :column
|
||||||
:csv :html :line :list)))))
|
:csv :html :line :list)))))
|
||||||
(unless db (error "ob-sqlite: can't evaluate without a database"))
|
(unless db (error "ob-sqlite: can't evaluate without a database"))
|
||||||
|
|
Loading…
Reference in a new issue