aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorDmitry Antipov <[email protected]>2011-11-18 11:50:16 -0500
committerStefan Monnier <[email protected]>2011-11-18 11:50:16 -0500
commit2071918ec9a1562d5f0aa6218d98f80318a33466 (patch)
tree1446ba8ae489c652b73adf73ec0862018ccc0e72
parent2ad52c605cfbf8254a9d14e7e4c64f6486414734 (diff)
* src/keymap.c (Fwhere_is_internal): Add missing RETURN_UNGCPROs.
-rw-r--r--src/ChangeLog4
-rw-r--r--src/keymap.c4
2 files changed, 6 insertions, 2 deletions
diff --git a/src/ChangeLog b/src/ChangeLog
index 199f20817e..1bb4a6a599 100644
--- a/src/ChangeLog
+++ b/src/ChangeLog
@@ -1,3 +1,7 @@
+2011-11-18 Dmitry Antipov <[email protected]>
+
+ * keymap.c (Fwhere_is_internal): Add missing RETURN_UNGCPROs.
+
2011-11-18 Stefan Monnier <[email protected]>
* intervals.c: Fix grafting over the whole buffer (bug#10071).
diff --git a/src/keymap.c b/src/keymap.c
index 6f9cf288f6..b429ca968d 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,