$NetBSD: patch-ab,v 1.2 2007/09/03 13:43:40 shannonjr Exp $

--- src/tls-auth.c.orig	2007-08-23 10:25:39.000000000 -0600
+++ src/tls-auth.c
@@ -189,6 +189,7 @@ int tls_auth_connection(prelude_client_p
         int ret, fd;
         void *cred;
         gnutls_session session;
+	int cipher_list[2];
 
         ret = prelude_client_profile_get_credentials(cp, &cred);
         if ( ret < 0 )
@@ -196,6 +197,9 @@ int tls_auth_connection(prelude_client_p
 
         gnutls_init(&session, GNUTLS_CLIENT);
         gnutls_set_default_priority(session);
+	cipher_list[0] = GNUTLS_CIPHER_AES_128_CBC;
+	cipher_list[1] = 0;
+	gnutls_cipher_set_priority (session, cipher_list);
         gnutls_credentials_set(session, GNUTLS_CRD_CERTIFICATE, cred);
 
         fd = prelude_io_get_fd(io);
