diff options
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 |