From 5a4c88c4f417acde163837a4d2fb670b8c58bcf9 Mon Sep 17 00:00:00 2001 From: Gerd Moellmann Date: Tue, 7 Sep 1999 22:31:38 +0000 Subject: [PATCH] (handle_single_display_prop): Change conditional display property to `:when FORM . VALUE'. --- src/xdisp.c | 7 ++----- 1 file changed, 2 insertions(+), 5 deletions(-) diff --git a/src/xdisp.c b/src/xdisp.c index a816c064b49..d02a3422980 100644 --- a/src/xdisp.c +++ b/src/xdisp.c @@ -2297,8 +2297,8 @@ handle_single_display_prop (it, prop, object, position) Lisp_Object form; - /* If PROP is a list of the form `(:when FORM VALUE)', FORM is - evaluated. If the result is nil, VALUE is ignored. */ + /* If PROP is a list of the form `(:when FORM . VALUE)', FORM is + evaluated. If the result is nil, VALUE is ignored. */ form = Qt; if (CONSP (prop) && EQ (XCAR (prop), QCwhen)) { @@ -2307,9 +2307,6 @@ handle_single_display_prop (it, prop, object, position) return 0; form = XCAR (prop); prop = XCDR (prop); - if (!CONSP (prop)) - return 0; - prop = XCAR (prop); } if (!NILP (form) && !EQ (form, Qt)) -- 2.39.5