diff --git a/basis/json/writer/writer.factor b/basis/json/writer/writer.factor
index cbcf426545..a7efe7ad0f 100644
--- a/basis/json/writer/writer.factor
+++ b/basis/json/writer/writer.factor
@@ -12,6 +12,9 @@ GENERIC: json-print ( obj -- )
   #! Returns a string representing the factor object in JSON format
   [ json-print ] with-string-writer ;
 
+M: t json-print ( f -- )
+  drop "true" write ;
+
 M: f json-print ( f -- )
   drop "false" write ;