(COMPOSITION_MODIFICATION_FUNC): If PROP is not a cons, return Qnil.

diff --git a/src/composite.h b/src/composite.h
index e30deabb7f6ffb8b8511b310d447dc96bb430eb7..ce47aee7098cd680a167aa2f551c179c45562fb8 100644 (file)
--- a/src/composite.h
+++ b/src/composite.h
@@ -76,7 +76,7 @@ extern Lisp_Object composition_temp;
 #define COMPOSITION_MODIFICATION_FUNC(prop)    \
   (COMPOSITION_REGISTERD_P (prop)              \
    ? XCDR (XCDR (XCDR (prop)))                 \
-   : XCDR (prop))
+   : CONSP (prop) ? XCDR (prop) : Qnil)
 
 /* Return the method of composition.  */
 #define COMPOSITION_METHOD(prop)                                       \