comparison src/gui.c @ 5143:186aebf7f6c6

merge
author Ben Wing <ben@xemacs.org>
date Sat, 13 Mar 2010 11:38:54 -0600
parents f965e31a35f0
children 88bd4f3ef8e4
comparison
equal deleted inserted replaced
5140:e5380fdaf8f1 5143:186aebf7f6c6
691 int UNUSED (escapeflag)) 691 int UNUSED (escapeflag))
692 { 692 {
693 Lisp_Gui_Item *g = XGUI_ITEM (obj); 693 Lisp_Gui_Item *g = XGUI_ITEM (obj);
694 694
695 if (print_readably) 695 if (print_readably)
696 printing_unreadable_lcrecord (obj, 0); 696 printing_unreadable_lisp_object (obj, 0);
697 697
698 write_fmt_string (printcharfun, "#<gui-item 0x%x>", g->header.uid); 698 write_fmt_string (printcharfun, "#<gui-item 0x%x>", NORMAL_LISP_OBJECT_UID (g));
699 } 699 }
700 700
701 Lisp_Object 701 Lisp_Object
702 copy_gui_item (Lisp_Object gui_item) 702 copy_gui_item (Lisp_Object gui_item)
703 { 703 {