aboutsummaryrefslogtreecommitdiffstats
path: root/src/nsmenu.m
diff options
context:
space:
mode:
Diffstat (limited to 'src/nsmenu.m')
-rw-r--r--src/nsmenu.m28
1 files changed, 14 insertions, 14 deletions
diff --git a/src/nsmenu.m b/src/nsmenu.m
index 907d3eac622..ed5e76cad0d 100644
--- a/src/nsmenu.m
+++ b/src/nsmenu.m
@@ -146,7 +146,7 @@ ns_update_menubar (struct frame *f, int deep_p, EmacsMenu *submenu)
146 XSETFRAME (Vmenu_updating_frame, f); 146 XSETFRAME (Vmenu_updating_frame, f);
147/*fprintf (stderr, "ns_update_menubar: frame: %p\tdeep: %d\tsub: %p\n", f, deep_p, submenu); */ 147/*fprintf (stderr, "ns_update_menubar: frame: %p\tdeep: %d\tsub: %p\n", f, deep_p, submenu); */
148 148
149 BLOCK_INPUT; 149 block_input ();
150 pool = [[NSAutoreleasePool alloc] init]; 150 pool = [[NSAutoreleasePool alloc] init];
151 151
152 /* Menu may have been created automatically; if so, discard it. */ 152 /* Menu may have been created automatically; if so, discard it. */
@@ -271,7 +271,7 @@ ns_update_menubar (struct frame *f, int deep_p, EmacsMenu *submenu)
271 discard_menu_items (); 271 discard_menu_items ();
272 unbind_to (specpdl_count, Qnil); 272 unbind_to (specpdl_count, Qnil);
273 [pool release]; 273 [pool release];
274 UNBLOCK_INPUT; 274 unblock_input ();
275 return; 275 return;
276 } 276 }
277 277
@@ -333,7 +333,7 @@ ns_update_menubar (struct frame *f, int deep_p, EmacsMenu *submenu)
333 discard_menu_items (); 333 discard_menu_items ();
334 unbind_to (specpdl_count, Qnil); 334 unbind_to (specpdl_count, Qnil);
335 [pool release]; 335 [pool release];
336 UNBLOCK_INPUT; 336 unblock_input ();
337 return; 337 return;
338 } 338 }
339 } 339 }
@@ -404,7 +404,7 @@ ns_update_menubar (struct frame *f, int deep_p, EmacsMenu *submenu)
404 { 404 {
405 free_menubar_widget_value_tree (first_wv); 405 free_menubar_widget_value_tree (first_wv);
406 [pool release]; 406 [pool release];
407 UNBLOCK_INPUT; 407 unblock_input ();
408 return; 408 return;
409 } 409 }
410 410
@@ -435,7 +435,7 @@ ns_update_menubar (struct frame *f, int deep_p, EmacsMenu *submenu)
435 { 435 {
436 free_menubar_widget_value_tree (first_wv); 436 free_menubar_widget_value_tree (first_wv);
437 [pool release]; 437 [pool release];
438 UNBLOCK_INPUT; 438 unblock_input ();
439 return; 439 return;
440 } 440 }
441 } 441 }
@@ -498,7 +498,7 @@ ns_update_menubar (struct frame *f, int deep_p, EmacsMenu *submenu)
498 [NSApp setMainMenu: menu]; 498 [NSApp setMainMenu: menu];
499 499
500 [pool release]; 500 [pool release];
501 UNBLOCK_INPUT; 501 unblock_input ();
502 502
503} 503}
504 504
@@ -1012,10 +1012,10 @@ free_frame_tool_bar (FRAME_PTR f)
1012 Under NS we just hide the toolbar until it might be needed again. 1012 Under NS we just hide the toolbar until it might be needed again.
1013 -------------------------------------------------------------------------- */ 1013 -------------------------------------------------------------------------- */
1014{ 1014{
1015 BLOCK_INPUT; 1015 block_input ();
1016 [[FRAME_NS_VIEW (f) toolbar] setVisible: NO]; 1016 [[FRAME_NS_VIEW (f) toolbar] setVisible: NO];
1017 FRAME_TOOLBAR_HEIGHT (f) = 0; 1017 FRAME_TOOLBAR_HEIGHT (f) = 0;
1018 UNBLOCK_INPUT; 1018 unblock_input ();
1019} 1019}
1020 1020
1021void 1021void
@@ -1029,7 +1029,7 @@ update_frame_tool_bar (FRAME_PTR f)
1029 NSWindow *window = [view window]; 1029 NSWindow *window = [view window];
1030 EmacsToolbar *toolbar = [view toolbar]; 1030 EmacsToolbar *toolbar = [view toolbar];
1031 1031
1032 BLOCK_INPUT; 1032 block_input ();
1033 [toolbar clearActive]; 1033 [toolbar clearActive];
1034 1034
1035 /* update EmacsToolbar as in GtkUtils, build items list */ 1035 /* update EmacsToolbar as in GtkUtils, build items list */
@@ -1115,7 +1115,7 @@ update_frame_tool_bar (FRAME_PTR f)
1115 FRAME_TOOLBAR_HEIGHT (f) = 1115 FRAME_TOOLBAR_HEIGHT (f) =
1116 NSHeight ([window frameRectForContentRect: NSMakeRect (0, 0, 0, 0)]) 1116 NSHeight ([window frameRectForContentRect: NSMakeRect (0, 0, 0, 0)])
1117 - FRAME_NS_TITLEBAR_HEIGHT (f); 1117 - FRAME_NS_TITLEBAR_HEIGHT (f);
1118 UNBLOCK_INPUT; 1118 unblock_input ();
1119} 1119}
1120 1120
1121 1121
@@ -1355,7 +1355,7 @@ pop_down_menu (Lisp_Object arg)
1355 struct Lisp_Save_Value *p = XSAVE_VALUE (arg); 1355 struct Lisp_Save_Value *p = XSAVE_VALUE (arg);
1356 struct Popdown_data *unwind_data = (struct Popdown_data *) p->pointer; 1356 struct Popdown_data *unwind_data = (struct Popdown_data *) p->pointer;
1357 1357
1358 BLOCK_INPUT; 1358 block_input ();
1359 if (popup_activated_flag) 1359 if (popup_activated_flag)
1360 { 1360 {
1361 EmacsDialogPanel *panel = unwind_data->dialog; 1361 EmacsDialogPanel *panel = unwind_data->dialog;
@@ -1366,7 +1366,7 @@ pop_down_menu (Lisp_Object arg)
1366 } 1366 }
1367 1367
1368 xfree (unwind_data); 1368 xfree (unwind_data);
1369 UNBLOCK_INPUT; 1369 unblock_input ();
1370 1370
1371 return Qnil; 1371 return Qnil;
1372} 1372}
@@ -1434,7 +1434,7 @@ ns_popup_dialog (Lisp_Object position, Lisp_Object contents, Lisp_Object header)
1434 the dialog. */ 1434 the dialog. */
1435 contents = Fcons (title, Fcons (Fcons (build_string ("Ok"), Qt), Qnil)); 1435 contents = Fcons (title, Fcons (Fcons (build_string ("Ok"), Qt), Qnil));
1436 1436
1437 BLOCK_INPUT; 1437 block_input ();
1438 pool = [[NSAutoreleasePool alloc] init]; 1438 pool = [[NSAutoreleasePool alloc] init];
1439 dialog = [[EmacsDialogPanel alloc] initFromContents: contents 1439 dialog = [[EmacsDialogPanel alloc] initFromContents: contents
1440 isQuestion: isQ]; 1440 isQuestion: isQ];
@@ -1452,7 +1452,7 @@ ns_popup_dialog (Lisp_Object position, Lisp_Object contents, Lisp_Object header)
1452 unbind_to (specpdl_count, Qnil); /* calls pop_down_menu */ 1452 unbind_to (specpdl_count, Qnil); /* calls pop_down_menu */
1453 } 1453 }
1454 1454
1455 UNBLOCK_INPUT; 1455 unblock_input ();
1456 1456
1457 return tem; 1457 return tem;
1458} 1458}