Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
What's new
10
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
484ca464
Commit
484ca464
authored
Jul 26, 2006
by
Kenichi Handa
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
*** empty log message ***
parent
417a1b10
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
32 additions
and
0 deletions
+32
-0
src/ChangeLog.unicode
src/ChangeLog.unicode
+27
-0
src/font.h
src/font.h
+5
-0
No files found.
src/ChangeLog.unicode
View file @
484ca464
2006-07-26 Kenichi Handa <handa@m17n.org>
* font.h (struct font_driver_list): New member `on'.
(Fclear_font_cache): EXFUN it.
(font_update_drivers): Extern it.
* font.c (font_unparse_fcname): Fix typo (swidth->width).
(font_list_entities): Check driver_list->on.
(register_font_driver): Initalize `on' member to 0.
(font_update_drivers): New function.
(Fclear_font_cache): Check driver_list->on.
* frame.h (Qfont_backend): Extern it.
(x_set_font_backend): Extern it.
* frame.c (Qfont_backend): New variable.
(frame_parms): New element for font-backend.
(x_set_font_backend): New function.
* xfns.c (x_create_tip_frame) [USE_FONT_BACKEND]: Handle
FontBackend frame parameter.
(x_frame_parm_handlers) [USE_FONT_BACKEND]: New element
x_set_font_backend.
* xfont.c (xfont_list): Don't try listing by :name property if the
name is not for XLFD.
2006-07-24 Kenichi Handa <handa@m17n.org>
* font.h (LGLYPH_FROM, LGLYPH_TO, LGLYPH_SET_FROM)
...
...
src/font.h
View file @
484ca464
...
...
@@ -424,6 +424,8 @@ struct font_driver
struct
font_driver_list
{
/* 1 iff this driver is currently used. */
int
on
;
struct
font_driver
*
driver
;
struct
font_driver_list
*
next
;
};
...
...
@@ -432,6 +434,7 @@ extern int enable_font_backend;
EXFUN
(
Ffont_spec
,
MANY
);
EXFUN
(
Flist_fonts
,
4
);
EXFUN
(
Fclear_font_cache
,
0
);
extern
Lisp_Object
font_symbolic_weight
P_
((
Lisp_Object
font
));
extern
Lisp_Object
font_symbolic_slant
P_
((
Lisp_Object
font
));
...
...
@@ -474,6 +477,8 @@ extern int font_unparse_fcname P_ ((Lisp_Object font, int pixel_size,
char
*
name
,
int
bytes
));
extern
void
register_font_driver
P_
((
struct
font_driver
*
driver
,
FRAME_PTR
f
));
extern
void
free_font_driver_list
P_
((
FRAME_PTR
f
));
extern
void
font_update_drivers
P_
((
FRAME_PTR
f
,
Lisp_Object
name_list
,
struct
font
*
));
extern
Lisp_Object
font_at
P_
((
int
c
,
EMACS_INT
pos
,
struct
face
*
face
,
struct
window
*
w
,
Lisp_Object
object
));
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment