From cf8a102b39f6d168a56b6760527bc32aea3f494b Mon Sep 17 00:00:00 2001 From: Ted Zlatanov Date: Mon, 16 Dec 2013 10:47:09 -0500 Subject: [PATCH] Fix bug#16161: CHECK_LIST_CONS fails on nil * src/gnutls.c (Fgnutls_boot): Use `Flistp' instead of `CHECK_LIST_CONS`. --- src/ChangeLog | 5 +++++ src/gnutls.c | 3 ++- 2 files changed, 7 insertions(+), 1 deletion(-) diff --git a/src/ChangeLog b/src/ChangeLog index 7f165b00ab9..a579154de3b 100644 --- a/src/ChangeLog +++ b/src/ChangeLog @@ -1,3 +1,8 @@ +2013-12-16 Teodor Zlatanov + + * gnutls.c (Fgnutls_boot): Use `Flistp' instead of + `CHECK_LIST_CONS`. + 2013-12-16 Martin Rudalics * w32term.c (w32_enable_frame_resize_hack): Default to 1. diff --git a/src/gnutls.c b/src/gnutls.c index dd9f30f4de9..f04d9c44b41 100644 --- a/src/gnutls.c +++ b/src/gnutls.c @@ -825,7 +825,8 @@ one trustfile (usually a CA bundle). */) verify_error = Fplist_get (proplist, QCgnutls_bootprop_verify_error); prime_bits = Fplist_get (proplist, QCgnutls_bootprop_min_prime_bits); - CHECK_LIST_CONS (verify_error, verify_error); + if (!Flistp (verify_error)) + error ("gnutls-boot: invalid :verify_error parameter (not a list)"); if (!STRINGP (hostname)) error ("gnutls-boot: invalid :hostname parameter (not a string)"); -- 2.11.4.GIT