diff --git a/src/Ganeti/Block/Drbd/Types.hs b/src/Ganeti/Block/Drbd/Types.hs
index 80dd12f101846b1635b95f629cf84842b859eeaa..d81ad82a80e20838ac143464143ee06145b90866 100644
--- a/src/Ganeti/Block/Drbd/Types.hs
+++ b/src/Ganeti/Block/Drbd/Types.hs
@@ -144,8 +144,8 @@ data ConnState
   | Unconnected    -- ^ Prior to a connection attempt
   | Timeout        -- ^ Following a timeout in the communication
   | BrokenPipe     -- ^ After the connection to the peer was lost
-  | NetworkFailure -- ^ After the connection to the parner was lost
-  | ProtocolError  -- ^ After the connection to the parner was lost
+  | NetworkFailure -- ^ After the connection to the partner was lost
+  | ProtocolError  -- ^ After the connection to the partner was lost
   | TearDown       -- ^ The peer is closing the connection
   | WFConnection   -- ^ Waiting for the peer to become visible
   | WFReportParams -- ^ Waiting for first packet from peer
@@ -159,8 +159,8 @@ data ConnState
   | SyncTarget     -- ^ Target of a running synchronization
   | PausedSyncS    -- ^ Source of a paused synchronization
   | PausedSyncT    -- ^ Target of a paused synchronization
-  | VerifyS        -- ^ Source of an running verification
-  | VerifyT        -- ^ Target of an running verification
+  | VerifyS        -- ^ Source of a running verification
+  | VerifyT        -- ^ Target of a running verification
   | Unconfigured   -- ^ The device is not configured
     deriving (Show, Eq)