diff --git a/libssh2/src/Network/SSH/Client/LibSSH2/Errors.chs b/libssh2/src/Network/SSH/Client/LibSSH2/Errors.chs
index 4798f38..28a3c99 100644
--- a/libssh2/src/Network/SSH/Client/LibSSH2/Errors.chs
+++ b/libssh2/src/Network/SSH/Client/LibSSH2/Errors.chs
@@ -47,7 +47,7 @@ data ErrorCode =
   | BANNER_RECV
   | BANNER_SEND
   | INVALID_MAC
-  | KEX_FALIURE
+  | KEX_FAILURE
   | ALLOC
   | SOCKET_SEND
   | KEY_EXCHANGE_FAILURE
@@ -265,4 +265,4 @@ instance SshCtx SftpHandle where
 
 instance SshCtx Agent where
   getSession = getSession . agentSession
-  throwCtxSpecificError _ er = throw er
\ No newline at end of file
+  throwCtxSpecificError _ er = throw er