------------------------------------------------------------------------------
binary :: L.ByteString -> Snap ()
binary = withContentType "application/octet-stream"
binary :: L.ByteString -> Snap ()
binary = withContentType "application/octet-stream"
binary = withContentType "application/octet-stream"