Mercurial > emacs
changeset 111296:5227b2c896bb
* net/gnutls.el (gnutls-boot, gnutls-errorp, gnutls-error-string): Declare.
| author | Glenn Morris <rgm@gnu.org> |
|---|---|
| date | Sun, 31 Oct 2010 22:53:15 -0700 |
| parents | fca66d4226a6 |
| children | 7f671f436f9d |
| files | lisp/ChangeLog lisp/net/gnutls.el |
| diffstat | 2 files changed, 9 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- 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>
--- 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)))