mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-05 11:45:45 +00:00
Code Issues Releases Activity

* net/gnutls.el (gnutls-negotiate): Upcase `gnutls-algorithm-priority'.

Browse Source
This commit is contained in:
Lars Magne Ingebrigtsen 2011-07-15 19:25:02 +02:00
parent 7b41decb8e
commit d606623955
2 changed files with 8 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lisp/ChangeLog
View File

@ -1,3 +1,8 @@
2011-07-15 Lars Magne Ingebrigtsen <larsi@gnus.org>
* net/gnutls.el (gnutls-negotiate): Upcase
`gnutls-algorithm-priority'.
2011-07-15 Glenn Morris <rgm@gnu.org>
* jka-compr.el (jka-compr-verbose): Move from here...

4
lisp/net/gnutls.el
View File

@ -152,7 +152,9 @@ defaults to GNUTLS_VERIFY_ALLOW_X509_V1_CA_CRT."
((eq type 'gnutls-anon)
"NORMAL:+ANON-DH:!ARCFOUR-128")
((eq type 'gnutls-x509pki)
(or gnutls-algorithm-priority "NORMAL")))))
(if gnutls-algorithm-priority
(upcase gnutls-algorithm-priority)
"NORMAL")))))
(params `(:priority ,priority-string
:hostname ,hostname
:loglevel ,gnutls-log-level