Quellcode durchsuchen

ob-lua: Use cl-lib

* lisp/ob-lua.el (org-babel-lua-evaluate-session): Refactor code to
  avoid using unprefixed "cl" macro.
Nicolas Goaziou vor 8 Jahren
Ursprung
Commit
cddc7d8d2d
1 geänderte Dateien mit 4 neuen und 4 gelöschten Zeilen
  1. 4 4
      lisp/ob-lua.el

+ 4 - 4
lisp/ob-lua.el

@@ -34,7 +34,7 @@
 
 ;;; Code:
 (require 'ob)
-(eval-when-compile (require 'cl))
+(require 'cl-lib)
 
 (declare-function org-remove-indentation "org" )
 (declare-function lua-shell "ext:lua-mode" (&optional argprompt))
@@ -362,8 +362,8 @@ fd:close()"
 			     (split-string body "[\r\n]"))
 		       (funcall send-wait)))
          (results
-          (case result-type
-            (output
+          (pcase result-type
+            (`output
              (mapconcat
               #'org-trim
               (butlast
@@ -374,7 +374,7 @@ fd:close()"
                  (insert org-babel-lua-eoe-indicator)
                  (funcall send-wait))
                2) "\n"))
-            (value
+            (`value
              (let ((tmp-file (org-babel-temp-file "lua-")))
                (org-babel-comint-with-output
                    (session org-babel-lua-eoe-indicator nil body)