# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 986476042 0
# Node ID 8b47704e015046600662d40f0c5f355d98596208
# Parent  ee53d19a78b4569a9c03ebd38d004a9d77935264
(Vmotif_version_string) [USE_MOTIF]: New variable.
(syms_of_xfns): DEFVAR_LISP it.  Initialize from XmVERSION_STRING.

diff -r ee53d19a78b4 -r 8b47704e0150 src/xfns.c
--- a/src/xfns.c	Thu Apr 05 12:29:24 2001 +0000
+++ b/src/xfns.c	Thu Apr 05 13:07:22 2001 +0000
@@ -107,6 +107,14 @@
 extern void free_frame_menubar ();
 extern double atof ();
 
+#ifdef USE_MOTIF
+
+/* LessTif/Motif version info.  */
+
+static Lisp_Object Vmotif_version_string;
+
+#endif /* USE_MOTIF */
+
 #endif /* USE_X_TOOLKIT */
 
 #define min(a,b) ((a) < (b) ? (a) : (b))
@@ -11521,10 +11529,15 @@
 
 #ifdef USE_X_TOOLKIT
   Fprovide (intern ("x-toolkit"));
-#endif
+  
 #ifdef USE_MOTIF
   Fprovide (intern ("motif"));
-#endif
+
+  DEFVAR_LISP ("motif-version-string", &Vmotif_version_string,
+     "Version info for LessTif/Motif.");
+  Vmotif_version_string = build_string (XmVERSION_STRING);
+#endif /* USE_MOTIF */
+#endif /* USE_X_TOOLKIT */
 
   defsubr (&Sx_get_resource);