diff --git a/network-metrics.cabal b/network-metrics.cabal
--- a/network-metrics.cabal
+++ b/network-metrics.cabal
@@ -1,5 +1,5 @@
 name:               network-metrics
-version:            0.2.5
+version:            0.2.6
 synopsis:           Send metrics to Ganglia, Graphite, and statsd.
 license:            OtherLicense
 license-file:       LICENSE
diff --git a/src/Network/Metric/Sink/Graphite.hs b/src/Network/Metric/Sink/Graphite.hs
--- a/src/Network/Metric/Sink/Graphite.hs
+++ b/src/Network/Metric/Sink/Graphite.hs
@@ -34,8 +34,9 @@
 instance Sink Graphite where
     push (Graphite host hd) m = do
         time <- getPOSIXTime
-        mapM_ (hPush hd . enc time) (measure m)
+        mapM_ (hPush hd . flat . enc time) (measure m)
       where
+        flat s = BL.fromChunks [BS.intercalate " " $ BL.toChunks s]
         enc t (Counter g b v) = put host g b v t
         enc t (Timer g b v)   = put host g b v t
         enc t (Gauge g b v)   = put host g b v t
@@ -63,7 +64,12 @@
     -> POSIXTime
     -> BL.ByteString
 put host group bucket value time =
-    BL.fromChunks [key host group bucket, encode value, timestamp]
+    BL.fromChunks [key host (safe group) bucket, encode value, timestamp]
   where
     timestamp = BS.pack $ show (truncate time :: Integer)
 
+safe :: BS.ByteString -> BS.ByteString
+safe = BS.map fn
+  where
+    fn ' ' = '.'
+    fn c   = c