From: Dmitry Antipov <dmantipov@yandex.ru>
Date: Fri, 18 Nov 2011 16:50:16 +0000 (-0500)
Subject: * src/keymap.c (Fwhere_is_internal): Add missing RETURN_UNGCPROs.
X-Git-Tag: emacs-pretest-24.0.92~142
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=2071918ec9a1562d5f0aa6218d98f80318a33466;p=emacs.git

* src/keymap.c (Fwhere_is_internal): Add missing RETURN_UNGCPROs.
---

diff --git a/src/ChangeLog b/src/ChangeLog
index 199f20817ea..1bb4a6a5993 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2011-11-18  Dmitry Antipov  <dmantipov@yandex.ru>
+
+	* keymap.c (Fwhere_is_internal): Add missing RETURN_UNGCPROs.
+
 2011-11-18  Stefan Monnier  <monnier@iro.umontreal.ca>
 
 	* intervals.c: Fix grafting over the whole buffer (bug#10071).
diff --git a/src/keymap.c b/src/keymap.c
index 6f9cf288f6d..b429ca968d7 100644
--- a/src/keymap.c
+++ b/src/keymap.c
@@ -2624,11 +2624,11 @@ remapped command in the returned list.  */)
       /* We have a list of advertised bindings.  */
       while (CONSP (tem))
 	if (EQ (shadow_lookup (keymaps, XCAR (tem), Qnil, 0), definition))
-	  return XCAR (tem);
+	  RETURN_UNGCPRO (XCAR (tem));
 	else
 	  tem = XCDR (tem);
       if (EQ (shadow_lookup (keymaps, tem, Qnil, 0), definition))
-	return tem;
+	RETURN_UNGCPRO (tem);
     }
 
   sequences = Freverse (where_is_internal (definition, keymaps,