diff options
author | Gerd Moellmann <[email protected]> | 2001-04-05 13:07:22 +0000 |
---|---|---|
committer | Gerd Moellmann <[email protected]> | 2001-04-05 13:07:22 +0000 |
commit | fc2cdd9a0fa5a7ee9c02d4e83459878568d07030 (patch) | |
tree | 8c2744adbbd6c75a0a7e5a666269d4e6e643a05d /src/xfns.c | |
parent | 81a81c0fd1ba782e16216900ada3d4afe6c0ba05 (diff) |
(Vmotif_version_string) [USE_MOTIF]: New variable.
(syms_of_xfns): DEFVAR_LISP it. Initialize from XmVERSION_STRING.
Diffstat (limited to 'src/xfns.c')
-rw-r--r-- | src/xfns.c | 17 |
1 files changed, 15 insertions, 2 deletions
diff --git a/src/xfns.c b/src/xfns.c index 37663e35e0..1e14bc80fe 100644 --- a/src/xfns.c +++ b/src/xfns.c @@ -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); |