From 20b9f7641509d3a2ed593c07dd496451eed32347 Mon Sep 17 00:00:00 2001
From: Marius <mariausol@gmail.com>
Date: Tue, 15 Oct 2013 11:20:13 +0300
Subject: beta 2013.10.15 10:11

---
 tex/context/base/s-present-tiles.mkiv | 21 ++++++++++++++++++++-
 1 file changed, 20 insertions(+), 1 deletion(-)

(limited to 'tex/context/base/s-present-tiles.mkiv')

diff --git a/tex/context/base/s-present-tiles.mkiv b/tex/context/base/s-present-tiles.mkiv
index 79fe48950..b68a34ef4 100644
--- a/tex/context/base/s-present-tiles.mkiv
+++ b/tex/context/base/s-present-tiles.mkiv
@@ -64,7 +64,17 @@
     -\topspace
 ]
 
-\definemeasure [topiclistfont]  [1.2\measured{topiclistwidth}/10]
+\definemeasure [topiclistfontsize] [
+    \ifcase\numexpr\structurelistsize\relax 2.5            %  0
+    \or1.4\or1.4\or1.4\or1.4\or1.4\or1.4\or1.4\or1.4\or1.4 %  1 -  9
+    \or1.3\or1.3\or1.3\or1.3\or1.3\or1.3\or1.3             % 10 - 16
+    \or1.2\or1.2\or1.2\or1.2\or1.2                         % 17 - 20
+    \else1                                                 % 21 - 25
+    \fi
+    \bodyfontsize
+]
+
+\definemeasure [topiclistfont]  [\measured{topiclistfontsize}]
 \definemeasure [topictitlefont] [1.2\measured{layoutunit}]
 \definemeasure [titlepagefont]  [2\measured{layoutunit}]
 
@@ -218,6 +228,15 @@
 
 % end of buttons
 
+\defineframed
+  [conclusion]
+  [location=low,
+   width=max,
+   align={flushleft,lohi},
+   background=color,
+   backgroundcolor=white,
+   foregroundcolor=secondarycolor]
+
 \startsetups [document:titlepage]
 
     \definebodyfontenvironment
-- 
cgit v1.2.3