[nongnu] elpa/scad-mode 970982b253 31/47: Fix ob-scad

[ELPA Syncer]

branch: elpa/scad-mode
commit 970982b2539359b7239aafc37707e9e4ecce785e
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    Fix ob-scad
---
 ob-scad.el | 7 +++----
 1 file changed, 3 insertions(+), 4 deletions(-)

diff --git a/ob-scad.el b/ob-scad.el
index 1c4305e994..fda96c14ad 100644
--- a/ob-scad.el
+++ b/ob-scad.el
@@ -35,7 +35,7 @@
   '((colorscheme . :any)
     (imgsize . :any)
     (camera . :any)
-    (views . :any))
+    (view . :any))
   "Scad specific header args.")
 
 (defun org-babel-execute:scad (body params)
@@ -43,7 +43,6 @@
   (let* ((outfile (or (alist-get :file params)
                       (error "Scad code block requires :file header 
argument")))
          (infile (org-babel-temp-file "scad-")))
-    (message "%S" params)
     (with-temp-file infile (insert body))
     (apply #'call-process scad-command nil 0 nil
            (delq nil
@@ -52,8 +51,8 @@
                        "--viewall"
                        (format "--colorscheme=%s"
                                (alist-get :colorscheme params 
scad-preview-colorscheme))
-                       (format "--views=%s" (or (alist-get :views params)
-                                                (mapconcat #'identity 
scad-preview-view ",")))
+                       (format "--view=%s" (or (alist-get :view params)
+                                               (mapconcat #'identity 
scad-preview-view ",")))
                        (when-let (camera (alist-get :camera params))
                          (format "--camera=%s" camera))
                        (when-let (imgsize (alist-get :imgsize params))