1
2
3
4
5
6
7
8
9
10
11
12
13
14\writestatus{loading}{ConTeXt Publication Macros XML inclusion}
15
16\registerctxluafile{publinc}{}
17
18
19
20\unprotect
21
22\definesymbol[btxattachment][{\infofont\darkred btx}]
23\definesymbol[btxcomment] [{\infofont\darkblue btx}]
24
25\unexpanded\def\btx_add_blob#1#2
26 {\relax
27 \clf_btxentrytobuffer{\currentbtxdataset}{\currentbtxtag}{tempbtxexport}
28 #2
29 [\c!symbol=#1,
30 \c!space=\v!yes,
31 \c!buffer=tempbtxexport,
32 \c!name={\currentbtxtag.bib}]
33 \relax}
34
35\unexpanded\def\btxattach
36 {\iftrialtypesetting \else \ifexporting \iflocation
37 \dostarttagged\t!ignore\empty
38 \btx_add_blob{btxattachment}\attachment
39 \dostoptagged
40 \fi \fi \fi}
41
42\unexpanded\def\btxcomment
43 {\iftrialtypesetting \else \ifexporting \iflocation
44 \dostarttagged\t!ignore\empty
45 \btx_add_blob{btxcomment}\comment
46 \dostoptagged
47 \fi \fi \fi}
48
49
50
51\unexpanded\def\btxaddsource
52 {\iftrialtypesetting \else \ifexporting \iflocation
53 \dostarttagged\t!ignore\empty
54 \llap{
55 \btx_add_blob{btxattachment}\attachment
56 \quad
57 \btx_add_blob{btxcomment}\comment
58 \hskip\leftmargindistance
59 }
60 \dostoptagged
61 \fi \fi \fi}
62
63\protect \endinput
64 |