]> git.eshelyaron.com Git - emacs.git/commitdiff
Fix a crash in handle_display_spec
authorClément Pit-Claudel <clement.pitclaudel@live.com>
Wed, 13 May 2020 14:37:05 +0000 (10:37 -0400)
committerEli Zaretskii <eliz@gnu.org>
Wed, 13 May 2020 15:53:25 +0000 (18:53 +0300)
* src/xdisp.c (handle_display_spec): Check that the cdr of the
disable-eval spec is a cons before taking its car.  (Bug#41232)

src/xdisp.c

index b0fbc9936fbec56af48d212e484de6cb6aa25273..1e865898e370a86379b360b9f5dc812dbb7671e4 100644 (file)
@@ -5104,7 +5104,7 @@ handle_display_spec (struct it *it, Lisp_Object spec, Lisp_Object object,
   if (CONSP (spec) && EQ (XCAR (spec), Qdisable_eval))
     {
       enable_eval = false;
-      spec = XCAR (XCDR (spec));
+      spec = CONSP (XCDR (spec)) ? XCAR (XCDR (spec)) : Qnil;
     }
 
   if (CONSP (spec)