Commit 941859fe authored by claes's avatar claes

Update menu button

parent 0979e543
......@@ -60,6 +60,7 @@ c_Help_on_selected_event : compound_string("Help on selected event");
! module xtt_clog.uil
c_Update : compound_string("Update");
c_NextFile : compound_string("Next File");
c_PreviousFile : compound_string("Previous File");
c_SelectFile : compound_string("Select File");
......
......@@ -21,6 +21,7 @@ procedure
clog_activate_select_file(integer);
clog_activate_next_file(integer);
clog_activate_prev_file(integer);
clog_activate_update(integer);
clog_activate_zoom_in(integer);
clog_activate_zoom_out(integer);
clog_activate_zoom_reset(integer);
......@@ -95,6 +96,18 @@ object clog_file_entry : XmCascadeButton
{
controls
{
XmPushButton
{
arguments
{
XmNlabelString = c_Filter;
XmNfontList = menu_font;
};
callbacks
{
XmNactivateCallback = procedure clog_activate_filter(clog_ctx);
};
};
XmPushButton
{
arguments
......@@ -138,6 +151,21 @@ object clog_file_entry : XmCascadeButton
};
};
XmPushButton
{
arguments
{
XmNlabelString = c_Update;
XmNmnemonic = keysym('U');
XmNaccelerator = "Ctrl<Key>U";
XmNacceleratorText = compound_string('Ctrl+U');
XmNfontList = menu_font;
};
callbacks
{
XmNactivateCallback = procedure clog_activate_update(clog_ctx);
};
};
XmPushButton
{
arguments
{
......@@ -209,18 +237,6 @@ object clog_view_entry : XmCascadeButton
XmNactivateCallback = procedure clog_activate_zoom_reset(clog_ctx);
};
};
XmPushButton
{
arguments
{
XmNlabelString = c_Filter;
XmNfontList = menu_font;
};
callbacks
{
XmNactivateCallback = procedure clog_activate_filter(clog_ctx);
};
};
};
};
};
......
......@@ -62,6 +62,7 @@ c_Help_on_selected_event : compound_string("Hj
c_NextFile : compound_string("Nsta Fil");
c_PreviousFile : compound_string("Fregende Fil");
c_Update : compound_string("Uppdatera");
c_SelectFile : compound_string("Vlj Fil");
c_Filter : compound_string("Filter");
c_Consolelog : compound_string("Konsollogg");
......
Markdown is supported
0%
or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment