1 |
/* The lwlib interface to Motif widgets. |
/* The lwlib interface to Motif widgets. |
2 |
|
Copyright (C) 1994, 1995, 1996, 1997, 1999, 2000, 2001, 2003, 2004, 2005 |
3 |
|
Free Software Foundation, Inc. |
4 |
Copyright (C) 1992 Lucid, Inc. |
Copyright (C) 1992 Lucid, Inc. |
5 |
|
|
6 |
This file is part of the Lucid Widget Library. |
This file is part of the Lucid Widget Library. |
7 |
|
|
8 |
The Lucid Widget Library is free software; you can redistribute it and/or |
The Lucid Widget Library is free software; you can redistribute it and/or |
9 |
modify it under the terms of the GNU General Public License as published by |
modify it under the terms of the GNU General Public License as published by |
10 |
the Free Software Foundation; either version 1, or (at your option) |
the Free Software Foundation; either version 2, or (at your option) |
11 |
any later version. |
any later version. |
12 |
|
|
13 |
The Lucid Widget Library is distributed in the hope that it will be useful, |
The Lucid Widget Library is distributed in the hope that it will be useful, |
370 |
else |
else |
371 |
{ |
{ |
372 |
built_string = |
built_string = |
373 |
XmStringCreateLtoR (val->value, XmSTRING_DEFAULT_CHARSET); |
XmStringCreateLocalized (val->value); |
374 |
XtSetArg (al [ac], XmNlabelString, built_string); ac++; |
XtSetArg (al [ac], XmNlabelString, built_string); ac++; |
375 |
} |
} |
376 |
|
|
379 |
|
|
380 |
if (val->key) |
if (val->key) |
381 |
{ |
{ |
382 |
key_string = XmStringCreateLtoR (val->key, XmSTRING_DEFAULT_CHARSET); |
key_string = XmStringCreateLocalized (val->key); |
383 |
XtSetArg (al [ac], XmNacceleratorText, key_string); ac++; |
XtSetArg (al [ac], XmNacceleratorText, key_string); ac++; |
384 |
} |
} |
385 |
|
|
408 |
for (cur = val->contents, i = 0; cur; cur = cur->next) |
for (cur = val->contents, i = 0; cur; cur = cur->next) |
409 |
if (cur->value) |
if (cur->value) |
410 |
{ |
{ |
411 |
XmString xmstr = XmStringCreate (cur->value, XmSTRING_DEFAULT_CHARSET); |
XmString xmstr = XmStringCreateLocalized (cur->value); |
412 |
i += 1; |
i += 1; |
413 |
XmListAddItem (widget, xmstr, 0); |
XmListAddItem (widget, xmstr, 0); |
414 |
if (cur->selected) |
if (cur->selected) |