Mercurial > hg > xemacs-beta
changeset 797:776fcda0ee36
[xemacs-hg @ 2002-03-29 13:51:37 by wmperry]
Use wrap_emacs_* instead of wrap_* for gtk_boxed, gtk_object, and ffi LispObjects.
| author | wmperry |
|---|---|
| date | Fri, 29 Mar 2002 13:51:50 +0000 |
| parents | 7a6013500383 |
| children | 1f5108485fe7 |
| files | src/ChangeLog src/ui-gtk.c |
| diffstat | 2 files changed, 12 insertions(+), 4 deletions(-) [+] |
line wrap: on
line diff
--- a/src/ChangeLog Fri Mar 29 11:12:44 2002 +0000 +++ b/src/ChangeLog Fri Mar 29 13:51:50 2002 +0000 @@ -1,3 +1,11 @@ +2002-03-29 William M. Perry <wmperry@gnu.org> + + * ui-gtk.c (Fgtk_import_function_internal): + (emacs_gtk_object_finalizer): + (build_gtk_object): + (build_gtk_boxed): Use wrap_emacs_*() instead of wrap_*() + for gtk_boxed, gtk_object, ffi + 2002-03-24 Ben Wing <ben@xemacs.org> * Makefile.in.in (gui_objs):
--- a/src/ui-gtk.c Fri Mar 29 11:12:44 2002 +0000 +++ b/src/ui-gtk.c Fri Mar 29 13:51:50 2002 +0000 @@ -659,7 +659,7 @@ data->function_ptr = name_func; data->marshal = marshaller_func; - rval = wrap_ffi (data); + rval = wrap_emacs_ffi (data); return (rval); } @@ -908,7 +908,7 @@ if (for_disksave) { - Lisp_Object obj = wrap_gtk_object (data); + Lisp_Object obj = wrap_emacs_gtk_object (data); invalid_operation @@ -977,7 +977,7 @@ data->object = obj; data->alive_p = TRUE; - retval = wrap_gtk_object (data); + retval = wrap_emacs_gtk_object (data); id = new_gui_id (); gtk_object_set_data (obj, "xemacs::gui_id", (gpointer) id); @@ -1165,7 +1165,7 @@ data->object = obj; data->object_type = t; - retval = wrap_gtk_boxed (data); + retval = wrap_emacs_gtk_boxed (data); return (retval); }