|
|
@@ -1367,7 +1367,8 @@
|
|
|
has-children-blocks? (and (coll? children) (seq children))
|
|
|
has-child? (and
|
|
|
(not (:pre-block? block))
|
|
|
- (or has-children-blocks? (seq body)))
|
|
|
+ (or has-children-blocks?
|
|
|
+ (and (seq (:block/title block)) (seq body))))
|
|
|
control-show? (and
|
|
|
(or (and (seq (:block/title block))
|
|
|
(seq body))
|