Mercurial > emacs
comparison src/intervals.c @ 8611:65a058371675
(textget): Ignore category prop if not a symbol.
author | Richard M. Stallman <rms@gnu.org> |
---|---|
date | Wed, 24 Aug 1994 19:40:44 +0000 |
parents | cd81dba38a49 |
children | 4feb7830ba01 |
comparison
equal
deleted
inserted
replaced
8610:0c4d14af9e65 | 8611:65a058371675 |
---|---|
1556 register Lisp_Object tem; | 1556 register Lisp_Object tem; |
1557 tem = Fcar (tail); | 1557 tem = Fcar (tail); |
1558 if (EQ (prop, tem)) | 1558 if (EQ (prop, tem)) |
1559 return Fcar (Fcdr (tail)); | 1559 return Fcar (Fcdr (tail)); |
1560 if (EQ (tem, Qcategory)) | 1560 if (EQ (tem, Qcategory)) |
1561 fallback = Fget (Fcar (Fcdr (tail)), prop); | 1561 { |
1562 tem = Fcar (Fcdr (tail)); | |
1563 if (SYMBOLP (tem)) | |
1564 fallback = Fget (tem, prop); | |
1565 } | |
1562 } | 1566 } |
1563 | 1567 |
1564 return fallback; | 1568 return fallback; |
1565 } | 1569 } |
1566 | 1570 |