mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-20 18:17:20 +00:00
Code Issues Releases Activity

(Vmotif_version_string) [USE_MOTIF]: New variable.

Browse Source 
(syms_of_xfns): DEFVAR_LISP it.  Initialize from XmVERSION_STRING.
This commit is contained in:
Gerd Moellmann 2001-04-05 13:07:22 +00:00
parent 81a81c0fd1
commit fc2cdd9a0f
1 changed files with 15 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

17
src/xfns.c
View File

@ -107,6 +107,14 @@ extern XFontStruct *xlwmenu_default_font;
extern void free_frame_menubar (); extern void free_frame_menubar ();
extern double atof (); extern double atof ();
#ifdef USE_MOTIF
/* LessTif/Motif version info. */
static Lisp_Object Vmotif_version_string;
#endif /* USE_MOTIF */
#endif /* USE_X_TOOLKIT */ #endif /* USE_X_TOOLKIT */
#define min(a,b) ((a) < (b) ? (a) : (b)) #define min(a,b) ((a) < (b) ? (a) : (b))
@ -11521,10 +11529,15 @@ meaning don't clear the cache.");
#ifdef USE_X_TOOLKIT #ifdef USE_X_TOOLKIT
Fprovide (intern ("x-toolkit")); Fprovide (intern ("x-toolkit"));
#endif
#ifdef USE_MOTIF #ifdef USE_MOTIF
Fprovide (intern ("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); defsubr (&Sx_get_resource);