Mercurial > hg > xemacs-beta

comparison lwlib/lwlib-Xaw.c @ 410:de805c49cfc1 r21-2-35

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-35
author cvs
date Mon, 13 Aug 2007 11:19:21 +0200
parents b8cc9ab3f761
children 697ef44129c6
comparison
equal deleted inserted replaced
409:301b9ebbdf3b 410:de805c49cfc1
31 #include <X11/IntrinsicP.h> 31 #include <X11/IntrinsicP.h>
32 #include <X11/CoreP.h> 32 #include <X11/CoreP.h>
33 #include <X11/Shell.h> 33 #include <X11/Shell.h>
34 34
35 #ifdef LWLIB_SCROLLBARS_ATHENA 35 #ifdef LWLIB_SCROLLBARS_ATHENA
36 #include ATHENA_INCLUDE(Scrollbar.h) 36 #include ATHENA_Scrollbar_h_
37 #endif 37 #endif
38 #ifdef LWLIB_DIALOGS_ATHENA 38 #ifdef LWLIB_DIALOGS_ATHENA
39 #include ATHENA_INCLUDE(Dialog.h) 39 #include ATHENA_Dialog_h_
40 #include ATHENA_INCLUDE(Form.h) 40 #include ATHENA_Form_h_
41 #include ATHENA_INCLUDE(Command.h) 41 #include ATHENA_Command_h_
42 #include ATHENA_INCLUDE(Label.h) 42 #include ATHENA_Label_h_
43 #endif 43 #endif
44 #ifdef LWLIB_WIDGETS_ATHENA 44 #ifdef LWLIB_WIDGETS_ATHENA
45 #include ATHENA_INCLUDE(Toggle.h) 45 #include ATHENA_Toggle_h_
46 #include "xlwradio.h" 46 #include "xlwradio.h"
47 #include "xlwcheckbox.h" 47 #include "xlwcheckbox.h"
48 #include "xlwgauge.h" 48 #include "xlwgauge.h"
49 #ifndef NEED_MOTIF 49 #ifndef NEED_MOTIF
50 #include ATHENA_INCLUDE(AsciiText.h) 50 #include ATHENA_AsciiText_h_
51 #endif 51 #endif
52 #endif 52 #endif
53 #include <X11/Xatom.h> 53 #include <X11/Xatom.h>
54 54
55 static void xaw_generic_callback (Widget, XtPointer, XtPointer); 55 static void xaw_generic_callback (Widget, XtPointer, XtPointer);
228 else if (XtIsSubclass (widget, asciiTextWidgetClass)) 228 else if (XtIsSubclass (widget, asciiTextWidgetClass))
229 { 229 {
230 Arg al [2]; 230 Arg al [2];
231 String buf = 0; 231 String buf = 0;
232 XtSetArg (al [0], XtNstring, &buf); 232 XtSetArg (al [0], XtNstring, &buf);
233 XtGetValues (widget, al, 2); 233 XtGetValues (widget, al, 1);
234 234
235 if (val->value) 235 if (val->value)
236 { 236 {
237 free (val->value); 237 free (val->value);
238 val->value = 0; 238 val->value = 0;
789 parent, al, ac); 789 parent, al, ac);
790 790
791 /* Do it again for arguments that have no effect until the widget is realized. */ 791 /* Do it again for arguments that have no effect until the widget is realized. */
792 ac = 0; 792 ac = 0;
793 lw_add_value_args_to_args (val, al, &ac); 793 lw_add_value_args_to_args (val, al, &ac);
794 if (ac > 20)
795 abort (); /* #### need assert macro in lwlib */
794 XtSetValues (label, al, ac); 796 XtSetValues (label, al, ac);
795 797
796 return label; 798 return label;
797 } 799 }
798 800