Mercurial > emacs
view lisp/toolbar/mail_send.xpm @ 55244:c5bad07bbb95
(init_iterator): Handle line-spacing float value.
Initialize override_ascent member.
(append_space_for_newline): Reset override_ascent.
Remove use_default_face.
(calc_line_height_property): New function to calculate value of
line-height and line-spacing properties. Look at overlays, too.
Set override_ascent, override_descent, override_boff members when
using another face than the current face. Float values are now
relative to the frame default font, by default; accept a cons
of ratio and face name to specify value relative to a specific face.
(x_produce_glyphs): Use calc_line_height_property.
Use override_ascent etc. when set to handle different face heights.
A negative line-spacing property value is interpreted as a total
line height, rather than inter-line spacing.
(note_mouse_highlight): Allocate room for 40 overlays initially.
author | Kim F. Storm <storm@cua.dk> |
---|---|
date | Thu, 29 Apr 2004 22:37:52 +0000 |
parents | 8f4a34146a9d |
children |
line wrap: on
line source
/* XPM */ static char *magick[] = { /* columns rows colors chars-per-pixel */ "24 24 9 1", " c Gray0", ". c #675e6580613e", "X c #8c8c7c7c6969", "o c #9b458d377822", "O c #a941a6459f3e", "+ c #c8c8b2b29898", "@ c #dadac2c2a5a5", "# c #eb4dea2fe4ad", "$ c None", /* pixels */ "$$$$$$$$$$$$$$$$$$$$$$$$", "$$$$$$$$$$$$$$$$$$$$$$$$", "$$$$$$$$$$$$$ $$$$$$$", "$$$$$$$$ .@#+ $$$$$$", "$$$ .+#####@O $$$$$$", "$$ .+##########.+O $$$$$", "$$ @..########O.+# $$$$$", "$$ O@O..@#####.+## $$$$$", "$$$ ###+O.O##...##O $$$$", "$$$ @####@+..O#O.+# $$$$", "$$$ O####.#######.O $$$$", "$$$$ ###+O########.O $$$", "$$$$ ###.########@O $$$", "$$$$ +#+O#####@O $$$$$", "$$$$$ #.###@O $$$$$$", "$$$$$ .O@O $$ .. $$$$$", "$$$$$ .. $$$$ .oo. $$$$", "$$$$$$ $$$$$ oo $$$", "$$$$$$$$$$$$$$$ Oo $$$$$", "$$$$$$$$$$$$$$ oOOX $$$$", "$$$$$$$$$$$$$$ ++++ $$$$", "$$$$$$$$$$$$$ O@@@@O $$$", "$$$$$$$$$$$$$ $$$", "$$$$$$$$$$$$$$$$$$$$$$$$" };