aboutsummaryrefslogtreecommitdiffstats
path: root/src
diff options
context:
space:
mode:
Diffstat (limited to 'src')
-rw-r--r--src/alloc.c10
-rw-r--r--src/dispextern.h66
-rw-r--r--src/dispnew.c54
-rw-r--r--src/frame.c14
-rw-r--r--src/frame.h26
-rw-r--r--src/keyboard.c211
-rw-r--r--src/lisp.h4
-rw-r--r--src/termhooks.h6
-rw-r--r--src/window.c36
-rw-r--r--src/xfaces.c8
-rw-r--r--src/xfns.c24
-rw-r--r--src/xterm.c148
12 files changed, 304 insertions, 303 deletions
diff --git a/src/alloc.c b/src/alloc.c
index 258a610886d..64f9e0ccd2b 100644
--- a/src/alloc.c
+++ b/src/alloc.c
@@ -2247,14 +2247,14 @@ mark_object (argptr)
2247 mark_object (&ptr->buffer_predicate); 2247 mark_object (&ptr->buffer_predicate);
2248 mark_object (&ptr->buffer_list); 2248 mark_object (&ptr->buffer_list);
2249 mark_object (&ptr->menu_bar_window); 2249 mark_object (&ptr->menu_bar_window);
2250 mark_object (&ptr->toolbar_window); 2250 mark_object (&ptr->tool_bar_window);
2251 mark_face_cache (ptr->face_cache); 2251 mark_face_cache (ptr->face_cache);
2252#ifdef HAVE_WINDOW_SYSTEM 2252#ifdef HAVE_WINDOW_SYSTEM
2253 mark_image_cache (ptr); 2253 mark_image_cache (ptr);
2254 mark_object (&ptr->desired_toolbar_items); 2254 mark_object (&ptr->desired_tool_bar_items);
2255 mark_object (&ptr->current_toolbar_items); 2255 mark_object (&ptr->current_tool_bar_items);
2256 mark_object (&ptr->desired_toolbar_string); 2256 mark_object (&ptr->desired_tool_bar_string);
2257 mark_object (&ptr->current_toolbar_string); 2257 mark_object (&ptr->current_tool_bar_string);
2258#endif /* HAVE_WINDOW_SYSTEM */ 2258#endif /* HAVE_WINDOW_SYSTEM */
2259 } 2259 }
2260 else if (GC_BOOL_VECTOR_P (obj)) 2260 else if (GC_BOOL_VECTOR_P (obj))
diff --git a/src/dispextern.h b/src/dispextern.h
index 8163fc8ea31..622dc8a806b 100644
--- a/src/dispextern.h
+++ b/src/dispextern.h
@@ -1264,7 +1264,7 @@ enum face_id
1264{ 1264{
1265 DEFAULT_FACE_ID, 1265 DEFAULT_FACE_ID,
1266 MODE_LINE_FACE_ID, 1266 MODE_LINE_FACE_ID,
1267 TOOLBAR_FACE_ID, 1267 TOOL_BAR_FACE_ID,
1268 BITMAP_AREA_FACE_ID, 1268 BITMAP_AREA_FACE_ID,
1269 TOP_LINE_FACE_ID, 1269 TOP_LINE_FACE_ID,
1270 BASIC_FACE_ID_SENTINEL 1270 BASIC_FACE_ID_SENTINEL
@@ -1581,7 +1581,7 @@ struct it
1581 unsigned overlay_strings_at_end_processed_p : 1; 1581 unsigned overlay_strings_at_end_processed_p : 1;
1582 1582
1583 /* The ID of the default face to use. One of DEFAULT_FACE_ID, 1583 /* The ID of the default face to use. One of DEFAULT_FACE_ID,
1584 MODE_LINE_FACE_ID, or TOOLBAR_FACE_ID, depending on what we 1584 MODE_LINE_FACE_ID, or TOOL_BAR_FACE_ID, depending on what we
1585 are displaying. */ 1585 are displaying. */
1586 int base_face_id; 1586 int base_face_id;
1587 1587
@@ -1961,69 +1961,69 @@ struct image_cache
1961 1961
1962 1962
1963/*********************************************************************** 1963/***********************************************************************
1964 Toolbars 1964 Tool-bars
1965 ***********************************************************************/ 1965 ***********************************************************************/
1966 1966
1967/* Enumeration defining where to find toolbar item information in 1967/* Enumeration defining where to find tool-bar item information in
1968 toolbar items vectors stored with frames. Each toolbar item 1968 tool-bar items vectors stored with frames. Each tool-bar item
1969 occupies TOOLBAR_ITEM_NSLOTS elements in such a vector. */ 1969 occupies TOOL_BAR_ITEM_NSLOTS elements in such a vector. */
1970 1970
1971enum toolbar_item_idx 1971enum tool_bar_item_idx
1972{ 1972{
1973 /* The key of the toolbar item. Used to remove items when a binding 1973 /* The key of the tool-bar item. Used to remove items when a binding
1974 for `undefined' is found. */ 1974 for `undefined' is found. */
1975 TOOLBAR_ITEM_KEY, 1975 TOOL_BAR_ITEM_KEY,
1976 1976
1977 /* Non-nil if item is enabled. */ 1977 /* Non-nil if item is enabled. */
1978 TOOLBAR_ITEM_ENABLED_P, 1978 TOOL_BAR_ITEM_ENABLED_P,
1979 1979
1980 /* Non-nil if item is selected (pressed). */ 1980 /* Non-nil if item is selected (pressed). */
1981 TOOLBAR_ITEM_SELECTED_P, 1981 TOOL_BAR_ITEM_SELECTED_P,
1982 1982
1983 /* Caption. */ 1983 /* Caption. */
1984 TOOLBAR_ITEM_CAPTION, 1984 TOOL_BAR_ITEM_CAPTION,
1985 1985
1986 /* Image(s) to display. This is either a single image specification 1986 /* Image(s) to display. This is either a single image specification
1987 or a vector of specifications. */ 1987 or a vector of specifications. */
1988 TOOLBAR_ITEM_IMAGES, 1988 TOOL_BAR_ITEM_IMAGES,
1989 1989
1990 /* The binding. */ 1990 /* The binding. */
1991 TOOLBAR_ITEM_BINDING, 1991 TOOL_BAR_ITEM_BINDING,
1992 1992
1993 /* Button type. One of nil, `:radio' or `:toggle'. */ 1993 /* Button type. One of nil, `:radio' or `:toggle'. */
1994 TOOLBAR_ITEM_TYPE, 1994 TOOL_BAR_ITEM_TYPE,
1995 1995
1996 /* Help string. */ 1996 /* Help string. */
1997 TOOLBAR_ITEM_HELP, 1997 TOOL_BAR_ITEM_HELP,
1998 1998
1999 /* Sentinel = number of slots in toolbar_items occupied by one 1999 /* Sentinel = number of slots in tool_bar_items occupied by one
2000 toolbar item. */ 2000 tool-bar item. */
2001 TOOLBAR_ITEM_NSLOTS 2001 TOOL_BAR_ITEM_NSLOTS
2002}; 2002};
2003 2003
2004 2004
2005/* An enumeration for the different images that can be specified 2005/* An enumeration for the different images that can be specified
2006 for a toolbar item. */ 2006 for a tool-bar item. */
2007 2007
2008enum toolbar_item_image 2008enum tool_bar_item_image
2009{ 2009{
2010 TOOLBAR_IMAGE_ENABLED_SELECTED, 2010 TOOL_BAR_IMAGE_ENABLED_SELECTED,
2011 TOOLBAR_IMAGE_ENABLED_DESELECTED, 2011 TOOL_BAR_IMAGE_ENABLED_DESELECTED,
2012 TOOLBAR_IMAGE_DISABLED_SELECTED, 2012 TOOL_BAR_IMAGE_DISABLED_SELECTED,
2013 TOOLBAR_IMAGE_DISABLED_DESELECTED 2013 TOOL_BAR_IMAGE_DISABLED_DESELECTED
2014}; 2014};
2015 2015
2016/* Non-zero means raise toolbar buttons when the mouse moves over them. */ 2016/* Non-zero means raise tool-bar buttons when the mouse moves over them. */
2017 2017
2018extern int auto_raise_toolbar_buttons_p; 2018extern int auto_raise_tool_bar_buttons_p;
2019 2019
2020/* Margin around toolbar buttons in pixels. */ 2020/* Margin around tool-bar buttons in pixels. */
2021 2021
2022extern int toolbar_button_margin; 2022extern int tool_bar_button_margin;
2023 2023
2024/* Thickness of relief to draw around toolbar buttons. */ 2024/* Thickness of relief to draw around tool-bar buttons. */
2025 2025
2026extern int toolbar_button_relief; 2026extern int tool_bar_button_relief;
2027 2027
2028 2028
2029 2029
@@ -2060,8 +2060,8 @@ void move_it_vertically P_ ((struct it *, int));
2060void move_it_by_lines P_ ((struct it *, int, int)); 2060void move_it_by_lines P_ ((struct it *, int, int));
2061int frame_mode_line_height P_ ((struct frame *)); 2061int frame_mode_line_height P_ ((struct frame *));
2062void highlight_trailing_whitespace P_ ((struct frame *, struct glyph_row *)); 2062void highlight_trailing_whitespace P_ ((struct frame *, struct glyph_row *));
2063int toolbar_item_info P_ ((struct frame *, struct glyph *, int *)); 2063int tool_bar_item_info P_ ((struct frame *, struct glyph *, int *));
2064extern Lisp_Object Qtoolbar; 2064extern Lisp_Object Qtool_bar;
2065extern Lisp_Object Vshow_trailing_whitespace; 2065extern Lisp_Object Vshow_trailing_whitespace;
2066extern int redisplaying_p; 2066extern int redisplaying_p;
2067 2067
diff --git a/src/dispnew.c b/src/dispnew.c
index 169b64e7dbf..b21f5796e01 100644
--- a/src/dispnew.c
+++ b/src/dispnew.c
@@ -885,9 +885,9 @@ clear_current_matrices (f)
885 if (WINDOWP (f->menu_bar_window)) 885 if (WINDOWP (f->menu_bar_window))
886 clear_glyph_matrix (XWINDOW (f->menu_bar_window)->current_matrix); 886 clear_glyph_matrix (XWINDOW (f->menu_bar_window)->current_matrix);
887 887
888 /* Clear the matrix of the toolbar window, if any. */ 888 /* Clear the matrix of the tool-bar window, if any. */
889 if (WINDOWP (f->toolbar_window)) 889 if (WINDOWP (f->tool_bar_window))
890 clear_glyph_matrix (XWINDOW (f->toolbar_window)->current_matrix); 890 clear_glyph_matrix (XWINDOW (f->tool_bar_window)->current_matrix);
891 891
892 /* Clear current window matrices. */ 892 /* Clear current window matrices. */
893 xassert (WINDOWP (FRAME_ROOT_WINDOW (f))); 893 xassert (WINDOWP (FRAME_ROOT_WINDOW (f)));
@@ -907,8 +907,8 @@ clear_desired_matrices (f)
907 if (WINDOWP (f->menu_bar_window)) 907 if (WINDOWP (f->menu_bar_window))
908 clear_glyph_matrix (XWINDOW (f->menu_bar_window)->desired_matrix); 908 clear_glyph_matrix (XWINDOW (f->menu_bar_window)->desired_matrix);
909 909
910 if (WINDOWP (f->toolbar_window)) 910 if (WINDOWP (f->tool_bar_window))
911 clear_glyph_matrix (XWINDOW (f->toolbar_window)->desired_matrix); 911 clear_glyph_matrix (XWINDOW (f->tool_bar_window)->desired_matrix);
912 912
913 /* Do it for window matrices. */ 913 /* Do it for window matrices. */
914 xassert (WINDOWP (FRAME_ROOT_WINDOW (f))); 914 xassert (WINDOWP (FRAME_ROOT_WINDOW (f)));
@@ -2076,21 +2076,21 @@ adjust_frame_glyphs_for_window_redisplay (f)
2076 } 2076 }
2077#endif /* not USE_X_TOOLKIT */ 2077#endif /* not USE_X_TOOLKIT */
2078 2078
2079 /* Allocate/ reallocate matrices of the toolbar window. If we don't 2079 /* Allocate/ reallocate matrices of the tool bar window. If we
2080 have a toolbar window yet, make one. */ 2080 don't have a tool bar window yet, make one. */
2081 if (NILP (f->toolbar_window)) 2081 if (NILP (f->tool_bar_window))
2082 { 2082 {
2083 f->toolbar_window = make_window (); 2083 f->tool_bar_window = make_window ();
2084 w = XWINDOW (f->toolbar_window); 2084 w = XWINDOW (f->tool_bar_window);
2085 XSETFRAME (w->frame, f); 2085 XSETFRAME (w->frame, f);
2086 w->pseudo_window_p = 1; 2086 w->pseudo_window_p = 1;
2087 } 2087 }
2088 else 2088 else
2089 w = XWINDOW (f->toolbar_window); 2089 w = XWINDOW (f->tool_bar_window);
2090 2090
2091 XSETFASTINT (w->top, FRAME_MENU_BAR_LINES (f)); 2091 XSETFASTINT (w->top, FRAME_MENU_BAR_LINES (f));
2092 XSETFASTINT (w->left, 0); 2092 XSETFASTINT (w->left, 0);
2093 XSETFASTINT (w->height, FRAME_TOOLBAR_LINES (f)); 2093 XSETFASTINT (w->height, FRAME_TOOL_BAR_LINES (f));
2094 XSETFASTINT (w->width, FRAME_WINDOW_WIDTH (f)); 2094 XSETFASTINT (w->width, FRAME_WINDOW_WIDTH (f));
2095 allocate_matrices_for_window_redisplay (w, ch_dim); 2095 allocate_matrices_for_window_redisplay (w, ch_dim);
2096} 2096}
@@ -2167,14 +2167,14 @@ free_glyphs (f)
2167 f->menu_bar_window = Qnil; 2167 f->menu_bar_window = Qnil;
2168 } 2168 }
2169 2169
2170 /* Free the toolbar window and its glyph matrices. */ 2170 /* Free the tool bar window and its glyph matrices. */
2171 if (!NILP (f->toolbar_window)) 2171 if (!NILP (f->tool_bar_window))
2172 { 2172 {
2173 struct window *w = XWINDOW (f->toolbar_window); 2173 struct window *w = XWINDOW (f->tool_bar_window);
2174 free_glyph_matrix (w->desired_matrix); 2174 free_glyph_matrix (w->desired_matrix);
2175 free_glyph_matrix (w->current_matrix); 2175 free_glyph_matrix (w->current_matrix);
2176 w->desired_matrix = w->current_matrix = NULL; 2176 w->desired_matrix = w->current_matrix = NULL;
2177 f->toolbar_window = Qnil; 2177 f->tool_bar_window = Qnil;
2178 } 2178 }
2179 2179
2180 /* Release frame glyph matrices. Reset fields to zero in 2180 /* Release frame glyph matrices. Reset fields to zero in
@@ -3352,10 +3352,10 @@ update_frame (f, force_p, inhibit_hairy_id_p)
3352 update_window (XWINDOW (f->menu_bar_window), 1); 3352 update_window (XWINDOW (f->menu_bar_window), 1);
3353 3353
3354 /* Update the tool-bar window, if present. */ 3354 /* Update the tool-bar window, if present. */
3355 if (WINDOWP (f->toolbar_window)) 3355 if (WINDOWP (f->tool_bar_window))
3356 { 3356 {
3357 Lisp_Object tem; 3357 Lisp_Object tem;
3358 struct window *w = XWINDOW (f->toolbar_window); 3358 struct window *w = XWINDOW (f->tool_bar_window);
3359 3359
3360 /* Update tool-bar window. */ 3360 /* Update tool-bar window. */
3361 if (w->must_be_updated_p) 3361 if (w->must_be_updated_p)
@@ -3365,16 +3365,16 @@ update_frame (f, force_p, inhibit_hairy_id_p)
3365 3365
3366 /* Swap tool-bar strings. We swap because we want to 3366 /* Swap tool-bar strings. We swap because we want to
3367 reuse strings. */ 3367 reuse strings. */
3368 tem = f->current_toolbar_string; 3368 tem = f->current_tool_bar_string;
3369 f->current_toolbar_string = f->desired_toolbar_string; 3369 f->current_tool_bar_string = f->desired_tool_bar_string;
3370 f->desired_toolbar_string = tem; 3370 f->desired_tool_bar_string = tem;
3371 f->n_current_toolbar_items = f->n_desired_toolbar_items; 3371 f->n_current_tool_bar_items = f->n_desired_tool_bar_items;
3372 3372
3373 /* Swap tool-bar items. We swap because we want to 3373 /* Swap tool-bar items. We swap because we want to
3374 reuse vectors. */ 3374 reuse vectors. */
3375 tem = f->current_toolbar_items; 3375 tem = f->current_tool_bar_items;
3376 f->current_toolbar_items = f->desired_toolbar_items; 3376 f->current_tool_bar_items = f->desired_tool_bar_items;
3377 f->desired_toolbar_items = tem; 3377 f->desired_tool_bar_items = tem;
3378 } 3378 }
3379 } 3379 }
3380 3380
@@ -5336,8 +5336,8 @@ change_frame_size_1 (f, newheight, newwidth, pretend, delay, safe)
5336 if (FRAME_TERMCAP_P (f) && !pretend) 5336 if (FRAME_TERMCAP_P (f) && !pretend)
5337 FrameCols = newwidth; 5337 FrameCols = newwidth;
5338 5338
5339 if (WINDOWP (f->toolbar_window)) 5339 if (WINDOWP (f->tool_bar_window))
5340 XSETFASTINT (XWINDOW (f->toolbar_window)->width, newwidth); 5340 XSETFASTINT (XWINDOW (f->tool_bar_window)->width, newwidth);
5341 } 5341 }
5342 5342
5343 FRAME_HEIGHT (f) = newheight; 5343 FRAME_HEIGHT (f) = newheight;
diff --git a/src/frame.c b/src/frame.c
index bfd4b2d4919..45cb23b6f22 100644
--- a/src/frame.c
+++ b/src/frame.c
@@ -90,7 +90,7 @@ Lisp_Object Qname;
90Lisp_Object Qonly; 90Lisp_Object Qonly;
91Lisp_Object Qunsplittable; 91Lisp_Object Qunsplittable;
92Lisp_Object Qmenu_bar_lines; 92Lisp_Object Qmenu_bar_lines;
93Lisp_Object Qtoolbar_lines; 93Lisp_Object Qtool_bar_lines;
94Lisp_Object Qwidth; 94Lisp_Object Qwidth;
95Lisp_Object Qx; 95Lisp_Object Qx;
96Lisp_Object Qw32; 96Lisp_Object Qw32;
@@ -128,8 +128,8 @@ syms_of_frame_1 ()
128 staticpro (&Qunsplittable); 128 staticpro (&Qunsplittable);
129 Qmenu_bar_lines = intern ("menu-bar-lines"); 129 Qmenu_bar_lines = intern ("menu-bar-lines");
130 staticpro (&Qmenu_bar_lines); 130 staticpro (&Qmenu_bar_lines);
131 Qtoolbar_lines = intern ("toolbar-lines"); 131 Qtool_bar_lines = intern ("tool-bar-lines");
132 staticpro (&Qtoolbar_lines); 132 staticpro (&Qtool_bar_lines);
133 Qwidth = intern ("width"); 133 Qwidth = intern ("width");
134 staticpro (&Qwidth); 134 staticpro (&Qwidth);
135 Qx = intern ("x"); 135 Qx = intern ("x");
@@ -329,10 +329,10 @@ make_frame (mini_p)
329 f->namebuf = 0; 329 f->namebuf = 0;
330 f->title = Qnil; 330 f->title = Qnil;
331 f->menu_bar_window = Qnil; 331 f->menu_bar_window = Qnil;
332 f->toolbar_window = Qnil; 332 f->tool_bar_window = Qnil;
333 f->desired_toolbar_items = f->current_toolbar_items = Qnil; 333 f->desired_tool_bar_items = f->current_tool_bar_items = Qnil;
334 f->desired_toolbar_string = f->current_toolbar_string = Qnil; 334 f->desired_tool_bar_string = f->current_tool_bar_string = Qnil;
335 f->n_desired_toolbar_items = f->n_current_toolbar_items = 0; 335 f->n_desired_tool_bar_items = f->n_current_tool_bar_items = 0;
336 336
337 root_window = make_window (); 337 root_window = make_window ();
338 if (mini_p) 338 if (mini_p)
diff --git a/src/frame.h b/src/frame.h
index 27a5c9715f5..1bbe48f55e6 100644
--- a/src/frame.h
+++ b/src/frame.h
@@ -148,14 +148,14 @@ struct frame
148 toolkit support is available. */ 148 toolkit support is available. */
149 Lisp_Object menu_bar_window; 149 Lisp_Object menu_bar_window;
150 150
151 /* A window used to display the toolbar of a frame. */ 151 /* A window used to display the tool-bar of a frame. */
152 Lisp_Object toolbar_window; 152 Lisp_Object tool_bar_window;
153 153
154 /* Desired and current toolbar items. */ 154 /* Desired and current tool-bar items. */
155 Lisp_Object desired_toolbar_items, current_toolbar_items; 155 Lisp_Object desired_tool_bar_items, current_tool_bar_items;
156 156
157 /* Desired and current contents displayed in toolbar_window. */ 157 /* Desired and current contents displayed in tool_bar_window. */
158 Lisp_Object desired_toolbar_string, current_toolbar_string; 158 Lisp_Object desired_tool_bar_string, current_tool_bar_string;
159 159
160 /* beyond here, there should be no more Lisp_Object components. */ 160 /* beyond here, there should be no more Lisp_Object components. */
161 161
@@ -176,11 +176,11 @@ struct frame
176 be used for output. */ 176 be used for output. */
177 unsigned glyphs_initialized_p : 1; 177 unsigned glyphs_initialized_p : 1;
178 178
179 /* Margin at the top of the frame. Used to display the toolbar. */ 179 /* Margin at the top of the frame. Used to display the tool-bar. */
180 int toolbar_lines; 180 int tool_bar_lines;
181 181
182 int n_desired_toolbar_items; 182 int n_desired_tool_bar_items;
183 int n_current_toolbar_items; 183 int n_current_tool_bar_items;
184 184
185 /* A buffer for decode_mode_line. */ 185 /* A buffer for decode_mode_line. */
186 char *decode_mode_spec_buffer; 186 char *decode_mode_spec_buffer;
@@ -412,14 +412,14 @@ typedef struct frame *FRAME_PTR;
412 These lines are counted in FRAME_HEIGHT. */ 412 These lines are counted in FRAME_HEIGHT. */
413#define FRAME_MENU_BAR_LINES(f) (f)->menu_bar_lines 413#define FRAME_MENU_BAR_LINES(f) (f)->menu_bar_lines
414 414
415/* Number of lines of frame F used for the toolbar. */ 415/* Number of lines of frame F used for the tool-bar. */
416 416
417#define FRAME_TOOLBAR_LINES(f) (f)->toolbar_lines 417#define FRAME_TOOL_BAR_LINES(f) (f)->tool_bar_lines
418 418
419/* Lines above the top-most window in frame F. */ 419/* Lines above the top-most window in frame F. */
420 420
421#define FRAME_TOP_MARGIN(F) \ 421#define FRAME_TOP_MARGIN(F) \
422 (FRAME_MENU_BAR_LINES (F) + FRAME_TOOLBAR_LINES (F)) 422 (FRAME_MENU_BAR_LINES (F) + FRAME_TOOL_BAR_LINES (F))
423 423
424/* Nonzero if this frame should display a menu bar 424/* Nonzero if this frame should display a menu bar
425 in a way that does not use any text lines. */ 425 in a way that does not use any text lines. */
diff --git a/src/keyboard.c b/src/keyboard.c
index 93feb45ca88..2dc7af7a8aa 100644
--- a/src/keyboard.c
+++ b/src/keyboard.c
@@ -2101,7 +2101,7 @@ read_char (commandflag, nmaps, maps, prev_event, used_mouse_menu)
2101 && !NILP (prev_event) 2101 && !NILP (prev_event)
2102 && EVENT_HAS_PARAMETERS (prev_event) 2102 && EVENT_HAS_PARAMETERS (prev_event)
2103 && !EQ (XCONS (prev_event)->car, Qmenu_bar) 2103 && !EQ (XCONS (prev_event)->car, Qmenu_bar)
2104 && !EQ (XCONS (prev_event)->car, Qtoolbar) 2104 && !EQ (XCONS (prev_event)->car, Qtool_bar)
2105 /* Don't bring up a menu if we already have another event. */ 2105 /* Don't bring up a menu if we already have another event. */
2106 && NILP (Vunread_command_events) 2106 && NILP (Vunread_command_events)
2107 && unread_command_char < 0) 2107 && unread_command_char < 0)
@@ -2354,7 +2354,7 @@ read_char (commandflag, nmaps, maps, prev_event, used_mouse_menu)
2354 posn = POSN_BUFFER_POSN (EVENT_START (c)); 2354 posn = POSN_BUFFER_POSN (EVENT_START (c));
2355 /* Handle menu-bar events: 2355 /* Handle menu-bar events:
2356 insert the dummy prefix event `menu-bar'. */ 2356 insert the dummy prefix event `menu-bar'. */
2357 if (EQ (posn, Qmenu_bar) || EQ (posn, Qtoolbar)) 2357 if (EQ (posn, Qmenu_bar) || EQ (posn, Qtool_bar))
2358 { 2358 {
2359 /* Change menu-bar to (menu-bar) as the event "position". */ 2359 /* Change menu-bar to (menu-bar) as the event "position". */
2360 POSN_BUFFER_POSN (EVENT_START (c)) = Fcons (posn, Qnil); 2360 POSN_BUFFER_POSN (EVENT_START (c)) = Fcons (posn, Qnil);
@@ -3185,9 +3185,9 @@ kbd_buffer_get_event (kbp, used_mouse_menu)
3185 beginning of the menu sequence, and we might as well leave 3185 beginning of the menu sequence, and we might as well leave
3186 that as the `event with parameters' for this selection. */ 3186 that as the `event with parameters' for this selection. */
3187 if ((event->kind == menu_bar_event 3187 if ((event->kind == menu_bar_event
3188 || event->kind == TOOLBAR_EVENT) 3188 || event->kind == TOOL_BAR_EVENT)
3189 && !(CONSP (obj) && EQ (XCONS (obj)->car, Qmenu_bar)) 3189 && !(CONSP (obj) && EQ (XCONS (obj)->car, Qmenu_bar))
3190 && !(CONSP (obj) && EQ (XCONS (obj)->car, Qtoolbar)) 3190 && !(CONSP (obj) && EQ (XCONS (obj)->car, Qtool_bar))
3191 && used_mouse_menu) 3191 && used_mouse_menu)
3192 *used_mouse_menu = 1; 3192 *used_mouse_menu = 1;
3193#endif 3193#endif
@@ -4680,7 +4680,7 @@ make_lispy_event (event)
4680 return XCONS (event->frame_or_window)->cdr; 4680 return XCONS (event->frame_or_window)->cdr;
4681#endif 4681#endif
4682 4682
4683 case TOOLBAR_EVENT: 4683 case TOOL_BAR_EVENT:
4684 { 4684 {
4685 Lisp_Object key; 4685 Lisp_Object key;
4686 if (!CONSP (event->frame_or_window)) 4686 if (!CONSP (event->frame_or_window))
@@ -6378,40 +6378,40 @@ parse_menu_item (item, notreal, inmenubar)
6378 Tool-bars 6378 Tool-bars
6379 ***********************************************************************/ 6379 ***********************************************************************/
6380 6380
6381/* A vector holding toolbar items while they are parsed in function 6381/* A vector holding tool bar items while they are parsed in function
6382 toolbar_items runs Each item occupies TOOLBAR_ITEM_NSCLOTS 6382 tool_bar_items runs Each item occupies TOOL_BAR_ITEM_NSCLOTS elements
6383 elements in the vector. */ 6383 in the vector. */
6384 6384
6385static Lisp_Object toolbar_items_vector; 6385static Lisp_Object tool_bar_items_vector;
6386 6386
6387/* A vector holding the result of parse_toolbar_item. Layout is like 6387/* A vector holding the result of parse_tool_bar_item. Layout is like
6388 the one for a single item in toolbar_items_vector. */ 6388 the one for a single item in tool_bar_items_vector. */
6389 6389
6390static Lisp_Object toolbar_item_properties; 6390static Lisp_Object tool_bar_item_properties;
6391 6391
6392/* Next free index in toolbar_items_vector. */ 6392/* Next free index in tool_bar_items_vector. */
6393 6393
6394static int ntoolbar_items; 6394static int ntool_bar_items;
6395 6395
6396/* The symbols `toolbar', `toolbar-item', and `:image'. */ 6396/* The symbols `tool-bar', and `:image'. */
6397 6397
6398extern Lisp_Object Qtoolbar; 6398extern Lisp_Object Qtool_bar;
6399Lisp_Object QCimage; 6399Lisp_Object QCimage;
6400 6400
6401/* Function prototypes. */ 6401/* Function prototypes. */
6402 6402
6403static void init_toolbar_items P_ ((Lisp_Object)); 6403static void init_tool_bar_items P_ ((Lisp_Object));
6404static void process_toolbar_item P_ ((Lisp_Object, Lisp_Object)); 6404static void process_tool_bar_item P_ ((Lisp_Object, Lisp_Object));
6405static int parse_toolbar_item P_ ((Lisp_Object, Lisp_Object)); 6405static int parse_tool_bar_item P_ ((Lisp_Object, Lisp_Object));
6406static void append_toolbar_item P_ ((void)); 6406static void append_tool_bar_item P_ ((void));
6407 6407
6408 6408
6409/* Return a vector of toolbar items for keymaps currently in effect. 6409/* Return a vector of tool bar items for keymaps currently in effect.
6410 Reuse vector REUSE if non-nil. Return in *NITEMS the number of 6410 Reuse vector REUSE if non-nil. Return in *NITEMS the number of
6411 toolbar items found. */ 6411 tool bar items found. */
6412 6412
6413Lisp_Object 6413Lisp_Object
6414toolbar_items (reuse, nitems) 6414tool_bar_items (reuse, nitems)
6415 Lisp_Object reuse; 6415 Lisp_Object reuse;
6416 int *nitems; 6416 int *nitems;
6417{ 6417{
@@ -6433,8 +6433,8 @@ toolbar_items (reuse, nitems)
6433 oquit = Vinhibit_quit; 6433 oquit = Vinhibit_quit;
6434 Vinhibit_quit = Qt; 6434 Vinhibit_quit = Qt;
6435 6435
6436 /* Initialize toolbar_items_vector and protect it from GC. */ 6436 /* Initialize tool_bar_items_vector and protect it from GC. */
6437 init_toolbar_items (reuse); 6437 init_tool_bar_items (reuse);
6438 6438
6439 /* Build list of keymaps in maps. Set nmaps to the number of maps 6439 /* Build list of keymaps in maps. Set nmaps to the number of maps
6440 to process. */ 6440 to process. */
@@ -6467,13 +6467,13 @@ toolbar_items (reuse, nitems)
6467 maps[nmaps++] = current_global_map; 6467 maps[nmaps++] = current_global_map;
6468 6468
6469 /* Process maps in reverse order and look up in each map the prefix 6469 /* Process maps in reverse order and look up in each map the prefix
6470 key `toolbar'. */ 6470 key `tool-bar'. */
6471 for (i = nmaps - 1; i >= 0; --i) 6471 for (i = nmaps - 1; i >= 0; --i)
6472 if (!NILP (maps[i])) 6472 if (!NILP (maps[i]))
6473 { 6473 {
6474 Lisp_Object keymap; 6474 Lisp_Object keymap;
6475 6475
6476 keymap = get_keyelt (access_keymap (maps[i], Qtoolbar, 1, 1), 0); 6476 keymap = get_keyelt (access_keymap (maps[i], Qtool_bar, 1, 1), 0);
6477 if (!NILP (Fkeymapp (keymap))) 6477 if (!NILP (Fkeymapp (keymap)))
6478 { 6478 {
6479 Lisp_Object tail; 6479 Lisp_Object tail;
@@ -6483,28 +6483,28 @@ toolbar_items (reuse, nitems)
6483 { 6483 {
6484 Lisp_Object keydef = XCAR (tail); 6484 Lisp_Object keydef = XCAR (tail);
6485 if (CONSP (keydef)) 6485 if (CONSP (keydef))
6486 process_toolbar_item (XCAR (keydef), XCDR (keydef)); 6486 process_tool_bar_item (XCAR (keydef), XCDR (keydef));
6487 } 6487 }
6488 } 6488 }
6489 } 6489 }
6490 6490
6491 Vinhibit_quit = oquit; 6491 Vinhibit_quit = oquit;
6492 *nitems = ntoolbar_items / TOOLBAR_ITEM_NSLOTS; 6492 *nitems = ntool_bar_items / TOOL_BAR_ITEM_NSLOTS;
6493 return toolbar_items_vector; 6493 return tool_bar_items_vector;
6494} 6494}
6495 6495
6496 6496
6497/* Process the definition of KEY which is DEF. */ 6497/* Process the definition of KEY which is DEF. */
6498 6498
6499static void 6499static void
6500process_toolbar_item (key, def) 6500process_tool_bar_item (key, def)
6501 Lisp_Object key, def; 6501 Lisp_Object key, def;
6502{ 6502{
6503 int i; 6503 int i;
6504 extern Lisp_Object Qundefined; 6504 extern Lisp_Object Qundefined;
6505 struct gcpro gcpro1, gcpro2; 6505 struct gcpro gcpro1, gcpro2;
6506 6506
6507 /* Protect KEY and DEF from GC because parse_toolbar_item may call 6507 /* Protect KEY and DEF from GC because parse_tool_bar_item may call
6508 eval. */ 6508 eval. */
6509 GCPRO2 (key, def); 6509 GCPRO2 (key, def);
6510 6510
@@ -6512,32 +6512,32 @@ process_toolbar_item (key, def)
6512 { 6512 {
6513 /* If a map has an explicit `undefined' as definition, 6513 /* If a map has an explicit `undefined' as definition,
6514 discard any previously made item. */ 6514 discard any previously made item. */
6515 for (i = 0; i < ntoolbar_items; i += TOOLBAR_ITEM_NSLOTS) 6515 for (i = 0; i < ntool_bar_items; i += TOOL_BAR_ITEM_NSLOTS)
6516 { 6516 {
6517 Lisp_Object *v = XVECTOR (toolbar_items_vector)->contents + i; 6517 Lisp_Object *v = XVECTOR (tool_bar_items_vector)->contents + i;
6518 6518
6519 if (EQ (key, v[TOOLBAR_ITEM_KEY])) 6519 if (EQ (key, v[TOOL_BAR_ITEM_KEY]))
6520 { 6520 {
6521 if (ntoolbar_items > i + TOOLBAR_ITEM_NSLOTS) 6521 if (ntool_bar_items > i + TOOL_BAR_ITEM_NSLOTS)
6522 bcopy (v + TOOLBAR_ITEM_NSLOTS, v, 6522 bcopy (v + TOOL_BAR_ITEM_NSLOTS, v,
6523 ((ntoolbar_items - i - TOOLBAR_ITEM_NSLOTS) 6523 ((ntool_bar_items - i - TOOL_BAR_ITEM_NSLOTS)
6524 * sizeof (Lisp_Object))); 6524 * sizeof (Lisp_Object)));
6525 ntoolbar_items -= TOOLBAR_ITEM_NSLOTS; 6525 ntool_bar_items -= TOOL_BAR_ITEM_NSLOTS;
6526 break; 6526 break;
6527 } 6527 }
6528 } 6528 }
6529 } 6529 }
6530 else if (parse_toolbar_item (key, def)) 6530 else if (parse_tool_bar_item (key, def))
6531 /* Append a new toolbar item to toolbar_items_vector. Accept 6531 /* Append a new tool bar item to tool_bar_items_vector. Accept
6532 more than one definition for the same key. */ 6532 more than one definition for the same key. */
6533 append_toolbar_item (); 6533 append_tool_bar_item ();
6534 6534
6535 UNGCPRO; 6535 UNGCPRO;
6536} 6536}
6537 6537
6538 6538
6539/* Parse a toolbar item specification ITEM for key KEY and return the 6539/* Parse a tool bar item specification ITEM for key KEY and return the
6540 result in toolbar_item_properties. Value is zero if ITEM is 6540 result in tool_bar_item_properties. Value is zero if ITEM is
6541 invalid. 6541 invalid.
6542 6542
6543 ITEM is a list `(menu-item CAPTION BINDING PROPS...)'. 6543 ITEM is a list `(menu-item CAPTION BINDING PROPS...)'.
@@ -6545,19 +6545,19 @@ process_toolbar_item (key, def)
6545 CAPTION is the caption of the item, If it's not a string, it is 6545 CAPTION is the caption of the item, If it's not a string, it is
6546 evaluated to get a string. 6546 evaluated to get a string.
6547 6547
6548 BINDING is the toolbar item's binding. Toolbar items with keymaps 6548 BINDING is the tool bar item's binding. Tool-bar items with keymaps
6549 as binding are currently ignored. 6549 as binding are currently ignored.
6550 6550
6551 The following properties are recognized: 6551 The following properties are recognized:
6552 6552
6553 - `:enable FORM'. 6553 - `:enable FORM'.
6554 6554
6555 FORM is evaluated and specifies whether the toolbar item is enabled 6555 FORM is evaluated and specifies whether the tool bar item is
6556 or disabled. 6556 enabled or disabled.
6557 6557
6558 - `:visible FORM' 6558 - `:visible FORM'
6559 6559
6560 FORM is evaluated and specifies whether the toolbar item is visible. 6560 FORM is evaluated and specifies whether the tool bar item is visible.
6561 6561
6562 - `:filter FUNCTION' 6562 - `:filter FUNCTION'
6563 6563
@@ -6572,18 +6572,18 @@ process_toolbar_item (key, def)
6572 - `:image IMAGES' 6572 - `:image IMAGES'
6573 6573
6574 IMAGES is either a single image specification or a vector of four 6574 IMAGES is either a single image specification or a vector of four
6575 image specifications. See enum toolbar_item_images. 6575 image specifications. See enum tool_bar_item_images.
6576 6576
6577 - `:help HELP-STRING'. 6577 - `:help HELP-STRING'.
6578 6578
6579 Gives a help string to display for the toolbar item. */ 6579 Gives a help string to display for the tool bar item. */
6580 6580
6581static int 6581static int
6582parse_toolbar_item (key, item) 6582parse_tool_bar_item (key, item)
6583 Lisp_Object key, item; 6583 Lisp_Object key, item;
6584{ 6584{
6585 /* Access slot with index IDX of vector toolbar_item_properties. */ 6585 /* Access slot with index IDX of vector tool_bar_item_properties. */
6586#define PROP(IDX) XVECTOR (toolbar_item_properties)->contents[IDX] 6586#define PROP(IDX) XVECTOR (tool_bar_item_properties)->contents[IDX]
6587 6587
6588 Lisp_Object filter = Qnil; 6588 Lisp_Object filter = Qnil;
6589 Lisp_Object caption; 6589 Lisp_Object caption;
@@ -6592,9 +6592,9 @@ parse_toolbar_item (key, item)
6592 int i; 6592 int i;
6593 struct gcpro gcpro1; 6593 struct gcpro gcpro1;
6594 6594
6595 /* Defininition looks like `(toolbar-item CAPTION BINDING 6595 /* Defininition looks like `(tool-bar-item CAPTION BINDING
6596 PROPS...)'. Rule out items that aren't lists, don't start with 6596 PROPS...)'. Rule out items that aren't lists, don't start with
6597 `toolbar-item' or whose rest following `toolbar-item' is not a 6597 `tool-bar-item' or whose rest following `tool-bar-item' is not a
6598 list. */ 6598 list. */
6599 if (!CONSP (item) 6599 if (!CONSP (item)
6600 || !EQ (XCAR (item), Qmenu_item) 6600 || !EQ (XCAR (item), Qmenu_item)
@@ -6602,20 +6602,20 @@ parse_toolbar_item (key, item)
6602 !CONSP (item))) 6602 !CONSP (item)))
6603 return 0; 6603 return 0;
6604 6604
6605 /* Create toolbar_item_properties vector if necessary. Reset it to 6605 /* Create tool_bar_item_properties vector if necessary. Reset it to
6606 defaults. */ 6606 defaults. */
6607 if (VECTORP (toolbar_item_properties)) 6607 if (VECTORP (tool_bar_item_properties))
6608 { 6608 {
6609 for (i = 0; i < TOOLBAR_ITEM_NSLOTS; ++i) 6609 for (i = 0; i < TOOL_BAR_ITEM_NSLOTS; ++i)
6610 PROP (i) = Qnil; 6610 PROP (i) = Qnil;
6611 } 6611 }
6612 else 6612 else
6613 toolbar_item_properties 6613 tool_bar_item_properties
6614 = Fmake_vector (make_number (TOOLBAR_ITEM_NSLOTS), Qnil); 6614 = Fmake_vector (make_number (TOOL_BAR_ITEM_NSLOTS), Qnil);
6615 6615
6616 /* Set defaults. */ 6616 /* Set defaults. */
6617 PROP (TOOLBAR_ITEM_KEY) = key; 6617 PROP (TOOL_BAR_ITEM_KEY) = key;
6618 PROP (TOOLBAR_ITEM_ENABLED_P) = Qt; 6618 PROP (TOOL_BAR_ITEM_ENABLED_P) = Qt;
6619 6619
6620 /* Get the caption of the item. If the caption is not a string, 6620 /* Get the caption of the item. If the caption is not a string,
6621 evaluate it to get a string. If we don't get a string, skip this 6621 evaluate it to get a string. If we don't get a string, skip this
@@ -6627,7 +6627,7 @@ parse_toolbar_item (key, item)
6627 if (!STRINGP (caption)) 6627 if (!STRINGP (caption))
6628 return 0; 6628 return 0;
6629 } 6629 }
6630 PROP (TOOLBAR_ITEM_CAPTION) = caption; 6630 PROP (TOOL_BAR_ITEM_CAPTION) = caption;
6631 6631
6632 /* Give up if rest following the caption is not a list. */ 6632 /* Give up if rest following the caption is not a list. */
6633 item = XCDR (item); 6633 item = XCDR (item);
@@ -6635,7 +6635,7 @@ parse_toolbar_item (key, item)
6635 return 0; 6635 return 0;
6636 6636
6637 /* Store the binding. */ 6637 /* Store the binding. */
6638 PROP (TOOLBAR_ITEM_BINDING) = XCAR (item); 6638 PROP (TOOL_BAR_ITEM_BINDING) = XCAR (item);
6639 item = XCDR (item); 6639 item = XCDR (item);
6640 6640
6641 /* Process the rest of the properties. */ 6641 /* Process the rest of the properties. */
@@ -6648,7 +6648,7 @@ parse_toolbar_item (key, item)
6648 6648
6649 if (EQ (key, QCenable)) 6649 if (EQ (key, QCenable))
6650 /* `:enable FORM'. */ 6650 /* `:enable FORM'. */
6651 PROP (TOOLBAR_ITEM_ENABLED_P) = value; 6651 PROP (TOOL_BAR_ITEM_ENABLED_P) = value;
6652 else if (EQ (key, QCvisible)) 6652 else if (EQ (key, QCvisible))
6653 { 6653 {
6654 /* `:visible FORM'. If got a visible property and that 6654 /* `:visible FORM'. If got a visible property and that
@@ -6658,7 +6658,7 @@ parse_toolbar_item (key, item)
6658 } 6658 }
6659 else if (EQ (key, QChelp)) 6659 else if (EQ (key, QChelp))
6660 /* `:help HELP-STRING'. */ 6660 /* `:help HELP-STRING'. */
6661 PROP (TOOLBAR_ITEM_HELP) = value; 6661 PROP (TOOL_BAR_ITEM_HELP) = value;
6662 else if (EQ (key, QCfilter)) 6662 else if (EQ (key, QCfilter))
6663 /* ':filter FORM'. */ 6663 /* ':filter FORM'. */
6664 filter = value; 6664 filter = value;
@@ -6671,8 +6671,8 @@ parse_toolbar_item (key, item)
6671 selected = XCDR (value); 6671 selected = XCDR (value);
6672 if (EQ (type, QCtoggle) || EQ (type, QCradio)) 6672 if (EQ (type, QCtoggle) || EQ (type, QCradio))
6673 { 6673 {
6674 PROP (TOOLBAR_ITEM_SELECTED_P) = selected; 6674 PROP (TOOL_BAR_ITEM_SELECTED_P) = selected;
6675 PROP (TOOLBAR_ITEM_TYPE) = type; 6675 PROP (TOOL_BAR_ITEM_TYPE) = type;
6676 } 6676 }
6677 } 6677 }
6678 else if (EQ (key, QCimage) 6678 else if (EQ (key, QCimage)
@@ -6680,29 +6680,29 @@ parse_toolbar_item (key, item)
6680 || (VECTORP (value) && XVECTOR (value)->size == 4))) 6680 || (VECTORP (value) && XVECTOR (value)->size == 4)))
6681 /* Value is either a single image specification or a vector 6681 /* Value is either a single image specification or a vector
6682 of 4 such specifications for the different buttion states. */ 6682 of 4 such specifications for the different buttion states. */
6683 PROP (TOOLBAR_ITEM_IMAGES) = value; 6683 PROP (TOOL_BAR_ITEM_IMAGES) = value;
6684 } 6684 }
6685 6685
6686 /* If got a filter apply it on binding. */ 6686 /* If got a filter apply it on binding. */
6687 if (!NILP (filter)) 6687 if (!NILP (filter))
6688 PROP (TOOLBAR_ITEM_BINDING) 6688 PROP (TOOL_BAR_ITEM_BINDING)
6689 = menu_item_eval_property (list2 (filter, 6689 = menu_item_eval_property (list2 (filter,
6690 list2 (Qquote, 6690 list2 (Qquote,
6691 PROP (TOOLBAR_ITEM_BINDING)))); 6691 PROP (TOOL_BAR_ITEM_BINDING))));
6692 6692
6693 /* See if the binding is a keymap. Give up if it is. */ 6693 /* See if the binding is a keymap. Give up if it is. */
6694 if (!NILP (get_keymap_1 (PROP (TOOLBAR_ITEM_BINDING), 0, 1))) 6694 if (!NILP (get_keymap_1 (PROP (TOOL_BAR_ITEM_BINDING), 0, 1)))
6695 return 0; 6695 return 0;
6696 6696
6697 /* Enable or disable selection of item. */ 6697 /* Enable or disable selection of item. */
6698 if (!EQ (PROP (TOOLBAR_ITEM_ENABLED_P), Qt)) 6698 if (!EQ (PROP (TOOL_BAR_ITEM_ENABLED_P), Qt))
6699 PROP (TOOLBAR_ITEM_ENABLED_P) 6699 PROP (TOOL_BAR_ITEM_ENABLED_P)
6700 = menu_item_eval_property (PROP (TOOLBAR_ITEM_ENABLED_P)); 6700 = menu_item_eval_property (PROP (TOOL_BAR_ITEM_ENABLED_P));
6701 6701
6702 /* Handle radio buttons or toggle boxes. */ 6702 /* Handle radio buttons or toggle boxes. */
6703 if (!NILP (PROP (TOOLBAR_ITEM_SELECTED_P))) 6703 if (!NILP (PROP (TOOL_BAR_ITEM_SELECTED_P)))
6704 PROP (TOOLBAR_ITEM_SELECTED_P) 6704 PROP (TOOL_BAR_ITEM_SELECTED_P)
6705 = menu_item_eval_property (PROP (TOOLBAR_ITEM_SELECTED_P)); 6705 = menu_item_eval_property (PROP (TOOL_BAR_ITEM_SELECTED_P));
6706 6706
6707 return 1; 6707 return 1;
6708 6708
@@ -6710,48 +6710,49 @@ parse_toolbar_item (key, item)
6710} 6710}
6711 6711
6712 6712
6713/* Initialize Vtoolbar_items. REUSE, if non-nil, is a vector that can 6713/* Initialize tool_bar_items_vector. REUSE, if non-nil, is a vector
6714 be reused. */ 6714 that can be reused. */
6715 6715
6716static void 6716static void
6717init_toolbar_items (reuse) 6717init_tool_bar_items (reuse)
6718 Lisp_Object reuse; 6718 Lisp_Object reuse;
6719{ 6719{
6720 if (VECTORP (reuse)) 6720 if (VECTORP (reuse))
6721 toolbar_items_vector = reuse; 6721 tool_bar_items_vector = reuse;
6722 else 6722 else
6723 toolbar_items_vector = Fmake_vector (make_number (64), Qnil); 6723 tool_bar_items_vector = Fmake_vector (make_number (64), Qnil);
6724 ntoolbar_items = 0; 6724 ntool_bar_items = 0;
6725} 6725}
6726 6726
6727 6727
6728/* Append parsed toolbar item properties from toolbar_item_properties */ 6728/* Append parsed tool bar item properties from
6729 tool_bar_item_properties */
6729 6730
6730static void 6731static void
6731append_toolbar_item () 6732append_tool_bar_item ()
6732{ 6733{
6733 Lisp_Object *to, *from; 6734 Lisp_Object *to, *from;
6734 6735
6735 /* Enlarge toolbar_items_vector if necessary. */ 6736 /* Enlarge tool_bar_items_vector if necessary. */
6736 if (ntoolbar_items + TOOLBAR_ITEM_NSLOTS 6737 if (ntool_bar_items + TOOL_BAR_ITEM_NSLOTS
6737 >= XVECTOR (toolbar_items_vector)->size) 6738 >= XVECTOR (tool_bar_items_vector)->size)
6738 { 6739 {
6739 Lisp_Object new_vector; 6740 Lisp_Object new_vector;
6740 int old_size = XVECTOR (toolbar_items_vector)->size; 6741 int old_size = XVECTOR (tool_bar_items_vector)->size;
6741 6742
6742 new_vector = Fmake_vector (make_number (2 * old_size), Qnil); 6743 new_vector = Fmake_vector (make_number (2 * old_size), Qnil);
6743 bcopy (XVECTOR (toolbar_items_vector)->contents, 6744 bcopy (XVECTOR (tool_bar_items_vector)->contents,
6744 XVECTOR (new_vector)->contents, 6745 XVECTOR (new_vector)->contents,
6745 old_size * sizeof (Lisp_Object)); 6746 old_size * sizeof (Lisp_Object));
6746 toolbar_items_vector = new_vector; 6747 tool_bar_items_vector = new_vector;
6747 } 6748 }
6748 6749
6749 /* Append entries from toolbar_item_properties to the end of 6750 /* Append entries from tool_bar_item_properties to the end of
6750 toolbar_items_vector. */ 6751 tool_bar_items_vector. */
6751 to = XVECTOR (toolbar_items_vector)->contents + ntoolbar_items; 6752 to = XVECTOR (tool_bar_items_vector)->contents + ntool_bar_items;
6752 from = XVECTOR (toolbar_item_properties)->contents; 6753 from = XVECTOR (tool_bar_item_properties)->contents;
6753 bcopy (from, to, TOOLBAR_ITEM_NSLOTS * sizeof *to); 6754 bcopy (from, to, TOOL_BAR_ITEM_NSLOTS * sizeof *to);
6754 ntoolbar_items += TOOLBAR_ITEM_NSLOTS; 6755 ntool_bar_items += TOOL_BAR_ITEM_NSLOTS;
6755} 6756}
6756 6757
6757 6758
@@ -6821,7 +6822,7 @@ read_char_x_menu_prompt (nmaps, maps, prev_event, used_mouse_menu)
6821 use a real menu for mouse selection. */ 6822 use a real menu for mouse selection. */
6822 if (EVENT_HAS_PARAMETERS (prev_event) 6823 if (EVENT_HAS_PARAMETERS (prev_event)
6823 && !EQ (XCONS (prev_event)->car, Qmenu_bar) 6824 && !EQ (XCONS (prev_event)->car, Qmenu_bar)
6824 && !EQ (XCONS (prev_event)->car, Qtoolbar)) 6825 && !EQ (XCONS (prev_event)->car, Qtool_bar))
6825 { 6826 {
6826 /* Display the menu and get the selection. */ 6827 /* Display the menu and get the selection. */
6827 Lisp_Object *realmaps 6828 Lisp_Object *realmaps
@@ -7786,7 +7787,7 @@ read_key_sequence (keybuf, bufsize, prompt, dont_downcase_last,
7786 posn = POSN_BUFFER_POSN (EVENT_START (key)); 7787 posn = POSN_BUFFER_POSN (EVENT_START (key));
7787 /* Handle menu-bar events: 7788 /* Handle menu-bar events:
7788 insert the dummy prefix event `menu-bar'. */ 7789 insert the dummy prefix event `menu-bar'. */
7789 if (EQ (posn, Qmenu_bar) || EQ (posn, Qtoolbar)) 7790 if (EQ (posn, Qmenu_bar) || EQ (posn, Qtool_bar))
7790 { 7791 {
7791 if (t + 1 >= bufsize) 7792 if (t + 1 >= bufsize)
7792 error ("Key sequence too long"); 7793 error ("Key sequence too long");
@@ -9520,7 +9521,7 @@ struct event_head head_table[] = {
9520void 9521void
9521syms_of_keyboard () 9522syms_of_keyboard ()
9522{ 9523{
9523 /* Toolbars. */ 9524 /* Tool-bars. */
9524 QCimage = intern (":image"); 9525 QCimage = intern (":image");
9525 staticpro (&QCimage); 9526 staticpro (&QCimage);
9526 9527
@@ -9530,10 +9531,10 @@ syms_of_keyboard ()
9530 staticpro (&item_properties); 9531 staticpro (&item_properties);
9531 item_properties = Qnil; 9532 item_properties = Qnil;
9532 9533
9533 staticpro (&toolbar_item_properties); 9534 staticpro (&tool_bar_item_properties);
9534 toolbar_item_properties = Qnil; 9535 tool_bar_item_properties = Qnil;
9535 staticpro (&toolbar_items_vector); 9536 staticpro (&tool_bar_items_vector);
9536 toolbar_items_vector = Qnil; 9537 tool_bar_items_vector = Qnil;
9537 9538
9538 staticpro (&real_this_command); 9539 staticpro (&real_this_command);
9539 real_this_command = Qnil; 9540 real_this_command = Qnil;
diff --git a/src/lisp.h b/src/lisp.h
index af764661045..c5810228a17 100644
--- a/src/lisp.h
+++ b/src/lisp.h
@@ -2357,7 +2357,7 @@ EXFUN (Frecursive_edit, 0);
2357EXFUN (Fcommand_execute, 4); 2357EXFUN (Fcommand_execute, 4);
2358EXFUN (Finput_pending_p, 0); 2358EXFUN (Finput_pending_p, 0);
2359extern Lisp_Object menu_bar_items P_ ((Lisp_Object)); 2359extern Lisp_Object menu_bar_items P_ ((Lisp_Object));
2360extern Lisp_Object toolbar_items P_ ((Lisp_Object, int *)); 2360extern Lisp_Object tool_bar_items P_ ((Lisp_Object, int *));
2361extern Lisp_Object Qvertical_scroll_bar; 2361extern Lisp_Object Qvertical_scroll_bar;
2362extern void discard_mouse_events (); 2362extern void discard_mouse_events ();
2363EXFUN (Fevent_convert_list, 1); 2363EXFUN (Fevent_convert_list, 1);
@@ -2639,7 +2639,7 @@ extern void syms_of_xfaces P_ ((void));
2639 2639
2640#ifdef HAVE_X_WINDOWS 2640#ifdef HAVE_X_WINDOWS
2641/* Defined in xfns.c */ 2641/* Defined in xfns.c */
2642extern void x_set_toolbar_lines P_ ((struct frame *, Lisp_Object, Lisp_Object)); 2642extern void x_set_tool_bar_lines P_ ((struct frame *, Lisp_Object, Lisp_Object));
2643extern void syms_of_xfns P_ ((void)); 2643extern void syms_of_xfns P_ ((void));
2644#endif 2644#endif
2645 2645
diff --git a/src/termhooks.h b/src/termhooks.h
index 3f7fcd5bc4f..3cbc6dc2c05 100644
--- a/src/termhooks.h
+++ b/src/termhooks.h
@@ -307,13 +307,13 @@ enum event_kind
307 .code is a number identifying it, 307 .code is a number identifying it,
308 index into lispy_user_signals. */ 308 index into lispy_user_signals. */
309 309
310 /* Currently only returned when the mouse enters a toolbar item that 310 /* Currently only returned when the mouse enters a tool-bar item that
311 has a help string. Member frame_or_window of the input_event is 311 has a help string. Member frame_or_window of the input_event is
312 a cons cell whose car is the toolbar's frame and whose cdr is the 312 a cons cell whose car is the tool-bar's frame and whose cdr is the
313 help string. */ 313 help string. */
314 HELP_EVENT, 314 HELP_EVENT,
315 315
316 TOOLBAR_EVENT 316 TOOL_BAR_EVENT
317}; 317};
318 318
319/* If a struct input_event has a kind which is selection_request_event 319/* If a struct input_event has a kind which is selection_request_event
diff --git a/src/window.c b/src/window.c
index e5cb271642d..6bef8fe928b 100644
--- a/src/window.c
+++ b/src/window.c
@@ -581,14 +581,14 @@ If they are on the border between WINDOW and its right sibling,\n\
581 set *PART to 1; if it is on the separating line between the window 581 set *PART to 1; if it is on the separating line between the window
582 and its right sibling, set it to 2; otherwise set it to 0. If 582 and its right sibling, set it to 2; otherwise set it to 0. If
583 there is no window under X, Y return nil and leave *PART 583 there is no window under X, Y return nil and leave *PART
584 unmodified. TOOLBAR_P non-zero means detect toolbar windows. */ 584 unmodified. TOOL_BAR_P non-zero means detect tool-bar windows. */
585 585
586Lisp_Object 586Lisp_Object
587window_from_coordinates (frame, x, y, part, toolbar_p) 587window_from_coordinates (frame, x, y, part, tool_bar_p)
588 FRAME_PTR frame; 588 FRAME_PTR frame;
589 int x, y; 589 int x, y;
590 int *part; 590 int *part;
591 int toolbar_p; 591 int tool_bar_p;
592{ 592{
593 register Lisp_Object tem, first; 593 register Lisp_Object tem, first;
594 int found; 594 int found;
@@ -609,14 +609,14 @@ window_from_coordinates (frame, x, y, part, toolbar_p)
609 } 609 }
610 while (!EQ (tem, first)); 610 while (!EQ (tem, first));
611 611
612 /* See if it's in the toolbar window, if a toolbar exists. */ 612 /* See if it's in the tool bar window, if a tool bar exists. */
613 if (toolbar_p 613 if (tool_bar_p
614 && WINDOWP (frame->toolbar_window) 614 && WINDOWP (frame->tool_bar_window)
615 && XFASTINT (XWINDOW (frame->toolbar_window)->height) 615 && XFASTINT (XWINDOW (frame->tool_bar_window)->height)
616 && coordinates_in_window (XWINDOW (frame->toolbar_window), &x, &y)) 616 && coordinates_in_window (XWINDOW (frame->tool_bar_window), &x, &y))
617 { 617 {
618 *part = 0; 618 *part = 0;
619 return frame->toolbar_window; 619 return frame->tool_bar_window;
620 } 620 }
621 621
622 return Qnil; 622 return Qnil;
@@ -3976,7 +3976,7 @@ struct save_window_data
3976 EMACS_INT size_from_Lisp_Vector_struct; 3976 EMACS_INT size_from_Lisp_Vector_struct;
3977 struct Lisp_Vector *next_from_Lisp_Vector_struct; 3977 struct Lisp_Vector *next_from_Lisp_Vector_struct;
3978 Lisp_Object frame_width, frame_height, frame_menu_bar_lines; 3978 Lisp_Object frame_width, frame_height, frame_menu_bar_lines;
3979 Lisp_Object frame_toolbar_lines; 3979 Lisp_Object frame_tool_bar_lines;
3980 Lisp_Object selected_frame; 3980 Lisp_Object selected_frame;
3981 Lisp_Object current_window; 3981 Lisp_Object current_window;
3982 Lisp_Object current_buffer; 3982 Lisp_Object current_buffer;
@@ -4091,7 +4091,7 @@ the return value is nil. Otherwise the value is t.")
4091 int previous_frame_height = FRAME_HEIGHT (f); 4091 int previous_frame_height = FRAME_HEIGHT (f);
4092 int previous_frame_width = FRAME_WIDTH (f); 4092 int previous_frame_width = FRAME_WIDTH (f);
4093 int previous_frame_menu_bar_lines = FRAME_MENU_BAR_LINES (f); 4093 int previous_frame_menu_bar_lines = FRAME_MENU_BAR_LINES (f);
4094 int previous_frame_toolbar_lines = FRAME_TOOLBAR_LINES (f); 4094 int previous_frame_tool_bar_lines = FRAME_TOOL_BAR_LINES (f);
4095 4095
4096 /* The mouse highlighting code could get screwed up 4096 /* The mouse highlighting code could get screwed up
4097 if it runs during this. */ 4097 if it runs during this. */
@@ -4106,9 +4106,9 @@ the return value is nil. Otherwise the value is t.")
4106 != previous_frame_menu_bar_lines) 4106 != previous_frame_menu_bar_lines)
4107 x_set_menu_bar_lines (f, data->frame_menu_bar_lines, make_number (0)); 4107 x_set_menu_bar_lines (f, data->frame_menu_bar_lines, make_number (0));
4108#ifdef HAVE_WINDOW_SYSTEM 4108#ifdef HAVE_WINDOW_SYSTEM
4109 if (XFASTINT (data->frame_toolbar_lines) 4109 if (XFASTINT (data->frame_tool_bar_lines)
4110 != previous_frame_toolbar_lines) 4110 != previous_frame_tool_bar_lines)
4111 x_set_toolbar_lines (f, data->frame_toolbar_lines, make_number (0)); 4111 x_set_tool_bar_lines (f, data->frame_tool_bar_lines, make_number (0));
4112#endif 4112#endif
4113#endif 4113#endif
4114 4114
@@ -4273,9 +4273,9 @@ the return value is nil. Otherwise the value is t.")
4273 x_set_menu_bar_lines (f, make_number (previous_frame_menu_bar_lines), 4273 x_set_menu_bar_lines (f, make_number (previous_frame_menu_bar_lines),
4274 make_number (0)); 4274 make_number (0));
4275#ifdef HAVE_WINDOW_SYSTEM 4275#ifdef HAVE_WINDOW_SYSTEM
4276 if (previous_frame_toolbar_lines != FRAME_TOOLBAR_LINES (f)) 4276 if (previous_frame_tool_bar_lines != FRAME_TOOL_BAR_LINES (f))
4277 x_set_toolbar_lines (f, make_number (previous_frame_toolbar_lines), 4277 x_set_tool_bar_lines (f, make_number (previous_frame_tool_bar_lines),
4278 make_number (0)); 4278 make_number (0));
4279#endif 4279#endif
4280#endif 4280#endif
4281 4281
@@ -4529,7 +4529,7 @@ redirection (see `redirect-frame-focus').")
4529 XSETFASTINT (data->frame_width, FRAME_WIDTH (f)); 4529 XSETFASTINT (data->frame_width, FRAME_WIDTH (f));
4530 XSETFASTINT (data->frame_height, FRAME_HEIGHT (f)); 4530 XSETFASTINT (data->frame_height, FRAME_HEIGHT (f));
4531 XSETFASTINT (data->frame_menu_bar_lines, FRAME_MENU_BAR_LINES (f)); 4531 XSETFASTINT (data->frame_menu_bar_lines, FRAME_MENU_BAR_LINES (f));
4532 XSETFASTINT (data->frame_toolbar_lines, FRAME_TOOLBAR_LINES (f)); 4532 XSETFASTINT (data->frame_tool_bar_lines, FRAME_TOOL_BAR_LINES (f));
4533 XSETFRAME (data->selected_frame, selected_frame); 4533 XSETFRAME (data->selected_frame, selected_frame);
4534 data->current_window = FRAME_SELECTED_WINDOW (f); 4534 data->current_window = FRAME_SELECTED_WINDOW (f);
4535 XSETBUFFER (data->current_buffer, current_buffer); 4535 XSETBUFFER (data->current_buffer, current_buffer);
diff --git a/src/xfaces.c b/src/xfaces.c
index 96ed047cb7c..9efdfb4574e 100644
--- a/src/xfaces.c
+++ b/src/xfaces.c
@@ -280,7 +280,7 @@ Lisp_Object Qx_charset_registry;
280 280
281/* Names of basic faces. */ 281/* Names of basic faces. */
282 282
283Lisp_Object Qdefault, Qmodeline, Qtoolbar, Qregion, Qmargin; 283Lisp_Object Qdefault, Qmodeline, Qtool_bar, Qregion, Qmargin;
284Lisp_Object Qtop_line; 284Lisp_Object Qtop_line;
285 285
286/* Default stipple pattern used on monochrome displays. This stipple 286/* Default stipple pattern used on monochrome displays. This stipple
@@ -5130,7 +5130,7 @@ realize_basic_faces (f)
5130 if (realize_default_face (f)) 5130 if (realize_default_face (f))
5131 { 5131 {
5132 realize_named_face (f, Qmodeline, MODE_LINE_FACE_ID); 5132 realize_named_face (f, Qmodeline, MODE_LINE_FACE_ID);
5133 realize_named_face (f, Qtoolbar, TOOLBAR_FACE_ID); 5133 realize_named_face (f, Qtool_bar, TOOL_BAR_FACE_ID);
5134 realize_named_face (f, Qmargin, BITMAP_AREA_FACE_ID); 5134 realize_named_face (f, Qmargin, BITMAP_AREA_FACE_ID);
5135 realize_named_face (f, Qtop_line, TOP_LINE_FACE_ID); 5135 realize_named_face (f, Qtop_line, TOP_LINE_FACE_ID);
5136 success_p = 1; 5136 success_p = 1;
@@ -6242,8 +6242,8 @@ syms_of_xfaces ()
6242 staticpro (&Qdefault); 6242 staticpro (&Qdefault);
6243 Qmodeline = intern ("modeline"); 6243 Qmodeline = intern ("modeline");
6244 staticpro (&Qmodeline); 6244 staticpro (&Qmodeline);
6245 Qtoolbar = intern ("toolbar"); 6245 Qtool_bar = intern ("tool-bar");
6246 staticpro (&Qtoolbar); 6246 staticpro (&Qtool_bar);
6247 Qregion = intern ("region"); 6247 Qregion = intern ("region");
6248 staticpro (&Qregion); 6248 staticpro (&Qregion);
6249 Qmargin = intern ("margin"); 6249 Qmargin = intern ("margin");
diff --git a/src/xfns.c b/src/xfns.c
index edc538f3e3e..449acf0f943 100644
--- a/src/xfns.c
+++ b/src/xfns.c
@@ -20,7 +20,7 @@ the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
20Boston, MA 02111-1307, USA. */ 20Boston, MA 02111-1307, USA. */
21 21
22/* Image support (XBM, XPM, PBM, JPEG, TIFF, GIF, PNG, GS). tooltips, 22/* Image support (XBM, XPM, PBM, JPEG, TIFF, GIF, PNG, GS). tooltips,
23 toolbars, busy-cursor, file selection dialog added by Gerd 23 tool-bars, busy-cursor, file selection dialog added by Gerd
24 Moellmann <gerd@gnu.org>. */ 24 Moellmann <gerd@gnu.org>. */
25 25
26/* Completely rewritten by Richard Stallman. */ 26/* Completely rewritten by Richard Stallman. */
@@ -259,7 +259,7 @@ Lisp_Object Qscreen_gamma;
259 259
260extern Lisp_Object Qheight, Qminibuffer, Qname, Qonly, Qwidth; 260extern Lisp_Object Qheight, Qminibuffer, Qname, Qonly, Qwidth;
261extern Lisp_Object Qunsplittable, Qmenu_bar_lines, Qbuffer_predicate, Qtitle; 261extern Lisp_Object Qunsplittable, Qmenu_bar_lines, Qbuffer_predicate, Qtitle;
262extern Lisp_Object Qtoolbar_lines; 262extern Lisp_Object Qtool_bar_lines;
263 263
264extern Lisp_Object Vwindow_system_version; 264extern Lisp_Object Vwindow_system_version;
265 265
@@ -769,7 +769,7 @@ void x_set_menu_bar_lines P_ ((struct frame *, Lisp_Object, Lisp_Object));
769void x_set_scroll_bar_width P_ ((struct frame *, Lisp_Object, Lisp_Object)); 769void x_set_scroll_bar_width P_ ((struct frame *, Lisp_Object, Lisp_Object));
770void x_set_title P_ ((struct frame *, Lisp_Object, Lisp_Object)); 770void x_set_title P_ ((struct frame *, Lisp_Object, Lisp_Object));
771void x_set_unsplittable P_ ((struct frame *, Lisp_Object, Lisp_Object)); 771void x_set_unsplittable P_ ((struct frame *, Lisp_Object, Lisp_Object));
772void x_set_toolbar_lines P_ ((struct frame *, Lisp_Object, Lisp_Object)); 772void x_set_tool_bar_lines P_ ((struct frame *, Lisp_Object, Lisp_Object));
773void x_set_scroll_bar_foreground P_ ((struct frame *, Lisp_Object, 773void x_set_scroll_bar_foreground P_ ((struct frame *, Lisp_Object,
774 Lisp_Object)); 774 Lisp_Object));
775void x_set_scroll_bar_background P_ ((struct frame *, Lisp_Object, 775void x_set_scroll_bar_background P_ ((struct frame *, Lisp_Object,
@@ -803,7 +803,7 @@ static struct x_frame_parm_table x_frame_parms[] =
803 "unsplittable", x_set_unsplittable, 803 "unsplittable", x_set_unsplittable,
804 "vertical-scroll-bars", x_set_vertical_scroll_bars, 804 "vertical-scroll-bars", x_set_vertical_scroll_bars,
805 "visibility", x_set_visibility, 805 "visibility", x_set_visibility,
806 "toolbar-lines", x_set_toolbar_lines, 806 "tool-bar-lines", x_set_tool_bar_lines,
807 "scroll-bar-foreground", x_set_scroll_bar_foreground, 807 "scroll-bar-foreground", x_set_scroll_bar_foreground,
808 "scroll-bar-background", x_set_scroll_bar_background, 808 "scroll-bar-background", x_set_scroll_bar_background,
809 "screen-gamma", x_set_screen_gamma 809 "screen-gamma", x_set_screen_gamma
@@ -1984,7 +1984,7 @@ x_set_menu_bar_lines (f, value, oldval)
1984 The frame's height doesn't change. */ 1984 The frame's height doesn't change. */
1985 1985
1986void 1986void
1987x_set_toolbar_lines (f, value, oldval) 1987x_set_tool_bar_lines (f, value, oldval)
1988 struct frame *f; 1988 struct frame *f;
1989 Lisp_Object value, oldval; 1989 Lisp_Object value, oldval;
1990{ 1990{
@@ -1999,8 +1999,8 @@ x_set_toolbar_lines (f, value, oldval)
1999 /* Make sure we redisplay all windows in this frame. */ 1999 /* Make sure we redisplay all windows in this frame. */
2000 ++windows_or_buffers_changed; 2000 ++windows_or_buffers_changed;
2001 2001
2002 delta = nlines - FRAME_TOOLBAR_LINES (f); 2002 delta = nlines - FRAME_TOOL_BAR_LINES (f);
2003 FRAME_TOOLBAR_LINES (f) = nlines; 2003 FRAME_TOOL_BAR_LINES (f) = nlines;
2004 x_set_menu_bar_lines_1 (FRAME_ROOT_WINDOW (f), delta); 2004 x_set_menu_bar_lines_1 (FRAME_ROOT_WINDOW (f), delta);
2005 adjust_glyphs (f); 2005 adjust_glyphs (f);
2006} 2006}
@@ -3773,7 +3773,7 @@ This function is an internal primitive--use `make-frame' instead.")
3773 3773
3774 x_default_parameter (f, parms, Qmenu_bar_lines, make_number (1), 3774 x_default_parameter (f, parms, Qmenu_bar_lines, make_number (1),
3775 "menuBar", "MenuBar", RES_TYPE_NUMBER); 3775 "menuBar", "MenuBar", RES_TYPE_NUMBER);
3776 x_default_parameter (f, parms, Qtoolbar_lines, make_number (0), 3776 x_default_parameter (f, parms, Qtool_bar_lines, make_number (0),
3777 "toolBar", "ToolBar", RES_TYPE_NUMBER); 3777 "toolBar", "ToolBar", RES_TYPE_NUMBER);
3778 x_default_parameter (f, parms, Qscroll_bar_width, Qnil, 3778 x_default_parameter (f, parms, Qscroll_bar_width, Qnil,
3779 "scrollBarWidth", "ScrollBarWidth", 3779 "scrollBarWidth", "ScrollBarWidth",
@@ -3807,13 +3807,13 @@ This function is an internal primitive--use `make-frame' instead.")
3807 tem = x_get_arg (dpyinfo, parms, Qunsplittable, 0, 0, RES_TYPE_BOOLEAN); 3807 tem = x_get_arg (dpyinfo, parms, Qunsplittable, 0, 0, RES_TYPE_BOOLEAN);
3808 f->no_split = minibuffer_only || EQ (tem, Qt); 3808 f->no_split = minibuffer_only || EQ (tem, Qt);
3809 3809
3810 /* Create the X widget or window. Add the toolbar height to the 3810 /* Create the X widget or window. Add the tool-bar height to the
3811 initial frame height so that the user gets a text display area of 3811 initial frame height so that the user gets a text display area of
3812 the size he specified with -g or via .Xdefaults. Later changes 3812 the size he specified with -g or via .Xdefaults. Later changes
3813 of the toolbar height don't change the frame size. This is done 3813 of the tool-bar height don't change the frame size. This is done
3814 so that users can create tall Emacs frames without having to 3814 so that users can create tall Emacs frames without having to
3815 guess how tall the toolbar will get. */ 3815 guess how tall the tool-bar will get. */
3816 f->height += FRAME_TOOLBAR_LINES (f); 3816 f->height += FRAME_TOOL_BAR_LINES (f);
3817 3817
3818#ifdef USE_X_TOOLKIT 3818#ifdef USE_X_TOOLKIT
3819 x_window (f, window_prompting, minibuffer_only); 3819 x_window (f, window_prompting, minibuffer_only);
diff --git a/src/xterm.c b/src/xterm.c
index 4c805fc7031..bdc7bfe627e 100644
--- a/src/xterm.c
+++ b/src/xterm.c
@@ -411,8 +411,8 @@ static struct glyph *x_y_to_hpos_vpos P_ ((struct window *, int, int,
411static void note_mode_line_highlight P_ ((struct window *, int, int)); 411static void note_mode_line_highlight P_ ((struct window *, int, int));
412static void x_check_font P_ ((struct frame *, XFontStruct *)); 412static void x_check_font P_ ((struct frame *, XFontStruct *));
413static void note_mouse_highlight P_ ((struct frame *, int, int)); 413static void note_mouse_highlight P_ ((struct frame *, int, int));
414static void note_toolbar_highlight P_ ((struct frame *f, int, int)); 414static void note_tool_bar_highlight P_ ((struct frame *f, int, int));
415static void x_handle_toolbar_click P_ ((struct frame *, XButtonEvent *)); 415static void x_handle_tool_bar_click P_ ((struct frame *, XButtonEvent *));
416static void show_mouse_face P_ ((struct x_display_info *, 416static void show_mouse_face P_ ((struct x_display_info *,
417 enum draw_glyphs_face)); 417 enum draw_glyphs_face));
418static int x_io_error_quitter P_ ((Display *)); 418static int x_io_error_quitter P_ ((Display *));
@@ -2439,9 +2439,9 @@ x_get_glyph_string_clip_rect (s, r)
2439 else 2439 else
2440 r->y = max (0, s->row->y); 2440 r->y = max (0, s->row->y);
2441 2441
2442 /* If drawing a toolbar window, draw it over the internal border 2442 /* If drawing a tool-bar window, draw it over the internal border
2443 at the top of the window. */ 2443 at the top of the window. */
2444 if (s->w == XWINDOW (s->f->toolbar_window)) 2444 if (s->w == XWINDOW (s->f->tool_bar_window))
2445 r->y -= s->f->output_data.x->internal_border_width; 2445 r->y -= s->f->output_data.x->internal_border_width;
2446 2446
2447 /* If S draws overlapping rows, it's sufficient to use the top and 2447 /* If S draws overlapping rows, it's sufficient to use the top and
@@ -3464,7 +3464,7 @@ x_draw_image_relief (s)
3464 if (s->hl == DRAW_IMAGE_SUNKEN 3464 if (s->hl == DRAW_IMAGE_SUNKEN
3465 || s->hl == DRAW_IMAGE_RAISED) 3465 || s->hl == DRAW_IMAGE_RAISED)
3466 { 3466 {
3467 thick = toolbar_button_relief > 0 ? toolbar_button_relief : 3; 3467 thick = tool_bar_button_relief > 0 ? tool_bar_button_relief : 3;
3468 raised_p = s->hl == DRAW_IMAGE_RAISED; 3468 raised_p = s->hl == DRAW_IMAGE_RAISED;
3469 } 3469 }
3470 else 3470 else
@@ -4099,8 +4099,8 @@ x_init_glyph_string (s, char2b, w, row, area, start, hl)
4099 s->height = row->height; 4099 s->height = row->height;
4100 s->y = WINDOW_TO_FRAME_PIXEL_Y (w, row->y); 4100 s->y = WINDOW_TO_FRAME_PIXEL_Y (w, row->y);
4101 4101
4102 /* Display the internal border below the toolbar window. */ 4102 /* Display the internal border below the tool-bar window. */
4103 if (s->w == XWINDOW (s->f->toolbar_window)) 4103 if (s->w == XWINDOW (s->f->tool_bar_window))
4104 s->y -= s->f->output_data.x->internal_border_width; 4104 s->y -= s->f->output_data.x->internal_border_width;
4105 4105
4106 s->ybase = s->y + row->ascent; 4106 s->ybase = s->y + row->ascent;
@@ -4870,7 +4870,7 @@ XTflash (f)
4870 XFillRectangle (FRAME_X_DISPLAY (f), FRAME_X_WINDOW (f), gc, 4870 XFillRectangle (FRAME_X_DISPLAY (f), FRAME_X_WINDOW (f), gc,
4871 flash_left, 4871 flash_left,
4872 (FRAME_INTERNAL_BORDER_WIDTH (f) 4872 (FRAME_INTERNAL_BORDER_WIDTH (f)
4873 + FRAME_TOOLBAR_LINES (f) * CANON_Y_UNIT (f)), 4873 + FRAME_TOOL_BAR_LINES (f) * CANON_Y_UNIT (f)),
4874 width, flash_height); 4874 width, flash_height);
4875 XFillRectangle (FRAME_X_DISPLAY (f), FRAME_X_WINDOW (f), gc, 4875 XFillRectangle (FRAME_X_DISPLAY (f), FRAME_X_WINDOW (f), gc,
4876 flash_left, 4876 flash_left,
@@ -4919,7 +4919,7 @@ XTflash (f)
4919 XFillRectangle (FRAME_X_DISPLAY (f), FRAME_X_WINDOW (f), gc, 4919 XFillRectangle (FRAME_X_DISPLAY (f), FRAME_X_WINDOW (f), gc,
4920 flash_left, 4920 flash_left,
4921 (FRAME_INTERNAL_BORDER_WIDTH (f) 4921 (FRAME_INTERNAL_BORDER_WIDTH (f)
4922 + FRAME_TOOLBAR_LINES (f) * CANON_Y_UNIT (f)), 4922 + FRAME_TOOL_BAR_LINES (f) * CANON_Y_UNIT (f)),
4923 width, flash_height); 4923 width, flash_height);
4924 XFillRectangle (FRAME_X_DISPLAY (f), FRAME_X_WINDOW (f), gc, 4924 XFillRectangle (FRAME_X_DISPLAY (f), FRAME_X_WINDOW (f), gc,
4925 flash_left, 4925 flash_left,
@@ -5107,9 +5107,9 @@ expose_frame (f, x, y, w, h)
5107 TRACE ((stderr, "(%d, %d, %d, %d)\n", r.x, r.y, r.width, r.height)); 5107 TRACE ((stderr, "(%d, %d, %d, %d)\n", r.x, r.y, r.width, r.height));
5108 expose_window_tree (XWINDOW (f->root_window), &r); 5108 expose_window_tree (XWINDOW (f->root_window), &r);
5109 5109
5110 if (WINDOWP (f->toolbar_window)) 5110 if (WINDOWP (f->tool_bar_window))
5111 { 5111 {
5112 struct window *w = XWINDOW (f->toolbar_window); 5112 struct window *w = XWINDOW (f->tool_bar_window);
5113 XRectangle window_rect; 5113 XRectangle window_rect;
5114 XRectangle intersection_rect; 5114 XRectangle intersection_rect;
5115 int window_x, window_y, window_width, window_height; 5115 int window_x, window_y, window_width, window_height;
@@ -6145,11 +6145,11 @@ note_mouse_highlight (f, x, y)
6145 w = XWINDOW (window); 6145 w = XWINDOW (window);
6146 frame_to_window_pixel_xy (w, &x, &y); 6146 frame_to_window_pixel_xy (w, &x, &y);
6147 6147
6148 /* Handle toolbar window differently since it doesn't display a 6148 /* Handle tool-bar window differently since it doesn't display a
6149 buffer. */ 6149 buffer. */
6150 if (EQ (window, f->toolbar_window)) 6150 if (EQ (window, f->tool_bar_window))
6151 { 6151 {
6152 note_toolbar_highlight (f, x, y); 6152 note_tool_bar_highlight (f, x, y);
6153 return; 6153 return;
6154 } 6154 }
6155 6155
@@ -6372,37 +6372,37 @@ redo_mouse_highlight ()
6372 6372
6373 6373
6374/*********************************************************************** 6374/***********************************************************************
6375 Toolbars 6375 Tool-bars
6376 ***********************************************************************/ 6376 ***********************************************************************/
6377 6377
6378static int x_toolbar_item P_ ((struct frame *, int, int, 6378static int x_tool_bar_item P_ ((struct frame *, int, int,
6379 struct glyph **, int *, int *, int *)); 6379 struct glyph **, int *, int *, int *));
6380 6380
6381/* Toolbar item index of the item on which a mouse button was pressed 6381/* Tool-bar item index of the item on which a mouse button was pressed
6382 or -1. */ 6382 or -1. */
6383 6383
6384static int last_toolbar_item; 6384static int last_tool_bar_item;
6385 6385
6386 6386
6387/* Get information about the toolbar item at position X/Y on frame F. 6387/* Get information about the tool-bar item at position X/Y on frame F.
6388 Return in *GLYPH a pointer to the glyph of the toolbar item in 6388 Return in *GLYPH a pointer to the glyph of the tool-bar item in
6389 the current matrix of the toolbar window of F, or NULL if not 6389 the current matrix of the tool-bar window of F, or NULL if not
6390 on a toolbar item. Return in *PROP_IDX the index of the toolbar 6390 on a tool-bar item. Return in *PROP_IDX the index of the tool-bar
6391 item in F->current_toolbar_items. Value is 6391 item in F->current_tool_bar_items. Value is
6392 6392
6393 -1 if X/Y is not on a toolbar item 6393 -1 if X/Y is not on a tool-bar item
6394 0 if X/Y is on the same item that was highlighted before. 6394 0 if X/Y is on the same item that was highlighted before.
6395 1 otherwise. */ 6395 1 otherwise. */
6396 6396
6397static int 6397static int
6398x_toolbar_item (f, x, y, glyph, hpos, vpos, prop_idx) 6398x_tool_bar_item (f, x, y, glyph, hpos, vpos, prop_idx)
6399 struct frame *f; 6399 struct frame *f;
6400 int x, y; 6400 int x, y;
6401 struct glyph **glyph; 6401 struct glyph **glyph;
6402 int *hpos, *vpos, *prop_idx; 6402 int *hpos, *vpos, *prop_idx;
6403{ 6403{
6404 struct x_display_info *dpyinfo = FRAME_X_DISPLAY_INFO (f); 6404 struct x_display_info *dpyinfo = FRAME_X_DISPLAY_INFO (f);
6405 struct window *w = XWINDOW (f->toolbar_window); 6405 struct window *w = XWINDOW (f->tool_bar_window);
6406 int area; 6406 int area;
6407 6407
6408 /* Find the glyph under X/Y. */ 6408 /* Find the glyph under X/Y. */
@@ -6410,13 +6410,13 @@ x_toolbar_item (f, x, y, glyph, hpos, vpos, prop_idx)
6410 if (*glyph == NULL) 6410 if (*glyph == NULL)
6411 return -1; 6411 return -1;
6412 6412
6413 /* Get the start of this toolbar item's properties in 6413 /* Get the start of this tool-bar item's properties in
6414 f->current_toolbar_items. */ 6414 f->current_tool_bar_items. */
6415 if (!toolbar_item_info (f, *glyph, prop_idx)) 6415 if (!tool_bar_item_info (f, *glyph, prop_idx))
6416 return -1; 6416 return -1;
6417 6417
6418 /* Is mouse on the highlighted item? */ 6418 /* Is mouse on the highlighted item? */
6419 if (EQ (f->toolbar_window, dpyinfo->mouse_face_window) 6419 if (EQ (f->tool_bar_window, dpyinfo->mouse_face_window)
6420 && *vpos >= dpyinfo->mouse_face_beg_row 6420 && *vpos >= dpyinfo->mouse_face_beg_row
6421 && *vpos <= dpyinfo->mouse_face_end_row 6421 && *vpos <= dpyinfo->mouse_face_end_row
6422 && (*vpos > dpyinfo->mouse_face_beg_row 6422 && (*vpos > dpyinfo->mouse_face_beg_row
@@ -6430,31 +6430,31 @@ x_toolbar_item (f, x, y, glyph, hpos, vpos, prop_idx)
6430} 6430}
6431 6431
6432 6432
6433/* Handle mouse button event on the toolbar of frame F, at 6433/* Handle mouse button event on the tool-bar of frame F, at
6434 frame-relative coordinates X/Y. EVENT_TYPE is either ButtionPress 6434 frame-relative coordinates X/Y. EVENT_TYPE is either ButtionPress
6435 or ButtonRelase. */ 6435 or ButtonRelase. */
6436 6436
6437static void 6437static void
6438x_handle_toolbar_click (f, button_event) 6438x_handle_tool_bar_click (f, button_event)
6439 struct frame *f; 6439 struct frame *f;
6440 XButtonEvent *button_event; 6440 XButtonEvent *button_event;
6441{ 6441{
6442 struct x_display_info *dpyinfo = FRAME_X_DISPLAY_INFO (f); 6442 struct x_display_info *dpyinfo = FRAME_X_DISPLAY_INFO (f);
6443 struct window *w = XWINDOW (f->toolbar_window); 6443 struct window *w = XWINDOW (f->tool_bar_window);
6444 int hpos, vpos, prop_idx; 6444 int hpos, vpos, prop_idx;
6445 struct glyph *glyph; 6445 struct glyph *glyph;
6446 Lisp_Object enabled_p; 6446 Lisp_Object enabled_p;
6447 int x = button_event->x; 6447 int x = button_event->x;
6448 int y = button_event->y; 6448 int y = button_event->y;
6449 6449
6450 /* If not on the highlighted toolbar item, return. */ 6450 /* If not on the highlighted tool-bar item, return. */
6451 frame_to_window_pixel_xy (w, &x, &y); 6451 frame_to_window_pixel_xy (w, &x, &y);
6452 if (x_toolbar_item (f, x, y, &glyph, &hpos, &vpos, &prop_idx) != 0) 6452 if (x_tool_bar_item (f, x, y, &glyph, &hpos, &vpos, &prop_idx) != 0)
6453 return; 6453 return;
6454 6454
6455 /* If item is disabled, do nothing. */ 6455 /* If item is disabled, do nothing. */
6456 enabled_p = (XVECTOR (f->current_toolbar_items) 6456 enabled_p = (XVECTOR (f->current_tool_bar_items)
6457 ->contents[prop_idx + TOOLBAR_ITEM_ENABLED_P]); 6457 ->contents[prop_idx + TOOL_BAR_ITEM_ENABLED_P]);
6458 if (NILP (enabled_p)) 6458 if (NILP (enabled_p))
6459 return; 6459 return;
6460 6460
@@ -6463,7 +6463,7 @@ x_handle_toolbar_click (f, button_event)
6463 /* Show item in pressed state. */ 6463 /* Show item in pressed state. */
6464 show_mouse_face (dpyinfo, DRAW_IMAGE_SUNKEN); 6464 show_mouse_face (dpyinfo, DRAW_IMAGE_SUNKEN);
6465 dpyinfo->mouse_face_image_state = DRAW_IMAGE_SUNKEN; 6465 dpyinfo->mouse_face_image_state = DRAW_IMAGE_SUNKEN;
6466 last_toolbar_item = prop_idx; 6466 last_tool_bar_item = prop_idx;
6467 } 6467 }
6468 else 6468 else
6469 { 6469 {
@@ -6474,34 +6474,34 @@ x_handle_toolbar_click (f, button_event)
6474 show_mouse_face (dpyinfo, DRAW_IMAGE_RAISED); 6474 show_mouse_face (dpyinfo, DRAW_IMAGE_RAISED);
6475 dpyinfo->mouse_face_image_state = DRAW_IMAGE_RAISED; 6475 dpyinfo->mouse_face_image_state = DRAW_IMAGE_RAISED;
6476 6476
6477 key = (XVECTOR (f->current_toolbar_items) 6477 key = (XVECTOR (f->current_tool_bar_items)
6478 ->contents[prop_idx + TOOLBAR_ITEM_KEY]); 6478 ->contents[prop_idx + TOOL_BAR_ITEM_KEY]);
6479 6479
6480 XSETFRAME (frame, f); 6480 XSETFRAME (frame, f);
6481 event.kind = TOOLBAR_EVENT; 6481 event.kind = TOOL_BAR_EVENT;
6482 event.frame_or_window = Fcons (frame, Fcons (Qtoolbar, Qnil)); 6482 event.frame_or_window = Fcons (frame, Fcons (Qtool_bar, Qnil));
6483 kbd_buffer_store_event (&event); 6483 kbd_buffer_store_event (&event);
6484 6484
6485 event.kind = TOOLBAR_EVENT; 6485 event.kind = TOOL_BAR_EVENT;
6486 event.frame_or_window = Fcons (frame, key); 6486 event.frame_or_window = Fcons (frame, key);
6487 event.modifiers = x_x_to_emacs_modifiers (FRAME_X_DISPLAY_INFO (f), 6487 event.modifiers = x_x_to_emacs_modifiers (FRAME_X_DISPLAY_INFO (f),
6488 button_event->state); 6488 button_event->state);
6489 kbd_buffer_store_event (&event); 6489 kbd_buffer_store_event (&event);
6490 last_toolbar_item = -1; 6490 last_tool_bar_item = -1;
6491 } 6491 }
6492} 6492}
6493 6493
6494 6494
6495/* Possibly highlight a toolbar item on frame F when mouse moves to 6495/* Possibly highlight a tool-bar item on frame F when mouse moves to
6496 toolbar window-relative coordinates X/Y. Called from 6496 tool-bar window-relative coordinates X/Y. Called from
6497 note_mouse_highlight. */ 6497 note_mouse_highlight. */
6498 6498
6499static void 6499static void
6500note_toolbar_highlight (f, x, y) 6500note_tool_bar_highlight (f, x, y)
6501 struct frame *f; 6501 struct frame *f;
6502 int x, y; 6502 int x, y;
6503{ 6503{
6504 Lisp_Object window = f->toolbar_window; 6504 Lisp_Object window = f->tool_bar_window;
6505 struct window *w = XWINDOW (window); 6505 struct window *w = XWINDOW (window);
6506 struct x_display_info *dpyinfo = FRAME_X_DISPLAY_INFO (f); 6506 struct x_display_info *dpyinfo = FRAME_X_DISPLAY_INFO (f);
6507 int hpos, vpos; 6507 int hpos, vpos;
@@ -6521,33 +6521,33 @@ note_toolbar_highlight (f, x, y)
6521 return; 6521 return;
6522 } 6522 }
6523 6523
6524 rc = x_toolbar_item (f, x, y, &glyph, &hpos, &vpos, &prop_idx); 6524 rc = x_tool_bar_item (f, x, y, &glyph, &hpos, &vpos, &prop_idx);
6525 if (rc < 0) 6525 if (rc < 0)
6526 { 6526 {
6527 /* Not on toolbar item. */ 6527 /* Not on tool-bar item. */
6528 clear_mouse_face (dpyinfo); 6528 clear_mouse_face (dpyinfo);
6529 return; 6529 return;
6530 } 6530 }
6531 else if (rc == 0) 6531 else if (rc == 0)
6532 /* On same toolbar item as before. */ 6532 /* On same tool-bar item as before. */
6533 goto set_help_echo; 6533 goto set_help_echo;
6534 6534
6535 clear_mouse_face (dpyinfo); 6535 clear_mouse_face (dpyinfo);
6536 6536
6537 /* Mouse is down, but on different toolbar item? */ 6537 /* Mouse is down, but on different tool-bar item? */
6538 mouse_down_p = (dpyinfo->grabbed 6538 mouse_down_p = (dpyinfo->grabbed
6539 && f == last_mouse_frame 6539 && f == last_mouse_frame
6540 && FRAME_LIVE_P (f)); 6540 && FRAME_LIVE_P (f));
6541 if (mouse_down_p 6541 if (mouse_down_p
6542 && last_toolbar_item != prop_idx) 6542 && last_tool_bar_item != prop_idx)
6543 return; 6543 return;
6544 6544
6545 dpyinfo->mouse_face_image_state = DRAW_NORMAL_TEXT; 6545 dpyinfo->mouse_face_image_state = DRAW_NORMAL_TEXT;
6546 draw = mouse_down_p ? DRAW_IMAGE_SUNKEN : DRAW_IMAGE_RAISED; 6546 draw = mouse_down_p ? DRAW_IMAGE_SUNKEN : DRAW_IMAGE_RAISED;
6547 6547
6548 /* If toolbar item is not enabled, don't highlight it. */ 6548 /* If tool-bar item is not enabled, don't highlight it. */
6549 enabled_p = (XVECTOR (f->current_toolbar_items) 6549 enabled_p = (XVECTOR (f->current_tool_bar_items)
6550 ->contents[prop_idx + TOOLBAR_ITEM_ENABLED_P]); 6550 ->contents[prop_idx + TOOL_BAR_ITEM_ENABLED_P]);
6551 if (!NILP (enabled_p)) 6551 if (!NILP (enabled_p))
6552 { 6552 {
6553 /* Compute the x-position of the glyph. In front and past the 6553 /* Compute the x-position of the glyph. In front and past the
@@ -6568,7 +6568,7 @@ note_toolbar_highlight (f, x, y)
6568 dpyinfo->mouse_face_end_x = x + glyph->pixel_width; 6568 dpyinfo->mouse_face_end_x = x + glyph->pixel_width;
6569 dpyinfo->mouse_face_end_y = row->y; 6569 dpyinfo->mouse_face_end_y = row->y;
6570 dpyinfo->mouse_face_window = window; 6570 dpyinfo->mouse_face_window = window;
6571 dpyinfo->mouse_face_face_id = TOOLBAR_FACE_ID; 6571 dpyinfo->mouse_face_face_id = TOOL_BAR_FACE_ID;
6572 6572
6573 /* Display it as active. */ 6573 /* Display it as active. */
6574 show_mouse_face (dpyinfo, draw); 6574 show_mouse_face (dpyinfo, draw);
@@ -6577,13 +6577,13 @@ note_toolbar_highlight (f, x, y)
6577 6577
6578 set_help_echo: 6578 set_help_echo:
6579 6579
6580 /* Set help_echo to a help string.to display for this toolbar item. 6580 /* Set help_echo to a help string.to display for this tool-bar item.
6581 XTread_socket does the rest. */ 6581 XTread_socket does the rest. */
6582 help_echo = (XVECTOR (f->current_toolbar_items) 6582 help_echo = (XVECTOR (f->current_tool_bar_items)
6583 ->contents[prop_idx + TOOLBAR_ITEM_HELP]); 6583 ->contents[prop_idx + TOOL_BAR_ITEM_HELP]);
6584 if (!STRINGP (help_echo)) 6584 if (!STRINGP (help_echo))
6585 help_echo = (XVECTOR (f->current_toolbar_items) 6585 help_echo = (XVECTOR (f->current_tool_bar_items)
6586 ->contents[prop_idx + TOOLBAR_ITEM_CAPTION]); 6586 ->contents[prop_idx + TOOL_BAR_ITEM_CAPTION]);
6587} 6587}
6588 6588
6589 6589
@@ -9520,7 +9520,7 @@ XTread_socket (sd, bufp, numchars, expected)
9520 /* If we decide we want to generate an event to be seen 9520 /* If we decide we want to generate an event to be seen
9521 by the rest of Emacs, we put it here. */ 9521 by the rest of Emacs, we put it here. */
9522 struct input_event emacs_event; 9522 struct input_event emacs_event;
9523 int toolbar_p = 0; 9523 int tool_bar_p = 0;
9524 9524
9525 emacs_event.kind = no_event; 9525 emacs_event.kind = no_event;
9526 bzero (&compose_status, sizeof (compose_status)); 9526 bzero (&compose_status, sizeof (compose_status));
@@ -9534,9 +9534,9 @@ XTread_socket (sd, bufp, numchars, expected)
9534 9534
9535 if (f) 9535 if (f)
9536 { 9536 {
9537 /* Is this in the toolbar? */ 9537 /* Is this in the tool-bar? */
9538 if (WINDOWP (f->toolbar_window) 9538 if (WINDOWP (f->tool_bar_window)
9539 && XFASTINT (XWINDOW (f->toolbar_window)->height)) 9539 && XFASTINT (XWINDOW (f->tool_bar_window)->height))
9540 { 9540 {
9541 Lisp_Object window; 9541 Lisp_Object window;
9542 int p, x, y; 9542 int p, x, y;
@@ -9546,14 +9546,14 @@ XTread_socket (sd, bufp, numchars, expected)
9546 9546
9547 /* Set x and y. */ 9547 /* Set x and y. */
9548 window = window_from_coordinates (f, x, y, &p, 1); 9548 window = window_from_coordinates (f, x, y, &p, 1);
9549 if (EQ (window, f->toolbar_window)) 9549 if (EQ (window, f->tool_bar_window))
9550 { 9550 {
9551 x_handle_toolbar_click (f, &event.xbutton); 9551 x_handle_tool_bar_click (f, &event.xbutton);
9552 toolbar_p = 1; 9552 tool_bar_p = 1;
9553 } 9553 }
9554 } 9554 }
9555 9555
9556 if (!toolbar_p) 9556 if (!tool_bar_p)
9557 if (!dpyinfo->x_focus_frame 9557 if (!dpyinfo->x_focus_frame
9558 || f == dpyinfo->x_focus_frame) 9558 || f == dpyinfo->x_focus_frame)
9559 construct_mouse_click (&emacs_event, &event, f); 9559 construct_mouse_click (&emacs_event, &event, f);
@@ -9580,8 +9580,8 @@ XTread_socket (sd, bufp, numchars, expected)
9580 if (f != 0) 9580 if (f != 0)
9581 f->mouse_moved = 0; 9581 f->mouse_moved = 0;
9582 9582
9583 if (!toolbar_p) 9583 if (!tool_bar_p)
9584 last_toolbar_item = -1; 9584 last_tool_bar_item = -1;
9585 if (display_busy_cursor_p) 9585 if (display_busy_cursor_p)
9586 inhibit_busy_cursor = 2; 9586 inhibit_busy_cursor = 2;
9587 } 9587 }
@@ -12836,7 +12836,7 @@ x_initialize ()
12836 baud_rate = 19200; 12836 baud_rate = 19200;
12837 12837
12838 x_noop_count = 0; 12838 x_noop_count = 0;
12839 last_toolbar_item = -1; 12839 last_tool_bar_item = -1;
12840 any_help_event_p = 0; 12840 any_help_event_p = 0;
12841 12841
12842 /* Try to use interrupt input; if we can't, then start polling. */ 12842 /* Try to use interrupt input; if we can't, then start polling. */