From: Eli Zaretskii <eliz@gnu.org>
Date: Mon, 23 Apr 2018 17:48:12 +0000 (+0300)
Subject: Fix recent change in lread.c
X-Git-Tag: emacs-27.0.90~5105
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=fa3136e07148ab37fabc52007f531e71e41a1d5a;p=emacs.git

Fix recent change in lread.c

* src/lread.c (openp): Avoid assertion violations in XCDR when
PATH is nil.  (Bug#31229)
---

diff --git a/src/lread.c b/src/lread.c
index 69b53629ec1..b8db117c79c 100644
--- a/src/lread.c
+++ b/src/lread.c
@@ -1772,7 +1772,7 @@ openp (Lisp_Object path, Lisp_Object str, Lisp_Object suffixes,
 	      }
 	  }
       }
-    if (absolute)
+    if (absolute || NILP (path))
       break;
     path = XCDR (path);
   } while (CONSP (path));