Added --check-servers mode, which is useful both at the command line to see what servers keysafe knows about, and as a cron job.

This commit was sponsored by Jake Vosloo on Patreon.

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