diff --git a/src/System/Logger/Message.hs b/src/System/Logger/Message.hs
index 1d23dd7a5d51b3f509f1d74c8734da2f5af0e2a5..e4572b84a9de3779ad9f6e78076a048b779f01e0 100644
--- a/src/System/Logger/Message.hs
+++ b/src/System/Logger/Message.hs
@@ -29,7 +29,7 @@ module System.Logger.Message
     , (~~)
     , val
     , eval
-    , builderSiz
+    , builderSize
     , builderBytes
     , render
     , renderDefault
@@ -87,8 +87,8 @@ instance Monoid Builder where
 eval :: Builder -> L.ByteString
 eval (Builder n b) = B.toLazyByteStringWith (B.safeStrategy n 256) L.empty b
 
-builderSiz :: Builder -> Int
-builderSiz (Builder n _) = n
+builderSize :: Builder -> Int
+builderSize (Builder n _) = n
 
 builderBytes :: Builder -> B.Builder
 builderBytes (Builder _ b) = b