# HG changeset patch
# User Glenn Morris <rgm@gnu.org>
# Date 1288590795 25200
# Node ID 5227b2c896bb48c89de3a103ce9bca05506d13aa
# Parent  fca66d4226a65b4e9bcf4e6020fed5412f4a023b
* net/gnutls.el (gnutls-boot, gnutls-errorp, gnutls-error-string): Declare.

diff -r fca66d4226a6 -r 5227b2c896bb lisp/ChangeLog
--- a/lisp/ChangeLog	Sun Oct 31 22:48:20 2010 -0700
+++ b/lisp/ChangeLog	Sun Oct 31 22:53:15 2010 -0700
@@ -1,5 +1,8 @@
 2010-11-01  Glenn Morris  <rgm@gnu.org>
 
+	* net/gnutls.el (gnutls-boot, gnutls-errorp, gnutls-error-string):
+	Declare.
+
 	* info.el (finder-keywords-hash, package-alist): Declare.
 
 2010-11-01  Chong Yidong  <cyd@stupidchicken.com>
diff -r fca66d4226a6 -r 5227b2c896bb lisp/net/gnutls.el
--- a/lisp/net/gnutls.el	Sun Oct 31 22:48:20 2010 -0700
+++ b/lisp/net/gnutls.el	Sun Oct 31 22:53:15 2010 -0700
@@ -1,4 +1,5 @@
 ;;; gnutls.el --- Support SSL/TLS connections through GnuTLS
+
 ;; Copyright (C) 2010 Free Software Foundation, Inc.
 
 ;; Author: Ted Zlatanov <tzz@lifelogs.com>
@@ -65,6 +66,8 @@
   (let ((proc (open-network-stream name buffer host service)))
     (gnutls-negotiate proc 'gnutls-x509pki)))
 
+(declare-function gnutls-boot "gnutls.c" (proc type proplist))
+
 (defun gnutls-negotiate (proc type &optional priority-string
                               trustfiles keyfiles)
   "Negotiate a SSL/TLS connection.
@@ -95,6 +98,9 @@
 
     proc))
 
+(declare-function gnutls-errorp "gnutls.c" (error))
+(declare-function gnutls-error-string "gnutls.c" (error))
+
 (defun gnutls-message-maybe (doit format &rest params)
   "When DOIT, message with the caller name followed by FORMAT on PARAMS."
   ;; (apply 'debug format (or params '(nil)))