From 4b96a87aaad75cf60a03c354d609f4673a4986ee Mon Sep 17 00:00:00 2001
From: riton <riton@riton.home>
Date: Mon, 24 Mar 2025 02:06:48 +0300
Subject: =?UTF-8?q?bug=20fix,=20repl=20de=20eski=20tan=C4=B1m=C4=B1=20kull?=
 =?UTF-8?q?and=C4=B1=C4=9F=C4=B1=20i=C3=A7in=20g=C3=B6zden=20ka=C3=A7m?=
 =?UTF-8?q?=C4=B1=C5=9F?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 okur.lisp | 10 ++++++----
 1 file changed, 6 insertions(+), 4 deletions(-)

diff --git a/okur.lisp b/okur.lisp
index 57da9d3..583905f 100644
--- a/okur.lisp
+++ b/okur.lisp
@@ -207,11 +207,13 @@
                (paragraf-ayrıştır okur)))))))
 
 (defmethod markdown-ayrıştır ((okur okur))
-  (let ((blok-node (blok-ayrıştır okur)))
+  (labels ((öz (okur)
+             (let ((blok-node (blok-ayrıştır okur)))
+               (if (null blok-node)
+                   nil
+                   (cons blok-node (öz okur))))))
     (ebeveyn-node! :div
-                   (if (null blok-node)
-                       nil
-                       (cons blok-node (tümünü-ayrıştır okur))))))
+                   (öz okur))))
 
 
 (defparameter *okur* (okur! "/home/riton/projects/html-jen/cheat.md"))
-- 
cgit v1.2.3