Fixed a typo in openReplicatSetSRV' documentation strings.

Merge pull request #134 from why-not-try-calmer/adrien/typo-in-docs

Author: VictorDenisov

Database/MongoDB/Connection.hs

@@ -177,7 +177,7 @@ openReplicaSetSRV' :: HostName -> IO ReplicaSet
 -- >   do
 -- >   pipe <- openReplicatSetSRV' "cluster#.xxxxx.yyyyy.zzz"
 -- >   is_auth <- access pipe master "admin" $ auth user_name password
--- >   unless (not is_auth) (throwIO $ userError "Authentication failed!")
+-- >   unless is_auth (throwIO $ userError "Authentication failed!")
 openReplicaSetSRV' hostname = do
     timeoutSecs <- readIORef globalConnectTimeout
     _openReplicaSetSRV timeoutSecs Secure hostname