This file is part of the Lucid Widget Library.
-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
modify it under the terms of the GNU General Public License as published by
the Free Software Foundation; either version 2, or (at your option)
any later version.
The Lucid Widget Library is distributed in the hope that it will be useful,
-but WITHOUT ANY WARRANTY; without even the implied warranty of
+but WITHOUT ANY WARRANTY; without even the implied warranty of
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
GNU General Public License for more details.
You should have received a copy of the GNU General Public License
along with GNU Emacs; see the file COPYING. If not, write to
-the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
-Boston, MA 02111-1307, USA. */
+the Free Software Foundation, Inc., 51 Franklin Street, Fifth Floor,
+Boston, MA 02110-1301, USA. */
#ifdef NeXT
#undef __STRICT_BSD__ /* ick */
static void lw_pop_all_widgets P_ ((LWLIB_ID, Boolean));
static Boolean get_one_value P_ ((widget_instance *, widget_value *));
static void show_one_widget_busy P_ ((Widget, Boolean));
-
+
void
lwlib_memset (address, value, length)
char *address;
}
/* this is analogous to free(). It frees only what was allocated
- by malloc_widget_value(), and no substructures.
+ by malloc_widget_value(), and no substructures.
*/
void
free_widget_value (wv)
change_type change;
{
widget_value* copy;
-
+
if (!val)
return NULL;
if (val == (widget_value *) 1)
free_widget_value_tree (val1);
return NULL;
}
-
+
change = NO_CHANGE;
if (safe_strcmp (val1->name, val2->name))
merged_contents =
merge_widget_value (val1->contents, val2->contents, level - 1,
change_p);
-
+
if (val1->contents && !merged_contents)
{
/* This used to say INVISIBLE_CHANGE,
#endif
#endif
}
-
+
val1->contents = merged_contents;
}
val1->this_one_change = this_one_change;
val1->change = change;
-
+
if (change > NO_CHANGE && val1->toolkit_data)
{
*change_p = 1;
char* real_name = (char *) xmalloc (length);
real_name [0] = '*';
strcpy (real_name + 1, name);
-
+
widget = XtNameToWidget (instance->widget, real_name);
free (real_name);
#endif
{
Widget widget = name_to_widget (instance, val->name);
-
+
if (widget)
{
#if defined (USE_LUCID)
dialog_spec_p (name)
char* name;
{
- /* return True if name matches [EILPQeilpq][1-9][Bb] or
+ /* return True if name matches [EILPQeilpq][1-9][Bb] or
[EILPQeilpq][1-9][Bb][Rr][1-9] */
if (!name)
return False;
-
+
switch (name [0])
{
case 'E': case 'I': case 'L': case 'P': case 'Q':
}
else
return False;
-
+
default:
return False;
}
#endif
}
}
-
+
if (!function)
{
printf ("No creation function for widget type %s\n",
/* XtRealizeWidget (instance->widget);*/
}
-void
+void
lw_register_widget (type, name, id, val, pre_activate_cb,
selection_cb, post_activate_cb, highlight_cb)
char* type;
#endif
{
widget_instance* instance;
-
+
instance = find_instance (id, parent, pop_up_p);
return instance ? instance->widget : NULL;
}
{
widget_instance* instance;
widget_info* info;
-
+
instance = find_instance (id, parent, pop_up_p);
if (!instance)
{
post_activate_cb, highlight_cb);
return lw_make_widget (id, parent, pop_up_p);
}
-
+
\f
/* destroying the widgets */
static void
#if defined (USE_XAW)
if (lw_xaw_widget_p (instance->widget))
xaw_destroy_instance (instance);
- else
+ else
#endif
/* do not remove the empty statement */
;
Widget w;
{
widget_instance* instance = get_widget_instance (w, True);
-
+
if (instance)
{
widget_info *info = instance->info;
widget_value* val;
{
Widget widget = name_to_widget (instance, val->name);
-
+
if (widget)
{
#if defined (USE_LUCID)
/* To forbid recursive calls */
static Boolean lwlib_updating;
-/* This function can be used as a an XtCallback for the widgets that get
+/* This function can be used as a an XtCallback for the widgets that get
modified to update other instances of the widgets. Closure should be the
widget_instance. */
void
Widget widget_to_invert = XtNameToWidget (w, "*sheet");
if (!widget_to_invert)
widget_to_invert = w;
-
+
XtVaGetValues (widget_to_invert,
XtNforeground, &foreground,
XtNbackground, &background,
Boolean doit;
#endif
{
-#if defined (USE_XAW)
+#if defined (USE_XAW)
XawPanedSetRefigureMode (w, doit);
#endif
#if defined (USE_MOTIF)
return separator_p;
}
+/* arch-tag: 3d730f36-a441-4a71-9971-48ef3b5a4d9f
+ (do not change this comment) */