diff options
| author | LLLL Colonq <llll@colonq> | 2025-01-28 11:41:22 -0500 |
|---|---|---|
| committer | LLLL Colonq <llll@colonq> | 2025-01-28 11:41:38 -0500 |
| commit | d03675f9effa443811f054578f7c24e17adbd6dc (patch) | |
| tree | e4b2b9d90d80576f84bda290ce3145a7525be3cd /src/Main/Greencircle.purs | |
| parent | 91e2134e6ccfa0536314248545c88db01c1dc711 (diff) | |
Fix missing panel situation
Diffstat (limited to 'src/Main/Greencircle.purs')
| -rw-r--r-- | src/Main/Greencircle.purs | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/Main/Greencircle.purs b/src/Main/Greencircle.purs index 3229c6f..1870442 100644 --- a/src/Main/Greencircle.purs +++ b/src/Main/Greencircle.purs @@ -39,8 +39,9 @@ updateLive = launchAff_ do Utils.setText adj $ adjective $ Array.length names for_ names \n -> do liftEffect $ log n - p <- Utils.byId $ "lcolonq-gc-panel-" <> n - Utils.addClass "lcolonq-gc-visible" p + Utils.maybeById ("lcolonq-gc-panel-" <> n) >>= case _ of + Nothing -> liftEffect $ log "couldn't find panel" + Just p -> Utils.addClass "lcolonq-gc-visible" p main :: Effect Unit main = do |