branch: externals/osc
commit 970f417ba2fa185682077ae37c963b42f9798e2a
Author: Stefan Monnier <[email protected]>
Commit: Stefan Monnier <[email protected]>
* packages/osc/osc.el (osc-filter): Fix up old `cl' name.
(osc--test-transport-equality): Mark `path' as unused.
---
osc.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/osc.el b/osc.el
index e214f8d..9f92b17 100644
--- a/osc.el
+++ b/osc.el
@@ -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))))))
