----------------------------------------------------------------------------- {-# LANGUAGE GeneralizedNewtypeDeriving #-} {-# LANGUAGE ExistentialQuantification #-} {-# LANGUAGE DerivingStrategies #-} {-# LANGUAGE RecordWildCards #-} {-# LANGUAGE OverloadedStrings #-} {-# LANGUAGE LambdaCase #-} ----------------------------------------------------------------------------- module Miso.UI.Sidebar ( -- ** Component sidebar_ ) where ----------------------------------------------------------------------------- import Miso.Types -- import Miso.Html -- import qualified Miso.Svg as S -- import qualified Miso.Svg.Property as SP -- import qualified Miso.Html.Element as H -- import qualified Miso.Html.Property as P -- import Miso.Lens ----------------------------------------------------------------------------- sidebar_ :: Component parent model action = Component parent model action forall a. HasCallStack => a undefined -----------------------------------------------------------------------------