From: Kenichi Handa <handa@m17n.org>
Date: Mon, 19 Aug 2002 02:46:28 +0000 (+0000)
Subject: (COMPOSITION_MODIFICATION_FUNC): If PROP is not a cons, return Qnil.
X-Git-Tag: ttn-vms-21-2-B4~13645
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=c1de6316cfe94ed9fbffcdd6554bdd599d1cc03c;p=emacs.git

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

diff --git a/src/composite.h b/src/composite.h
index e30deabb7f6..ce47aee7098 100644
--- 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)					\