* gnutls.c (Fgnutls_boot): Properly parse :keylist argument.

This commit is contained in:
Andreas Schwab 2012-07-11 09:20:14 +02:00
parent 34348bd4e5
commit d96a1e0c71
2 changed files with 3 additions and 1 deletions

View file

@ -1,5 +1,7 @@
2012-07-11 Andreas Schwab <schwab@linux-m68k.org>
* gnutls.c (Fgnutls_boot): Properly parse :keylist argument.
* coding.c (Fdefine_coding_system_internal): Use XCAR/XCDR instead
of Fcar/Fcdr if possible.
* font.c (check_otf_features): Likewise.

View file

@ -916,7 +916,7 @@ one trustfile (usually a CA bundle). */)
for (tail = keylist; CONSP (tail); tail = XCDR (tail))
{
Lisp_Object keyfile = Fcar (XCAR (tail));
Lisp_Object certfile = Fcar (XCDR (tail));
Lisp_Object certfile = Fcar (Fcdr (XCAR (tail)));
if (STRINGP (keyfile) && STRINGP (certfile))
{
GNUTLS_LOG2 (1, max_log_level, "setting the client key file: ",