Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
e9ec3919
Commit
e9ec3919
authored
Oct 06, 1999
by
Gerd Moellmann
Browse files
(make_menu_in_widget, update_one_menu_entry): Use
widgets instead of gadgets to be able to set colors.
parent
ac441528
Changes
1
Hide whitespace changes
Inline
Side-by-side
Showing
1 changed file
with
4 additions
and
4 deletions
+4
-4
lwlib/lwlib-Xm.c
lwlib/lwlib-Xm.c
+4
-4
No files found.
lwlib/lwlib-Xm.c
View file @
e9ec3919
...
...
@@ -516,10 +516,10 @@ make_menu_in_widget (instance, widget, val, keep_first_children)
(
cur
->
button_type
==
BUTTON_TYPE_TOGGLE
?
XmN_OF_MANY
:
XmONE_OF_MANY
));
++
ac
;
button
=
XmCreateToggleButton
Gadget
(
widget
,
cur
->
name
,
al
,
ac
);
button
=
XmCreateToggleButton
(
widget
,
cur
->
name
,
al
,
ac
);
}
else
button
=
XmCreatePushButton
Gadget
(
widget
,
cur
->
name
,
al
,
ac
);
button
=
XmCreatePushButton
(
widget
,
cur
->
name
,
al
,
ac
);
xm_update_label
(
instance
,
button
,
cur
);
...
...
@@ -541,7 +541,7 @@ make_menu_in_widget (instance, widget, val, keep_first_children)
/* Non-zero values don't work reliably in conjunction with
Emacs' event loop */
XtSetArg
(
al
[
ac
],
XmNmappingDelay
,
0
);
ac
++
;
button
=
XmCreateCascadeButton
Gadget
(
widget
,
cur
->
name
,
al
,
ac
);
button
=
XmCreateCascadeButton
(
widget
,
cur
->
name
,
al
,
ac
);
xm_update_label
(
instance
,
button
,
cur
);
...
...
@@ -655,7 +655,7 @@ update_one_menu_entry (instance, widget, val, deep_p)
/* Tell Motif to put it in the right place */
XtSetArg
(
al
[
ac
],
XmNpositionIndex
,
i
);
ac
++
;
#endif
button
=
XmCreateCascadeButton
Gadget
(
parent
,
val
->
name
,
al
,
ac
);
button
=
XmCreateCascadeButton
(
parent
,
val
->
name
,
al
,
ac
);
xm_update_label
(
instance
,
button
,
val
);
XtAddCallback
(
button
,
XmNcascadingCallback
,
xm_pull_down_callback
,
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment