diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -1,5 +1,10 @@
 # Revision history for brick-skylighting
 
+1.0
+===
+
+ * Updated to work with `brick` 1.0.
+
 0.3
 ===
 
diff --git a/brick-skylighting.cabal b/brick-skylighting.cabal
--- a/brick-skylighting.cabal
+++ b/brick-skylighting.cabal
@@ -1,5 +1,5 @@
 name:                brick-skylighting
-version:             0.3
+version:             1.0
 synopsis:            Show syntax-highlighted text in your Brick UI
 description:         This package provides a module to use Skylighting to perform
                      syntax highlighting and display the results in Brick-based
@@ -12,7 +12,7 @@
 category:            Graphics
 build-type:          Simple
 extra-source-files:  CHANGELOG.md
-cabal-version:       >=1.18
+cabal-version:       1.18
 Homepage:            https://github.com/jtdaugherty/brick-skylighting/
 Bug-reports:         https://github.com/jtdaugherty/brick-skylighting/issues
 
@@ -31,11 +31,11 @@
   ghc-options:         -Wall
   hs-source-dirs:      src
   default-language:    Haskell2010
-  exposed-modules:     
+  exposed-modules:
     Brick.Widgets.Skylighting
 
   build-depends:       base <= 5,
-                       brick >= 0.39,
+                       brick >= 1.0,
                        vty >= 5.23.1,
                        skylighting-core >= 0.7,
                        text,
@@ -53,4 +53,5 @@
                        brick-skylighting,
                        vty,
                        skylighting-core >= 0.7,
-                       text
+                       text,
+                       mtl
diff --git a/programs/Demo.hs b/programs/Demo.hs
--- a/programs/Demo.hs
+++ b/programs/Demo.hs
@@ -69,12 +69,12 @@
     , ("zenburn", S.zenburn)
     ]
 
-handleEvent :: Int -> BrickEvent () e -> EventM () (Next Int)
-handleEvent i (VtyEvent (V.EvKey V.KUp [])) = continue $ (i + 1) `mod` length styles
-handleEvent i (VtyEvent (V.EvKey V.KDown [])) = continue $ (i - 1) `mod` length styles
-handleEvent i (VtyEvent (V.EvKey V.KEsc [])) = halt i
-handleEvent i (VtyEvent (V.EvKey (V.KChar 'q') [])) = halt i
-handleEvent i _ = continue i
+handleEvent :: BrickEvent () e -> EventM () Int ()
+handleEvent (VtyEvent (V.EvKey V.KUp [])) = modify $ \i -> (i + 1) `mod` length styles
+handleEvent (VtyEvent (V.EvKey V.KDown [])) = modify $ \i -> (i - 1) `mod` length styles
+handleEvent (VtyEvent (V.EvKey V.KEsc [])) = halt
+handleEvent (VtyEvent (V.EvKey (V.KChar 'q') [])) = halt
+handleEvent _ = return ()
 
 app :: [(T.Text, S.Syntax)] -> App Int e ()
 app programs =
@@ -83,7 +83,7 @@
                              attrMappingsForStyle $ snd $ styles !! i
         , appHandleEvent = handleEvent
         , appChooseCursor = neverShowCursor
-        , appStartEvent = return
+        , appStartEvent = return ()
         }
 
 usage :: IO ()
diff --git a/src/Brick/Widgets/Skylighting.hs b/src/Brick/Widgets/Skylighting.hs
--- a/src/Brick/Widgets/Skylighting.hs
+++ b/src/Brick/Widgets/Skylighting.hs
@@ -121,7 +121,7 @@
 
 -- | The base attribute name for all syntax-highlighted renderings.
 highlightedCodeBlockAttr :: AttrName
-highlightedCodeBlockAttr = "highlightedCodeBlock"
+highlightedCodeBlockAttr = attrName "highlightedCodeBlock"
 
 -- | The constructor for attribute names for each 'TokenType' in
 -- Skylighting.
