1
2
3
4
5
6
7
8
9
10
11
12
13
14\writestatus{loading}{ConTeXt Typesetting Macros Hiding}
15
16\registerctxluafile{typohid}{autosuffix}
17
18\definesystemattribute[hidecontent][public]
19
20\unprotect
21
22\newinteger\c_typo_hidden_level
23
24\permanent\protected\def\starthiddencontent
25 {\ifcase\c_typo_hidden_level
26 \clf_enablehidecontent
27 \let\clf_enablehidecontent\relax
28 \attribute\hidecontentattribute\plusone
29 \fi
30 \advanceby\c_typo_hidden_level\plusone}
31
32\permanent\protected\def\stophiddencontent
33 {\advanceby\c_typo_hidden_level\minusone
34 \ifcase\c_typo_hidden_level
35 \attribute\hidecontentattribute\attributeunsetvalue
36 \fi}
37
38\protect \endinput
39 |