Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
What's new
7
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
bafcf6a5
Commit
bafcf6a5
authored
May 02, 2011
by
Juanma Barranquero
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
src/gnutls.c: Make static a bunch of variables.
parent
84621b71
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
30 additions
and
17 deletions
+30
-17
src/ChangeLog
src/ChangeLog
+12
-0
src/gnutls.c
src/gnutls.c
+18
-17
No files found.
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 */
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment