From 3c36efb7ea5dd8cccd9bcc47f4f6e71ee4cfcbb2 Mon Sep 17 00:00:00 2001
From: Marlon Schumacher <schumacher@hfm-karlsruhe.de>
Date: Wed, 05 Mar 2025 23:03:24 +0100
Subject: [PATCH] chore: more linting for sox-hoaencode class
---
sources/utilities.lisp | 2 +-
1 files changed, 1 insertions(+), 1 deletions(-)
diff --git a/sources/utilities.lisp b/sources/utilities.lisp
index 765656d..4f1b16f 100644
--- a/sources/utilities.lisp
+++ b/sources/utilities.lisp
@@ -366,7 +366,7 @@
for gainitem in (cdr subgainlist) do
(unless (< gainitem -150) ;it would be better to catch 'nil' instead of a very small value (depends on float precision)
(setf substr (string+ substr (format nil ",~dp~d" channelitem gainitem))))
- finally return substr)
+ finally (return substr))
)))))
outstr))
--
Gitblit v1.9.1