From 274a99aa32d45bbdd769ebb84672765da50acc71 Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Sat, 4 Feb 2023 14:33:20 +0000
Subject: skribilo: Check if node has identifier.

* tissue/skribilo.scm (document-node): Check if node has identifier
before comparing that identifier.
---
 tissue/skribilo.scm | 1 +
 1 file changed, 1 insertion(+)

(limited to 'tissue')

diff --git a/tissue/skribilo.scm b/tissue/skribilo.scm
index b17b30d..8a0a929 100644
--- a/tissue/skribilo.scm
+++ b/tissue/skribilo.scm
@@ -43,6 +43,7 @@
 @var{reader-name}."
   (find1-down (lambda (node)
                 (and (is-a? node <markup>)
+                     (markup-ident node)
                      (string=? (markup-ident node) identifier)))
               (call-with-input-file file
                 (cut evaluate-ast-from-port <> #:reader (make-reader reader-name)))))
-- 
cgit v1.2.3