Commit fc2cdd9a authored by Gerd Moellmann's avatar Gerd Moellmann
Browse files

(Vmotif_version_string) [USE_MOTIF]: New variable.

(syms_of_xfns): DEFVAR_LISP it.  Initialize from XmVERSION_STRING.
parent 81a81c0f
......@@ -107,6 +107,14 @@ extern XFontStruct *xlwmenu_default_font;
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 @@ meaning don't clear the cache.");
#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);
......
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