dipnot listesi paragraf içinde olmamalı

This commit is contained in:
riton
2025-04-01 03:13:56 +03:00
parent e9c7be84dc
commit 1e26cd3056

View File

@@ -268,10 +268,10 @@
:finally (loop :while (char= #\Newline (char metin (- i 1)))
:do (decf i))
(when (/= baş i)
(push (metin-parçası okur (- i baş) baş) elementler))
(when (not (null dipnotlar))
(push (ebeveyn-node! :ol (reverse dipnotlar)) elementler)))
(ebeveyn-node! :p (reverse elementler))))))
(push (metin-parçası okur (- i baş) baş) elementler)))
(if (not (null dipnotlar))
(ebeveyn-node! :ol (reverse dipnotlar))
(ebeveyn-node! :p (reverse elementler)))))))
(defmethod blok-ayrıştır ((okur okur))
(when (sonraki-blok okur)