Mercurial > emacs
changeset 27758:1633d572e98f
(let_shadows_buffer_binding_p): Ignore specbindings
for symbols other than the symbol in question.
| author | Gerd Moellmann <gerd@gnu.org> |
|---|---|
| date | Fri, 18 Feb 2000 13:26:56 +0000 |
| parents | 12df8818f3f2 |
| children | 75aeb986d17f |
| files | src/data.c |
| diffstat | 1 files changed, 3 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/src/data.c Fri Feb 18 11:35:29 2000 +0000 +++ b/src/data.c Fri Feb 18 13:26:56 2000 +0000 @@ -960,7 +960,9 @@ struct specbinding *p; for (p = specpdl_ptr - 1; p >= specpdl; p--) - if (p->func == 0 && CONSP (p->symbol) + if (p->func == 0 + && CONSP (p->symbol) + && EQ (symbol, XCAR (p->symbol)) && XBUFFER (XCDR (XCDR (p->symbol))) == current_buffer) return 1;