diff --git a/src/Sugar/Json.hs b/src/Sugar/Json.hs
--- a/src/Sugar/Json.hs
+++ b/src/Sugar/Json.hs
@@ -87,7 +87,7 @@
 
 instance ToSugarCube Json.Value where
   toSugarCube Json.Null = SugarCube'Unit
-  toSugarCube (Json.Bool b) = SugarCube'Text (T.pack $ show b)
+  toSugarCube (Json.Bool b) = SugarCube'Text (if b then "#t" else "#f")
   toSugarCube (Json.String t) = SugarCube'Text t
   toSugarCube (Json.Number n) = SugarCube'Text (showNumber n)
     where
diff --git a/sugar-json.cabal b/sugar-json.cabal
--- a/sugar-json.cabal
+++ b/sugar-json.cabal
@@ -1,5 +1,5 @@
 name: sugar-json
-version: 0.0.1
+version: 0.0.1.1
 synopsis: Sugar with JSON
 homepage: https://github.com/jxv/sugar#readme
 description: Please see the README on GitHub at <https://github.com/jxv/sugar#readme>
