summaryrefslogtreecommitdiffhomepage
path: root/Types
diff options
context:
space:
mode:
Diffstat (limited to 'Types')
-rw-r--r--Types/Server.hs2
1 files changed, 1 insertions, 1 deletions
diff --git a/Types/Server.hs b/Types/Server.hs
index 785dd24..5caf9db 100644
--- a/Types/Server.hs
+++ b/Types/Server.hs
@@ -21,7 +21,7 @@ data ServerAddress = ServerAddress HostName Port
-- | Name used in queuing uploads to the server. Should remain stable
-- across keysafe versions.
-newtype ServerName = ServerName String
+newtype ServerName = ServerName { fromServerName :: String }
deriving (Show, Eq, Ord, Generic)
instance ToJSON ServerName