diff --git a/lisp/org-element.el b/lisp/org-element.el
index 0924c56fe..ab81abebd 100644
--- a/lisp/org-element.el
+++ b/lisp/org-element.el
@@ -669,6 +669,8 @@ Optional keys can modify what is being copied and the generated buffer
 copy.  TO-BUFFER, DROP-VISIBILITY, DROP-NARROWING, DROP-CONTENTS, and
 DROP-LOCALS are passed as arguments to `org-element-copy-buffer'."
   (declare (debug t))
+  ;; Drop keyword arguments from BODY.
+  (while (keywordp (car body)) (pop body) (pop body))
   (org-with-gensyms (buf-copy)
     `(let ((,buf-copy (org-element-copy-buffer
                        :to-buffer ,to-buffer
diff --git a/lisp/ox.el b/lisp/ox.el
index b661b59c3..46994f0e2 100644
--- a/lisp/ox.el
+++ b/lisp/ox.el
@@ -2599,6 +2599,8 @@ DROP-CONTENTS, and DROP-LOCALS.
 In addition, buffer-local variables are set according to #+BIND:
 keywords."
   (declare (debug t))
+  ;; Drop keyword arguments from BODY.
+  (while (keywordp (car body)) (pop body) (pop body))
   (org-with-gensyms (bind-variables)
     `(let ((,bind-variables (org-export--list-bound-variables)))
        (org-element-with-buffer-copy