]> woffs.de Git - fd/haskell-amqp-utils.git/commitdiff
formatting
authorFrank Doepper <[email protected]>
Wed, 18 Sep 2019 08:26:17 +0000 (10:26 +0200)
committerFrank Doepper <[email protected]>
Wed, 18 Sep 2019 08:26:17 +0000 (10:26 +0200)
Network/AMQP/Utils/Connection.hs

index ac10ddebb8eb71a35af4ab01fb358416de6b300d..62cba8f46456c11c1a77ae30b1dce66f551c8523 100644 (file)
@@ -57,7 +57,6 @@ connect args = do
   where
     to = connect_timeout args * 1000000
 
-
 --  addChannelExceptionHandler chan
 --                             (\exception -> closeConnection conn >>
 --                                  printparam' "exiting" (show exception) >>
@@ -68,6 +67,8 @@ connect args = do
 -- noValidation = ValidationCache
 --                  (\_ _ _ -> return ValidationCachePass)
 --                  (\_ _ _ -> return ())
+--
+--
 -- | provides the TLS client certificate
 myCert :: Maybe FilePath -> Maybe FilePath -> t -> IO (Maybe Credential)
 myCert (Just cert') (Just key') _ = do
don't click here