]> code.delx.au - gnu-emacs-elpa/blobdiff - packages/osc/osc.el
* packages/osc/osc.el (osc-filter): Fix up old `cl' name.
[gnu-emacs-elpa] / packages / osc / osc.el
index e214f8dc4042de11f1b7c29ef7ebc36d7bc32d48..9f92b17071d90d243143d9e7c92ccc9369e8c1ed 100644 (file)
@@ -182,7 +182,7 @@ the generic handler for SERVER."
                       path
                       (mapcar
                        (lambda (type)
-                         (case type
+                         (cl-case type
                            (?f (osc-read-float32))
                            (?i (osc-read-int32))
                            (?s (osc-read-string))))
@@ -220,7 +220,7 @@ This is mostly for testing the implementation robustness."
         (osc-test-ok nil)
         (server (osc-make-server
                  "localhost" t
-                 (lambda (path v)
+                 (lambda (_path v)
                    (setq osc-test-done t
                          osc-test-ok (list v (funcall osc-test-func
                                                       osc-test-value v))))))