From a25dbae6243ed1fbc87cfb0cd23c604ae72447f9 Mon Sep 17 00:00:00 2001 From: Bryce Covert Date: Wed, 4 May 2016 18:51:56 -0700 Subject: [PATCH] set height for rows. --- desktop/src-common/advent/screens/credits.clj | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/desktop/src-common/advent/screens/credits.clj b/desktop/src-common/advent/screens/credits.clj index 96e7fbe8..5eb632ac 100644 --- a/desktop/src-common/advent/screens/credits.clj +++ b/desktop/src-common/advent/screens/credits.clj @@ -100,8 +100,8 @@ (fn [people-rows person-name] (-> people-rows (conj :row) - (conj (label person-name (get-person-style entities 1.0) :set-alignment Align/center :set-font-scale 0.25)))) - [(label (doto role) (get-role-style entities 1.0) :set-alignment Align/center :set-font-scale 0.25)] + (conj [(label person-name (get-person-style entities 1.0) :set-alignment Align/center :set-font-scale 0.25) :height 50]))) + [[(label role (get-role-style entities 1.0) :set-alignment Align/center :set-font-scale 0.25) :height 50]] persons)) :top :width 350 :pad-right 30 :pad-left 30]))) []