summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/context/base/supp-fil.mkiv
blob: 586004259fa98c47846395bda21bafd307bf40dc (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
%D \module
%D   [       file=supp-fil,
%D        version=2006.09.18,
%D          title=\CONTEXT\ Support Macros,
%D       subtitle=Files,
%D         author=Hans Hagen,
%D           date=\currentdate,
%D      copyright={PRAGMA / Hans Hagen \& Ton Otten}]
%C
%C This module is part of the \CONTEXT\ macro||package and is
%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
%C details

% \input supp-fil.mkii \endinput

\registerctxluafile{supp-fil}{1.001}

% \def\sanitizefilename#1\to#2%
%                  {\edef#2{\ctxlua{support.thesanitizedfilename("\luaescapestring{#1}")}}}
% \def\checkfilename     #1{\ctxlua{support.checkfilename("\luaescapestring{#1}")}}
% \def\splitfilename     #1{\ctxlua{support.splitfilename("\luaescapestring{#1}")}}
% \def\splitfiletype     #1{\ctxlua{support.splitfiletype("\luaescapestring{#1}")}}
% \def\doifparentfileelse#1{\ctxlua{support.doifparentfileelse("\luaescapestring{#1}")}}

\def\sanitizefilename#1\to#2{\edef#2{\ctxlua{support.thesanitizedfilename([[#1]])}}}
\def\checkfilename                #1{\ctxlua{support.checkfilename([[#1]])}}
\def\splitfilename                #1{\ctxlua{support.splitfilename([[#1]])}}
\def\splitfiletype                #1{\ctxlua{support.splitfiletype([[#1]])}}
\def\doifparentfileelse           #1{\ctxlua{support.doifparentfileelse([[#1]])}}
\def\doiffileexistselse           #1{\ctxlua{support.doiffileexistelse([[#1]])}}

\endinput