Browse Source

ox-beamer: Do not require `cl' since `cl-lib' is used

* lisp/ox-beamer.el (org-beamer--normalize-argument):
(org-beamer-link): Use "cl" prefix.
Nicolas Goaziou 8 years ago
parent
commit
e8120fbd55
1 changed files with 2 additions and 3 deletions
  1. 2 3
      lisp/ox-beamer.el

+ 2 - 3
lisp/ox-beamer.el

@@ -29,7 +29,6 @@
 
 ;;; Code:
 
-(eval-when-compile (require 'cl))
 (require 'cl-lib)
 (require 'ox-latex)
 
@@ -203,7 +202,7 @@ TYPE is a symbol among the following:
 `defaction' Return ARGUMENT within both square and angular brackets.
 `option'    Return ARGUMENT within square brackets."
   (if (not (string-match "\\S-" argument)) ""
-    (case type
+    (cl-case type
       (action (if (string-match "\\`<.*>\\'" argument) argument
 		(format "<%s>" argument)))
       (defaction (cond
@@ -740,7 +739,7 @@ used as a communication channel."
 	   (let ((destination (if (string= type "fuzzy")
 				  (org-export-resolve-fuzzy-link link info)
 				(org-export-resolve-id-link link info))))
-	     (case (org-element-type destination)
+	     (cl-case (org-element-type destination)
 	       (headline
 		(let ((label
 		       (format "sec-%s"