summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/context/third/gantt/gantt-s-mp.tex
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/context/third/gantt/gantt-s-mp.tex')
-rw-r--r--Master/texmf-dist/tex/context/third/gantt/gantt-s-mp.tex48
1 files changed, 24 insertions, 24 deletions
diff --git a/Master/texmf-dist/tex/context/third/gantt/gantt-s-mp.tex b/Master/texmf-dist/tex/context/third/gantt/gantt-s-mp.tex
index 295814cf9a5..a8a310cf21c 100644
--- a/Master/texmf-dist/tex/context/third/gantt/gantt-s-mp.tex
+++ b/Master/texmf-dist/tex/context/third/gantt/gantt-s-mp.tex
@@ -1,6 +1,6 @@
%D \module
%D [ file=t-gantt,
-%D version=2012.03.19,
+%D version=2012.08.19,
%D title=\CONTEXT\ User Module,
%D subtitle=Drawing Gantt charts,
%D author={Adam Reviczky and Aditya Mahajan},
@@ -39,12 +39,12 @@
% workaround for titleelement
\def\!!row{\numexpr\ganttnum-1\relax}
-\def\setupgantt
+\unexpanded\def\setupgantt
{\bgroup
\dosingleempty
\dosetupgantt}
-\def\dosetupgantt[#1]%
+\unexpanded\def\dosetupgantt[#1]%
{\egroup
\getparameters[\????gantt][#1]}
@@ -55,12 +55,12 @@
titlestyle=\tfx,
drawledgerline=false]
-\def\setupganttbar
+\unexpanded\def\setupganttbar
{\bgroup
\dosingleempty
\dosetupganttbar}
-\def\dosetupganttbar[#1]%
+\unexpanded\def\dosetupganttbar[#1]%
{\egroup
\getparameters[\????gantt][#1]}
@@ -76,7 +76,7 @@
% style - style of labels (default: \tf)
% titlestyle - style of title section (default: \tfx)
% drawledgerline - Switch to enable/disable the drawing of horizontal ledger lines (default value: false)
-\long\def\dostartgantt[#1]#2#3%
+\unexpanded\long\def\dostartgantt[#1]#2#3%
{\getparameters[\????gantt][#1]%
\gdef\gantt!factor{\@@@@ganttfactor}
\gdef\gantt!ganttunitlength{\@@@@ganttxunitlength}
@@ -114,10 +114,10 @@
\egroup
}
-\def\startgantt%
+\unexpanded\def\startgantt%
{\dosingleempty\dostartgantt}
-\def\stopgantt%
+\unexpanded\def\stopgantt%
{\startMPdrawing
% debug
% draw bbox currentpicture withcolor .625red;
@@ -141,7 +141,7 @@
% \titleelement draws one element of the title
% usage: \titleelement{label}{length}
-\long\def\dotitleelement#1#2%
+\unexpanded\long\def\dotitleelement#1#2%
{\gantttmpa=\dimexpr\gantt!ganttunitlength*#2\relax
\divide\gantttmpa by 2
@@ -154,12 +154,12 @@
\ganttlastx=\dimexpr\ganttlastx+\gantt!ganttunitlength*#2\relax
}
-\def\titleelement%
+\unexpanded\def\titleelement%
{\dotitleelement}
% \numtitle draws a numbered sequence of title elements
% usage: \numtitle{start number}{increment}{end number}{length of each title element}
-\long\def\donumtitle#1#2#3#4%
+\unexpanded\long\def\donumtitle#1#2#3#4%
{\gantttitlenum=#1
\dostepwiserecurse{#1}{#3}{#2}{
\titleelement{\the\gantttitlenum}{#4}
@@ -167,7 +167,7 @@
}
}
-\def\numtitle%
+\unexpanded\def\numtitle%
{\donumtitle}
% \ganttbar draws a single, unconnected bar for representing a task
@@ -175,7 +175,7 @@
% where the optional comma separated arguments are:
% pattern - not implemented with MetaPost yet! (FIXME)
% color - a color of the pattern (e.g. red, green blue gray, dark gray)
-\long\def\doganttbar[#1]#2#3#4%
+\unexpanded\long\def\doganttbar[#1]#2#3#4%
{\bgroup
\getparameters[\????gantt][#1]%
\edef\gantt!pattern{\@@@@ganttpattern}
@@ -206,12 +206,12 @@
\doglobal\advance\ganttnum by 1
}
-\def\ganttbar
+\unexpanded\def\ganttbar
{\dosingleempty\doganttbar}
% \ganttcon draws an arrow between to bars with specified coordinates
% usage: \ganttcon{startx}{starty}{endx}{endy}
-\long\def\doganttcon#1#2#3#4%
+\unexpanded\long\def\doganttcon#1#2#3#4%
{\bgroup
\startMPdrawing
begingroup;
@@ -224,14 +224,14 @@
\egroup
}
-\def\ganttcon
+\unexpanded\def\ganttcon
{\doganttcon}
% \ganttbarcon draws a single bar *and* connects the bar with the previous bar for
% consecutive tasks
% usage: \ganttbarcon[pattern=<pattern>,color=<color>]{label}{start}{length}
% where the optional pattern argument are the same as for \ganttbar
-\long\def\doganttbarcon[#1]#2#3#4%
+\unexpanded\long\def\doganttbarcon[#1]#2#3#4%
{\bgroup
\getparameters[\????gantt][#1]%
\edef\gantt!pattern{\@@@@ganttpattern}
@@ -263,12 +263,12 @@
\doglobal\advance\ganttnum by 1
}
-\def\ganttbarcon
+\unexpanded\def\ganttbarcon
{\dosingleempty\doganttbarcon}
% \ganttgroup draws a bar to group tasks
% usage: \ganttgroup{label}{start}{length}
-\long\def\doganttgroup#1#2#3%
+\unexpanded\long\def\doganttgroup#1#2#3%
{\bgroup
\gantttmpa=\dimexpr\gantt!ganttunitlength*#2\relax
\gantttmpb=\dimexpr\gantt!ganttunitlength*#3+\gantttmpa\relax
@@ -292,7 +292,7 @@
\doglobal\advance\ganttnum by 1
}
-\def\ganttgroup
+\unexpanded\def\ganttgroup
{\doganttgroup}
% \ganttmilestone, draw a diamond to represent a milestone
@@ -301,7 +301,7 @@
% for more information see the tikz documentation
% Declaring layers to abvoid superposition when you connect a \ganttmileston with a task
-\long\def\doganttmilestone[#1]#2#3%
+\unexpanded\long\def\doganttmilestone[#1]#2#3%
{\bgroup
\getparameters[\????gantt][#1]%
\edef\gantt!color{\@@@@ganttcolor}
@@ -326,13 +326,13 @@
\doglobal\advance\ganttnum by 1
}
-\def\ganttmilestone
+\unexpanded\def\ganttmilestone
{\dosingleempty\doganttmilestone}
% \ganttmilestonecon draws a single diamond *and* connects the diamond with the previous task
% usage: \ganttmilestonecon[color=<color>]{label}{start}{length}
% where the optional color argument are the same as for \ganttbar and \ganttmilestone
-\long\def\doganttmilestonecon[#1]#2#3%
+\unexpanded\long\def\doganttmilestonecon[#1]#2#3%
{\bgroup
\getparameters[\????gantt][#1]%
\edef\gantt!color{\@@@@ganttcolor}
@@ -363,7 +363,7 @@
\doglobal\advance\ganttnum by 1
}
-\def\ganttmilestonecon
+\unexpanded\def\ganttmilestonecon
{\dosingleempty\doganttmilestonecon}
\protect \stopmodule