diff --git a/CHANGELOG.md b/CHANGELOG.md
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -1,3 +1,7 @@
+## [1.1.0.1] - 2022-12-01
+
+- Make `char` applied to a wide character result in a space instead of nothing
+
 ## [1.1.0] - 2022-11-03
 
 - Split off Elm Architecture wrapper into `termbox-tea` package, and expose `run`/`initialize`/`finalize` instead.
diff --git a/src/Termbox/Internal/Cell.hs b/src/Termbox/Internal/Cell.hs
--- a/src/Termbox/Internal/Cell.hs
+++ b/src/Termbox/Internal/Cell.hs
@@ -27,8 +27,7 @@
 -- * Set a cell's color with 'fg', 'bg'.
 -- * Style a cell with 'bold', 'underline', 'blink'.
 data Cell
-  = CellEmpty
-  | CellFg
+  = CellFg
       {-# UNPACK #-} !Char -- invariant: char is width 1
       {-# UNPACK #-} !Termbox.Bindings.Hs.Tb_color -- fg
   | CellFgBlink
@@ -45,7 +44,6 @@
 
 drawCell :: Termbox.Bindings.Hs.Tb_color -> Int -> Int -> Cell -> IO ()
 drawCell bg0 col row = \case
-  CellEmpty -> pure ()
   CellFg ch fg_ -> Termbox.Bindings.Hs.tb_change_cell col row ch fg_ bg0
   CellFgBlink ch fg_ -> Termbox.Bindings.Hs.tb_change_cell col row ch fg_ (makeBold bg0) -- bold background = blink
   CellFgBg ch fg_ bg_ -> Termbox.Bindings.Hs.tb_change_cell col row ch fg_ bg_
@@ -55,14 +53,11 @@
 -- If the character is not 1 character wide, it will not be displayed.
 char :: Char -> Cell
 char ch =
-  case wcwidth (charToCWchar ch) of
-    1 -> CellFg ch Termbox.Bindings.Hs.TB_DEFAULT
-    _ -> CellEmpty
+  CellFg (if wcwidth (charToCWchar ch) == 1 then ch else ' ') Termbox.Bindings.Hs.TB_DEFAULT
 
 -- | Set the foreground color of a cell.
 fg :: Color -> Cell -> Cell
 fg (Color color) = \case
-  CellEmpty -> CellEmpty
   CellFg ch _ -> CellFg ch color
   CellFgBlink ch _ -> CellFgBlink ch color
   CellFgBg ch _ bg_ -> CellFgBg ch color bg_
@@ -70,7 +65,6 @@
 -- | Set the background color of a cell.
 bg :: Color -> Cell -> Cell
 bg (Color color) = \case
-  CellEmpty -> CellEmpty
   CellFg ch fg_ -> CellFgBg ch fg_ color
   CellFgBlink ch fg_ -> CellFgBg ch fg_ (makeBold color) -- bold background = blink
   CellFgBg ch fg_ _ -> CellFgBg ch fg_ color
@@ -78,7 +72,6 @@
 -- | Make a cell bold.
 bold :: Cell -> Cell
 bold = \case
-  CellEmpty -> CellEmpty
   CellFg ch fg_ -> CellFg ch (makeBold fg_)
   CellFgBlink ch fg_ -> CellFgBlink ch (makeBold fg_)
   CellFgBg ch fg_ bg_ -> CellFgBg ch (makeBold fg_) bg_
@@ -86,7 +79,6 @@
 -- | Make a cell underlined.
 underline :: Cell -> Cell
 underline = \case
-  CellEmpty -> CellEmpty
   CellFg ch fg_ -> CellFg ch (makeUnderline fg_)
   CellFgBlink ch fg_ -> CellFgBlink ch (makeUnderline fg_)
   CellFgBg ch fg_ bg_ -> CellFgBg ch (makeUnderline fg_) bg_
@@ -94,7 +86,6 @@
 -- | Make a cell blink.
 blink :: Cell -> Cell
 blink = \case
-  CellEmpty -> CellEmpty
   CellFg ch fg_ -> CellFgBlink ch fg_
   CellFgBlink ch fg_ -> CellFgBlink ch fg_
   CellFgBg ch fg_ bg_ -> CellFgBg ch fg_ (makeBold bg_) -- bold background = blink
diff --git a/termbox.cabal b/termbox.cabal
--- a/termbox.cabal
+++ b/termbox.cabal
@@ -22,7 +22,7 @@
 name: termbox
 synopsis: termbox
 tested-with: GHC == 9.0.2, GHC == 9.2.4, GHC == 9.4.2
-version: 1.1.0
+version: 1.1.0.1
 
 extra-source-files:
   CHANGELOG.md