Fix argument to `error' in `gnutls-boot'.

 src/gnutls.c (Fgnutls_boot): Don't pass Lisp_Object to `error'.

diff --git a/src/ChangeLog b/src/ChangeLog
index e8b82ec..d9f764c 100644 (file)
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,5 +1,7 @@
 2011-04-16  Eli Zaretskii  <eliz@gnu.org>
 
+       * gnutls.c (Fgnutls_boot): Don't pass Lisp_Object to `error'.
+
        Fix regex.c, syntax.c and friends for buffers > 2GB.
        * syntax.h (struct gl_state_s): Declare character position members
        EMACS_INT.

diff --git a/src/gnutls.c b/src/gnutls.c
index d7328e1..f4f2b9b 100644 (file)
--- a/src/gnutls.c
+++ b/src/gnutls.c
@@ -456,7 +456,7 @@ one trustfile (usually a CA bundle).  */)
           else
             {
               error ("Sorry, GnuTLS can't use non-string trustfile %s",
-                     trustfile);
+                     SDATA (trustfile));
             }
         }
 
@@ -478,7 +478,7 @@ one trustfile (usually a CA bundle).  */)
           else
             {
               error ("Sorry, GnuTLS can't use non-string keyfile %s",
-                     keyfile);
+                     SDATA (keyfile));
             }
         }
     }