diff options
| author | Colin Okay <colin@cicadas.surf> | 2022-11-16 12:43:43 -0600 |
|---|---|---|
| committer | Colin Okay <colin@cicadas.surf> | 2022-11-16 12:43:43 -0600 |
| commit | 464d127112b7e5c38db5c75b2c8f8fdea41f3f77 (patch) | |
| tree | 0267a4f907ad4be045e84eb16c190d3b794fec86 /playlist.lisp | |
| parent | 3a9c7b6cb57fdf0b197dedae39275de5ada598da (diff) | |
Fix: ensure that the element exists before finding connection data
Diffstat (limited to 'playlist.lisp')
| -rw-r--r-- | playlist.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
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))) |