diff options
| author | Dmitry Antipov | 2011-11-18 11:50:16 -0500 |
|---|---|---|
| committer | Stefan Monnier | 2011-11-18 11:50:16 -0500 |
| commit | 2071918ec9a1562d5f0aa6218d98f80318a33466 (patch) | |
| tree | 1446ba8ae489c652b73adf73ec0862018ccc0e72 /src/keymap.c | |
| parent | 2ad52c605cfbf8254a9d14e7e4c64f6486414734 (diff) | |
| download | emacs-2071918ec9a1562d5f0aa6218d98f80318a33466.tar.gz emacs-2071918ec9a1562d5f0aa6218d98f80318a33466.zip | |
* src/keymap.c (Fwhere_is_internal): Add missing RETURN_UNGCPROs.
Diffstat (limited to 'src/keymap.c')
| -rw-r--r-- | src/keymap.c | 4 |
1 files changed, 2 insertions, 2 deletions
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. */) | |||
| 2624 | /* We have a list of advertised bindings. */ | 2624 | /* We have a list of advertised bindings. */ |
| 2625 | while (CONSP (tem)) | 2625 | while (CONSP (tem)) |
| 2626 | if (EQ (shadow_lookup (keymaps, XCAR (tem), Qnil, 0), definition)) | 2626 | if (EQ (shadow_lookup (keymaps, XCAR (tem), Qnil, 0), definition)) |
| 2627 | return XCAR (tem); | 2627 | RETURN_UNGCPRO (XCAR (tem)); |
| 2628 | else | 2628 | else |
| 2629 | tem = XCDR (tem); | 2629 | tem = XCDR (tem); |
| 2630 | if (EQ (shadow_lookup (keymaps, tem, Qnil, 0), definition)) | 2630 | if (EQ (shadow_lookup (keymaps, tem, Qnil, 0), definition)) |
| 2631 | return tem; | 2631 | RETURN_UNGCPRO (tem); |
| 2632 | } | 2632 | } |
| 2633 | 2633 | ||
| 2634 | sequences = Freverse (where_is_internal (definition, keymaps, | 2634 | sequences = Freverse (where_is_internal (definition, keymaps, |