diff options
| author | Kenichi Handa <handa@etlken> | 2010-07-26 13:28:02 +0900 |
|---|---|---|
| committer | Kenichi Handa <handa@etlken> | 2010-07-26 13:28:02 +0900 |
| commit | dfe3c90fa5974e200483297e11bb889d0589b8f5 (patch) | |
| tree | 50c603b0bf35940798797e011859da695a69cf2a /src/font.c | |
| parent | dd86ea1155171345fd2e5bdae2cc2439ab851bc9 (diff) | |
| download | emacs-dfe3c90fa5974e200483297e11bb889d0589b8f5.tar.gz emacs-dfe3c90fa5974e200483297e11bb889d0589b8f5.tar.bz2 emacs-dfe3c90fa5974e200483297e11bb889d0589b8f5.zip | |
font.c (Ffont_shape_gstring): Terminate GSTRING by nil if the number of glyphs gets smaller than the original length.
Diffstat (limited to 'src/font.c')
| -rw-r--r-- | src/font.c | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/font.c b/src/font.c index cb3e9c5d326..ed4da9c75ac 100644 --- a/src/font.c +++ b/src/font.c @@ -4492,6 +4492,8 @@ created glyph-string. Otherwise, the value is nil. */) } if (i == 3 || XINT (n) == 0) return Qnil; + if (XINT (n) < LGSTRING_GLYPH_LEN (gstring)) + LGSTRING_SET_GLYPH (gstring, XINT (n), Qnil); glyph = LGSTRING_GLYPH (gstring, 0); from = LGLYPH_FROM (glyph); |