no second close

This commit is contained in:
2026-05-12 15:09:01 +02:00
parent 20d0194f48
commit 734aeef222
+6 -3
View File
@@ -45,9 +45,12 @@
(define (close!) (define (close!)
(when h (when h
(log! "!!! ao-placed-player: close") (let ((old-h h))
(ao-close h) (set! h #f)
(set! h #f))) (log! "closing ao handle")
(when (ao-valid? old-h)
(ao-close old-h))
(log! "ao handle closed"))))
(place-channel-put cmd-ch 'started) (place-channel-put cmd-ch 'started)