* gnutls.c: Remove unused local.

diff --git a/src/ChangeLog b/src/ChangeLog
index 70438c7..aea0402 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -7,6 +7,7 @@
        (emacs_gnutls_read): Do that check.  This is the other caller.
        (emacs_gnutls_handle_error): Remove unused local.
        (Fgnutls_boot): gnutls_certificate_verify_peers2 wants unsigned *.
+       Remove unused local.
 
        lisp.h: Fix a problem with aliasing and vector headers.
        GCC 4.6.0 optimizes based on type-based alias analysis.  For

diff --git a/src/gnutls.c b/src/gnutls.c
index 9b8e501..c0e0781 100644 (file)
--- a/src/gnutls.c
+++ b/src/gnutls.c
@@ -474,7 +474,7 @@ one trustfile (usually a CA bundle).  */)
   Lisp_Object loglevel;
   Lisp_Object hostname;
   Lisp_Object verify_flags;
-  Lisp_Object verify_error;
+  /* Lisp_Object verify_error; */
   Lisp_Object verify_hostname_error;
 
   CHECK_PROCESS (proc);
@@ -488,7 +488,7 @@ one trustfile (usually a CA bundle).  */)
   /* callbacks          = Fplist_get (proplist, Qgnutls_bootprop_callbacks); */
   loglevel              = Fplist_get (proplist, Qgnutls_bootprop_loglevel);
   verify_flags          = Fplist_get (proplist, Qgnutls_bootprop_verify_flags);
-  verify_error          = Fplist_get (proplist, Qgnutls_bootprop_verify_error);
+  /* verify_error    = Fplist_get (proplist, Qgnutls_bootprop_verify_error); */
   verify_hostname_error = Fplist_get (proplist, Qgnutls_bootprop_verify_hostname_error);
 
   if (!STRINGP (hostname))