diff options
author | Dmitry Antipov <dmantipov@yandex.ru> | 2012-08-13 07:44:27 +0400 |
---|---|---|
committer | Dmitry Antipov <dmantipov@yandex.ru> | 2012-08-13 07:44:27 +0400 |
commit | 7864a3f729e9bd78f17deefec428a6db41742c82 (patch) | |
tree | 35be2792b8dc2716b43b096ff81d4f107427a158 /src/frame.c | |
parent | 4c31be6153255dfe29a0231253263ea0d9011ac3 (diff) | |
download | emacs-7864a3f729e9bd78f17deefec428a6db41742c82.tar.gz |
Use KSET for write access to Lisp_Object members of struct kboard.
* keyboard.h (KSET): New macro.
* callint.c, category.c, frame.c, keyboard.c, keyboard.h, macros.c:
* msdos.c, nsfns.m, nsterm.m, term.c, w32fns.c, w32term.c, xfns.c:
* xterm.c: Adjust users.
Diffstat (limited to 'src/frame.c')
-rw-r--r-- | src/frame.c | 10 |
1 files changed, 5 insertions, 5 deletions
diff --git a/src/frame.c b/src/frame.c index 768cec4c7e7..b2990929058 100644 --- a/src/frame.c +++ b/src/frame.c @@ -393,8 +393,8 @@ make_frame_without_minibuffer (register Lisp_Object mini_window, KBOARD *kb, Lis XSETFRAME (frame_dummy, f); GCPRO1 (frame_dummy); /* If there's no minibuffer frame to use, create one. */ - KVAR (kb, Vdefault_minibuffer_frame) = - call1 (intern ("make-initial-minibuffer-frame"), display); + KSET (kb, Vdefault_minibuffer_frame, + call1 (intern ("make-initial-minibuffer-frame"), display)); UNGCPRO; } @@ -843,7 +843,7 @@ to that frame. */) (Lisp_Object event) { /* Preserve prefix arg that the command loop just cleared. */ - KVAR (current_kboard, Vprefix_arg) = Vcurrent_prefix_arg; + KSET (current_kboard, Vprefix_arg, Vcurrent_prefix_arg); Frun_hooks (1, &Qmouse_leave_buffer_hook); return do_switch_frame (event, 0, 0, Qnil); } @@ -1435,11 +1435,11 @@ delete_frame (Lisp_Object frame, Lisp_Object force) if (NILP (frame_with_minibuf)) abort (); - KVAR (kb, Vdefault_minibuffer_frame) = frame_with_minibuf; + KSET (kb, Vdefault_minibuffer_frame, frame_with_minibuf); } else /* No frames left on this kboard--say no minibuffer either. */ - KVAR (kb, Vdefault_minibuffer_frame) = Qnil; + KSET (kb, Vdefault_minibuffer_frame, Qnil); } /* Cause frame titles to update--necessary if we now have just one frame. */ |