/[emacs]/emacs/lwlib/lwlib-Xm.c
ViewVC logotype

Diff of /emacs/lwlib/lwlib-Xm.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.49 by uid66518, Mon Jan 12 01:45:22 2004 UTC revision 1.50 by monnier, Thu Mar 17 19:03:03 2005 UTC
# Line 1  Line 1 
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,
# Line 368  xm_update_label (instance, widget, val) Line 370  xm_update_label (instance, widget, val)
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    
# Line 377  xm_update_label (instance, widget, val) Line 379  xm_update_label (instance, widget, val)
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    
# Line 406  xm_update_list (instance, widget, val) Line 408  xm_update_list (instance, widget, val)
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)

Legend:
Removed from v.1.49  
changed lines
  Added in v.1.50

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26