From 464d127112b7e5c38db5c75b2c8f8fdea41f3f77 Mon Sep 17 00:00:00 2001 From: Colin Okay Date: Wed, 16 Nov 2022 12:43:43 -0600 Subject: Fix: ensure that the element exists before finding connection data --- playlist.lisp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/playlist.lisp b/playlist.lisp index c5d778f..ad111bf 100644 --- a/playlist.lisp +++ b/playlist.lisp @@ -85,7 +85,7 @@ (defun controller-alive-p (ctl) "A controller is a live if the CLOG elements it manages are associated with a live connection." - (connection-data (pl-title ctl))) + (when (pl-title ctl) (connection-data (pl-title ctl)))) (defmacro for-playlist-viewers (clog-elem ctlvar &body body) `(dolist (,ctlvar (playlist-viewers (cur-playlist-ctl ,clog-elem))) -- cgit v1.2.3