Fix last commit

* lisp/org.el (org-dynamic-block-define): Fix match.
This commit is contained in:
Nicolas Goaziou 2019-03-22 18:36:02 +01:00
parent 6c88d8e406
commit 3a2ef56195
1 changed files with 1 additions and 1 deletions

View File

@ -9598,7 +9598,7 @@ TYPE is a string. FUNC is the function creating the dynamic
block of such type." block of such type."
(pcase (assoc type org-dynamic-block-alist) (pcase (assoc type org-dynamic-block-alist)
(`nil (push (cons type func) org-dynamic-block-alist)) (`nil (push (cons type func) org-dynamic-block-alist))
(`(,def . ,_) (setcdr def func)))) (def (setcdr def func))))
(defun org-dynamic-block-insert-dblock (type) (defun org-dynamic-block-insert-dblock (type)
"Insert a dynamic block of type TYPE. "Insert a dynamic block of type TYPE.