diff options
author | Kyle Meyer <kyle@kyleam.com> | 2017-05-03 23:27:25 -0400 |
---|---|---|
committer | Kyle Meyer <kyle@kyleam.com> | 2017-05-03 23:35:40 -0400 |
commit | fa1c6e92ac0f3c8c37c2d2d7e11073ccce550156 (patch) | |
tree | 0d361a3e68e7968fb51834e19865d210dac0849c | |
parent | 500abcd7fbe24abc887300faec2058905a13fa33 (diff) | |
download | org-mode-fa1c6e92ac0f3c8c37c2d2d7e11073ccce550156.tar.gz |
ox-extra: Use cl-lib
* contrib/lisp/ox-extra.el (org-latex-header-blocks-filter): Use "cl-"
prefix.
-rw-r--r-- | contrib/lisp/ox-extra.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/contrib/lisp/ox-extra.el b/contrib/lisp/ox-extra.el index 85dae47..b203b92 100644 --- a/contrib/lisp/ox-extra.el +++ b/contrib/lisp/ox-extra.el @@ -56,7 +56,7 @@ ;;; Code: (require 'ox) -(eval-when-compile (require 'cl)) +(require 'cl-lib) (defun org-latex-header-blocks-filter (backend) (when (org-export-derived-backend-p backend 'latex) @@ -72,8 +72,10 @@ (org-element-property :post-affiliated block))))))) (mapc (lambda (pos) (goto-char (nth 2 pos)) - (destructuring-bind + (cl-destructuring-bind (beg end &rest ignore) + ;; FIXME: `org-edit-src-find-region-and-lang' was + ;; removed in 9c06f8cce (2014-11-11). (org-edit-src-find-region-and-lang) (let ((contents-lines (split-string (buffer-substring-no-properties beg end) |