fix: sync-music: use unwind-protect in with-ignore-stderr

sync-music/libcue/libcue.lisp

@@ -20,10 +20,9 @@ Only works on Unix systems with a /dev/fd/ filesystem."
     `(progn
        (finish-output *error-output*)
        (let ((,old-stderr (dup +stderr-fileno+)))
-         (prog1
-             (progn
          (freopen "/dev/null" "w" +stderr+)
-               ,@body)
+         (unwind-protect
+              (progn ,@body)
            (freopen (format nil "/dev/fd/~D" ,old-stderr) "a" +stderr+)))))
   #-unix
   `(progn ,@body))