fix: backward compatiblity with heading-level

This commit is contained in:
Tienson Qin
2022-09-30 00:33:46 +08:00
parent 71df39c184
commit 6894b997de

View File

@@ -1856,7 +1856,14 @@
priority (priority-cp t)
tags (block-tags-cp t)
bg-color (:background-color properties)
heading (:heading properties)
;; `heading-level` is for backward compatiblity, will remove it in later releases
heading-level (:block/heading-level t)
heading (or
(and heading-level
(<= heading-level 6)
heading-level)
(:heading properties))
heading (if (true? heading) 2 heading)
elem (if heading
(keyword (str "h" heading
(when block-ref? ".inline")))