+/*
+Copyright (C) 1992, 1993 Lucid, Inc.
+Copyright (C) 1994, 1999, 2000, 2001, 2002, 2003, 2004, 2005, 2006,
+ 2007, 2008, 2009, 2010 Free Software Foundation, Inc.
+
+This file is part of the Lucid Widget Library.
+
+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 1, 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
+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., 51 Franklin Street, Fifth Floor,
+Boston, MA 02110-1301, USA. */
+
+
#ifndef LWLIB_H
#define LWLIB_H
/*
** Widget values depend on the Widget type:
-**
+**
** widget: (name value key enabled data contents/selected)
**
** label: ("name" "string" NULL NULL NULL NULL)
** button: ("name" "string" "key" T/F data <default-button-p>)
-** button w/menu:
+** button w/menu:
** ("name" "string" "key" T/F data (label|button|button w/menu...))
** menubar: ("name" NULL NULL T/F data (button w/menu))
** selectable thing:
SEPARATOR_SHADOW_ETCHED_IN_DASH,
SEPARATOR_SHADOW_ETCHED_OUT_DASH,
- /* The following are supported by XEmacs' Lucid menus. */
+ /* The following are supported by Lucid menus. */
SEPARATOR_SHADOW_DOUBLE_ETCHED_IN,
SEPARATOR_SHADOW_DOUBLE_ETCHED_OUT,
SEPARATOR_SHADOW_DOUBLE_ETCHED_IN_DASH,
typedef struct _widget_value
{
/* name of widget */
+ Lisp_Object lname;
char* name;
/* value (meaning depend on widget type) */
char* value;
- /* keyboard equivalent. no implications for XtTranslations */
+ /* keyboard equivalent. no implications for XtTranslations */
+ Lisp_Object lkey;
char* key;
- /* Help string or null if none. */
- char *help;
+ /* Help string or nil if none.
+ GC finds this string through the frame's menu_bar_vector
+ or through menu_items. */
+ Lisp_Object help;
/* true if enabled */
Boolean enabled;
/* true if selected */
void lwlib_bcopy __P ((char*, char*, int));
#endif /* LWLIB_H */
+
+/* arch-tag: 44d818d5-7eb2-4d87-acd7-b992bb0d5d20
+ (do not change this comment) */