Skip to content

GitLab

Commit bafcf6a5 authored by Juanma Barranquero's avatar Juanma Barranquero
Browse files

src/gnutls.c: Make static a bunch of variables.

parent 84621b71
Hide whitespace changes
Inline Side-by-side
Showing with 30 additions and 17 deletions
src/ChangeLog
View file @ bafcf6a5
2011-05-02 Juanma Barranquero <lekktu@gmail.com>
* gnutls.c (Qgnutls_log_level, Qgnutls_code, Qgnutls_anon)
(Qgnutls_x509pki, Qgnutls_e_interrupted, Qgnutls_e_again)
(Qgnutls_e_invalid_session, Qgnutls_e_not_ready_for_handshake)
(gnutls_global_initialized, Qgnutls_bootprop_priority)
(Qgnutls_bootprop_trustfiles, Qgnutls_bootprop_keyfiles)
(Qgnutls_bootprop_callbacks, Qgnutls_bootprop_loglevel)
(Qgnutls_bootprop_hostname, Qgnutls_bootprop_verify_flags)
(Qgnutls_bootprop_verify_error, Qgnutls_bootprop_verify_hostname_error)
(Qgnutls_bootprop_callbacks_verify): Make static.
2011-05-01 Andreas Schwab <schwab@linux-m68k.org>
* callproc.c: Indentation fixup.
......
src/gnutls.c
View file @ bafcf6a5
......@@ -34,26 +34,26 @@ along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */
static int
emacs_gnutls_handle_error (gnutls_session_t, int err);
Lisp_Object Qgnutls_log_level;
Lisp_Object Qgnutls_code;
Lisp_Object Qgnutls_anon, Qgnutls_x509pki;
Lisp_Object Qgnutls_e_interrupted, Qgnutls_e_again,
static Lisp_Object Qgnutls_log_level;
static Lisp_Object Qgnutls_code;
static Lisp_Object Qgnutls_anon, Qgnutls_x509pki;
static Lisp_Object Qgnutls_e_interrupted, Qgnutls_e_again,
Qgnutls_e_invalid_session, Qgnutls_e_not_ready_for_handshake;
int gnutls_global_initialized;
static int gnutls_global_initialized;
/* The following are for the property list of `gnutls-boot'. */
Lisp_Object Qgnutls_bootprop_priority;
Lisp_Object Qgnutls_bootprop_trustfiles;
Lisp_Object Qgnutls_bootprop_keyfiles;
Lisp_Object Qgnutls_bootprop_callbacks;
Lisp_Object Qgnutls_bootprop_loglevel;
Lisp_Object Qgnutls_bootprop_hostname;
Lisp_Object Qgnutls_bootprop_verify_flags;
Lisp_Object Qgnutls_bootprop_verify_error;
Lisp_Object Qgnutls_bootprop_verify_hostname_error;
static Lisp_Object Qgnutls_bootprop_priority;
static Lisp_Object Qgnutls_bootprop_trustfiles;
static Lisp_Object Qgnutls_bootprop_keyfiles;
static Lisp_Object Qgnutls_bootprop_callbacks;
static Lisp_Object Qgnutls_bootprop_loglevel;
static Lisp_Object Qgnutls_bootprop_hostname;
static Lisp_Object Qgnutls_bootprop_verify_flags;
static Lisp_Object Qgnutls_bootprop_verify_error;
static Lisp_Object Qgnutls_bootprop_verify_hostname_error;
/* Callback keys for `gnutls-boot'. Unused currently. */
Lisp_Object Qgnutls_bootprop_callbacks_verify;
static Lisp_Object Qgnutls_bootprop_callbacks_verify;
static void
gnutls_log_function (int level, const char* string)
......@@ -490,7 +490,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))
......@@ -918,4 +918,5 @@ syms_of_gnutls (void)
defsubr (&Sgnutls_deinit);
defsubr (&Sgnutls_bye);
}
#endif
#endif /* HAVE_GNUTLS */
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment