Only display perturbations headers if there are some

This commit is contained in:
Dimitri Lozeve 2022-09-09 22:50:21 +02:00
parent ab4073f31f
commit 696a2a1abc

View file

@ -80,7 +80,8 @@
(display (table-footer tab)))
(def (display-disruptions disruptions style: (style 'unicode))
(displayln "Perturbations :")
(unless (null? disruptions)
(displayln "Perturbations :"))
(for ((dis disruptions))
(if (eq? style 'markdown)
(display "* ")