Mercurial > hg > xemacs-beta
diff src/glade.c @ 5118:e0db3c197671 ben-lisp-object
merge up to latest default branch, doesn't compile yet
author | Ben Wing <ben@xemacs.org> |
---|---|
date | Sat, 26 Dec 2009 21:18:49 -0600 |
parents | db7068430402 |
children | 304aebb79cd3 |
line wrap: on
line diff
--- a/src/glade.c Sat Dec 26 00:20:27 2009 -0600 +++ b/src/glade.c Sat Dec 26 21:18:49 2009 -0600 @@ -7,6 +7,22 @@ ** Copyright (C) 1999 John Harper <john@dcs.warwick.ac.uk> ** Copyright (c) 2000 Free Software Foundation ** +** This file is part of XEmacs. +** +** XEmacs 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. +** +** XEmacs 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 XEmacs; see the file COPYING. If not, write to +** the Free Software Foundation, Inc., 51 Franklin Street - Fifth Floor, +** Boston, MA 02111-1301, USA. */ */ #if defined(HAVE_GLADE_H) || defined(HAVE_GLADE_GLADE_H) @@ -42,7 +58,8 @@ if (signal_data && signal_data[0]) { - lisp_data = Feval (Fread (build_string (signal_data))); + lisp_data + = IGNORE_MULTIPLE_VALUES (Feval (Fread (build_string (signal_data)))); } /* obj, name, func, cb_data, object_signal, after_p */