changeset 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 0c4d14af9e65
children 86065bec6fc9
files src/intervals.c
diffstat 1 files changed, 5 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/src/intervals.c	Wed Aug 24 19:40:30 1994 +0000
+++ b/src/intervals.c	Wed Aug 24 19:40:44 1994 +0000
@@ -1558,7 +1558,11 @@
       if (EQ (prop, tem))
 	return Fcar (Fcdr (tail));
       if (EQ (tem, Qcategory))
-	fallback = Fget (Fcar (Fcdr (tail)), prop);
+	{
+	  tem = Fcar (Fcdr (tail));
+	  if (SYMBOLP (tem))
+	    fallback = Fget (tem, prop);
+	}
     }
 
   return fallback;