mirrors/emacs
1
Fork 0
mirror of git://git.sv.gnu.org/emacs.git synced 2025-12-28 00:01:33 -08:00
Code Issues Projects Releases Wiki Activity

(Ffont_info): Define only if HAVE_WINDOW_SYSTEM is

Browse source 
defined.
(syms_of_font): Defsubr Sfont_info only if HAVE_WINDOW_SYSTEM is
defined.
This commit is contained in:
Kenichi Handa 2008-05-30 13:21:57 +00:00
parent 30235d57db
commit a266686a02
2 changed files with 12 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

7
src/ChangeLog
View file

@ -1,3 +1,10 @@
2008-05-30 Kenichi Handa <handa@m17n.org>
* font.c (Ffont_info): Define only if HAVE_WINDOW_SYSTEM is
defined.
(syms_of_font): Defsubr Sfont_info only if HAVE_WINDOW_SYSTEM is
defined.
2008-05-30 Stefan Monnier <monnier@iro.umontreal.ca>
* data.c (Fmake_variable_buffer_local, Fmake_local_variable)

5
src/font.c
View file

@ -4349,6 +4349,8 @@ Type C-l to recover what previously shown. */)
#endif /* FONT_DEBUG */
#ifdef HAVE_WINDOW_SYSTEM
DEFUN ("font-info", Ffont_info, Sfont_info, 1, 2, 0,
doc: /* Return information about a font named NAME on frame FRAME.
If FRAME is omitted or nil, use the selected frame.
@ -4420,6 +4422,7 @@ If the named font is not yet loaded, return nil. */)
#endif
return info;
}
#endif
#define BUILD_STYLE_TABLE(TBL) \
@ -4591,7 +4594,9 @@ syms_of_font ()
defsubr (&Sdraw_string);
#endif
#endif /* FONT_DEBUG */
#ifdef HAVE_WINDOW_SYSTEM
defsubr (&Sfont_info);
#endif
DEFVAR_LISP ("font-encoding-alist", &Vfont_encoding_alist,
doc: /*