On 31 Aug 2019, at 01:20, Eli Zaretskii <eliz@gnu.org> wrote:

-  (if (and (null (cdr (assoc ".." file-alist)))
+  (if (and (consp (assoc ".." file-alist))
+           (null (cdr (assoc ".." file-alist)))
   (cdr (assoc "." file-alist)))