[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
emacs-27 af519a6: Define libgnutls-version properly
From: |
Noam Postavsky |
Subject: |
emacs-27 af519a6: Define libgnutls-version properly |
Date: |
Tue, 25 Feb 2020 20:13:44 -0500 (EST) |
branch: emacs-27
commit af519a634878dd8e72f8276d82601b6562029107
Author: Noam Postavsky <address@hidden>
Commit: Noam Postavsky <address@hidden>
Define libgnutls-version properly
* src/gnutls.c (syms_of_gnutls) <libgnutls-version>: Define with
DEFVAR_LISP and add docstring, so that this variable will accessible by
help facilities.
---
src/gnutls.c | 19 ++++++++++++-------
1 file changed, 12 insertions(+), 7 deletions(-)
diff --git a/src/gnutls.c b/src/gnutls.c
index 31fcd37..70176c4 100644
--- a/src/gnutls.c
+++ b/src/gnutls.c
@@ -2834,16 +2834,21 @@ Any GnuTLS extension with ID up to 100
void
syms_of_gnutls (void)
{
- DEFSYM (Qlibgnutls_version, "libgnutls-version");
- Fset (Qlibgnutls_version,
+ DEFVAR_LISP ("libgnutls-version", Vlibgnutls_version,
+ doc: /* The version of libgnutls that Emacs was compiled with.
+The version number is encoded as an integer with the major version in
+the ten thousands place, minor version in the hundreds, and patch
+level in the ones. For builds without libgnutls, the value is -1. */);
+ Vlibgnutls_version = make_fixnum
#ifdef HAVE_GNUTLS
- make_fixnum (GNUTLS_VERSION_MAJOR * 10000
- + GNUTLS_VERSION_MINOR * 100
- + GNUTLS_VERSION_PATCH)
+ (GNUTLS_VERSION_MAJOR * 10000
+ + GNUTLS_VERSION_MINOR * 100
+ + GNUTLS_VERSION_PATCH)
#else
- make_fixnum (-1)
+ (-1)
#endif
- );
+ ;
+
#ifdef HAVE_GNUTLS
gnutls_global_initialized = 0;
PDUMPER_IGNORE (gnutls_global_initialized);
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- emacs-27 af519a6: Define libgnutls-version properly,
Noam Postavsky <=