Mercurial > emacs
changeset 91671:7d8392863f85
* xfaces.c (Finternal_make_lisp_face): Use ASET.
author | Stefan Monnier <monnier@iro.umontreal.ca> |
---|---|
date | Fri, 08 Feb 2008 16:24:46 +0000 |
parents | a06d59678f5a |
children | e78323082141 |
files | src/ChangeLog src/xfaces.c |
diffstat | 2 files changed, 5 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/src/ChangeLog Fri Feb 08 16:23:19 2008 +0000 +++ b/src/ChangeLog Fri Feb 08 16:24:46 2008 +0000 @@ -2,6 +2,7 @@ * keymap.c (Fkey_description): Move side effect outside of macro call. + * xfaces.c (Finternal_make_lisp_face): * keyboard.c (add_command_key, parse_menu_item): Use ASET. * fontset.c (free_face_fontset): Use FONTSET_FROM_ID.
--- a/src/xfaces.c Fri Feb 08 16:23:19 2008 +0000 +++ b/src/xfaces.c Fri Feb 08 16:24:46 2008 +0000 @@ -4101,7 +4101,7 @@ { global_lface = Fmake_vector (make_number (LFACE_VECTOR_SIZE), Qunspecified); - AREF (global_lface, 0) = Qface; + ASET (global_lface, 0, Qface); Vface_new_frame_defaults = Fcons (Fcons (face, global_lface), Vface_new_frame_defaults); @@ -4123,7 +4123,7 @@ } else if (f == NULL) for (i = 1; i < LFACE_VECTOR_SIZE; ++i) - AREF (global_lface, i) = Qunspecified; + ASET (global_lface, i, Qunspecified); /* Add a frame-local definition. */ if (f) @@ -4132,12 +4132,12 @@ { lface = Fmake_vector (make_number (LFACE_VECTOR_SIZE), Qunspecified); - AREF (lface, 0) = Qface; + ASET (lface, 0, Qface); f->face_alist = Fcons (Fcons (face, lface), f->face_alist); } else for (i = 1; i < LFACE_VECTOR_SIZE; ++i) - AREF (lface, i) = Qunspecified; + ASET (lface, i, Qunspecified); } else lface = global_lface;