diff options
| author | Dmitry Antipov | 2012-07-31 16:36:19 +0400 |
|---|---|---|
| committer | Dmitry Antipov | 2012-07-31 16:36:19 +0400 |
| commit | e34f7f79833a23586d32fe522b547a0d9a696c13 (patch) | |
| tree | 4a2d3927202cb91b474bc9648ca9dee2bffaa54a /src/term.c | |
| parent | c09bfb2f140b2885af17185634451e2abfd6e91c (diff) | |
| download | emacs-e34f7f79833a23586d32fe522b547a0d9a696c13.tar.gz emacs-e34f7f79833a23586d32fe522b547a0d9a696c13.zip | |
Generalize INTERNAL_FIELD between buffers, keyboards and frames.
* src/lisp.h (INTERNAL_FIELD): New macro.
* src/buffer.h (BUFFER_INTERNAL_FIELD): Removed.
(BVAR): Change to use INTERNAL_FIELD.
* src/keyboard.h (KBOARD_INTERNAL_FIELD): Likewise.
(KVAR): Change to use INTERNAL_FIELD.
* src/frame.h (FVAR): New macro.
(struct frame): Use INTERNAL_FIELD for all Lisp_Object fields.
* src/alloc.c, src/buffer.c, src/data.c, src/dispnew.c, src/dosfns.c
* src/eval.c, src/frame.c, src/fringe.c, src/gtkutil.c, src/minibuf.c
* src/nsfns.m, src/nsterm.m, src/print.c, src/term.c, src/w32fns.c
* src/w32menu.c, src/w32term.c, src/window.c, src/window.h, src/xdisp.c
* src/xfaces.c, src/xfns.c, src/xmenu.c, src/xterm.c: Users changed.
* admin/coccinelle/frame.cocci: Semantic patch to replace direct
access to Lisp_Object members of struct frame to FVAR.
Diffstat (limited to 'src/term.c')
| -rw-r--r-- | src/term.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/term.c b/src/term.c index f24caeffebb..803bb6458b6 100644 --- a/src/term.c +++ b/src/term.c | |||
| @@ -2192,7 +2192,7 @@ set_tty_color_mode (struct tty_display_info *tty, struct frame *f) | |||
| 2192 | Lisp_Object tty_color_mode_alist | 2192 | Lisp_Object tty_color_mode_alist |
| 2193 | = Fintern_soft (build_string ("tty-color-mode-alist"), Qnil); | 2193 | = Fintern_soft (build_string ("tty-color-mode-alist"), Qnil); |
| 2194 | 2194 | ||
| 2195 | tem = assq_no_quit (Qtty_color_mode, f->param_alist); | 2195 | tem = assq_no_quit (Qtty_color_mode, FVAR (f, param_alist)); |
| 2196 | val = CONSP (tem) ? XCDR (tem) : Qnil; | 2196 | val = CONSP (tem) ? XCDR (tem) : Qnil; |
| 2197 | 2197 | ||
| 2198 | if (INTEGERP (val)) | 2198 | if (INTEGERP (val)) |