llama--fontify: Fix stopping at nested llama expression

Fixes [1: ad20e98].

1: 2024-10-03 ad20e98b6b98ccd6dbdd02217a839b61a01fcdde
   llama--{collect,fontify}: Stop at nested llama expression

1 files changed, 3 insertions, 1 deletions

diff --git a/llama.el b/llama.el
index 2f2c420..1928da3 100644
--- a/llama.el
+++ b/llama.el
@@ -401,7 +401,9 @@ expansion, and the looks of this face should hint at that.")
    ((null expr) expr)
    ((eq (car-safe expr) 'quote))
    ((eq (ignore-errors (bare-symbol (car-safe expr))) 'quote))
-   ((and (memq (car-safe expr) (list (intern "") 'llama)) (not top)))
+   ((and (memq (ignore-errors (bare-symbol (car-safe expr)))
+               (list (intern "") 'llama))
+         (not top)))
    ((and backquoted (symbol-with-pos-p expr)))
    ((and backquoted
          (memq (car-safe expr)