diff options
| author | Noam Postavsky <npostavs@gmail.com> | 2020-02-25 20:09:00 -0500 |
|---|---|---|
| committer | Noam Postavsky <npostavs@gmail.com> | 2020-02-25 20:12:57 -0500 |
| commit | af519a634878dd8e72f8276d82601b6562029107 (patch) | |
| tree | 7db14bc48ab7a21a169ad6a1456b5f6700291503 | |
| parent | 9ec6eb1065c65b32e9a565a6b66298aa4f2e527c (diff) | |
| download | emacs-af519a634878dd8e72f8276d82601b6562029107.tar.gz | |
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.
| -rw-r--r-- | src/gnutls.c | 19 |
1 files changed, 12 insertions, 7 deletions
diff --git a/src/gnutls.c b/src/gnutls.c index 31fcd37c0a6..70176c41cdd 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); |