comparison src/xmenu.c @ 53325:8e8832ef3963

(show_help_event): Remove unused code.
author Kim F. Storm <storm@cua.dk>
date Sat, 27 Dec 2003 22:24:01 +0000
parents 1218a42792ea
children ed3e26153ee9 7900111db01c
comparison
equal deleted inserted replaced
53324:890b555d85b7 53325:8e8832ef3963
97 Lisp_Object Vmenu_updating_frame; 97 Lisp_Object Vmenu_updating_frame;
98 98
99 Lisp_Object Qdebug_on_next_call; 99 Lisp_Object Qdebug_on_next_call;
100 100
101 extern Lisp_Object Qmenu_bar; 101 extern Lisp_Object Qmenu_bar;
102 extern Lisp_Object Qmouse_click, Qevent_kind;
103 102
104 extern Lisp_Object QCtoggle, QCradio; 103 extern Lisp_Object QCtoggle, QCradio;
105 104
106 extern Lisp_Object Voverriding_local_map; 105 extern Lisp_Object Voverriding_local_map;
107 extern Lisp_Object Voverriding_local_map_menu_flag; 106 extern Lisp_Object Voverriding_local_map_menu_flag;
1302 XSETFRAME (frame, f); 1301 XSETFRAME (frame, f);
1303 kbd_buffer_store_help_event (frame, help); 1302 kbd_buffer_store_help_event (frame, help);
1304 } 1303 }
1305 else 1304 else
1306 { 1305 {
1306 #if 0 /* This code doesn't do anything useful. ++kfs */
1307 /* WIDGET is the popup menu. It's parent is the frame's 1307 /* WIDGET is the popup menu. It's parent is the frame's
1308 widget. See which frame that is. */ 1308 widget. See which frame that is. */
1309 xt_or_gtk_widget frame_widget = XtParent (widget); 1309 xt_or_gtk_widget frame_widget = XtParent (widget);
1310 Lisp_Object tail; 1310 Lisp_Object tail;
1311 1311
1315 if (GC_FRAMEP (frame) 1315 if (GC_FRAMEP (frame)
1316 && (f = XFRAME (frame), 1316 && (f = XFRAME (frame),
1317 FRAME_X_P (f) && f->output_data.x->widget == frame_widget)) 1317 FRAME_X_P (f) && f->output_data.x->widget == frame_widget))
1318 break; 1318 break;
1319 } 1319 }
1320 1320 #endif
1321 show_help_echo (help, Qnil, Qnil, Qnil, 1); 1321 show_help_echo (help, Qnil, Qnil, Qnil, 1);
1322 } 1322 }
1323 } 1323 }
1324 1324
1325 /* Callback called when menu items are highlighted/unhighlighted 1325 /* Callback called when menu items are highlighted/unhighlighted