summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/generic/pst-gantt
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2010-02-26 00:39:42 +0000
committerKarl Berry <karl@freefriends.org>2010-02-26 00:39:42 +0000
commit0288945faa2fa7ad7b023fe54b2eefac37ba88f6 (patch)
tree32af5c6c77b6f3021b95f2566c376c6758e1388a /Master/texmf-dist/tex/generic/pst-gantt
parent8a3fcdbd97fc63bf814e0fe3c68a4bf65967db6d (diff)
pst-gantt 0.21 (24feb10)
git-svn-id: svn://tug.org/texlive/trunk@17206 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/generic/pst-gantt')
-rw-r--r--Master/texmf-dist/tex/generic/pst-gantt/pst-gantt.tex23
1 files changed, 19 insertions, 4 deletions
diff --git a/Master/texmf-dist/tex/generic/pst-gantt/pst-gantt.tex b/Master/texmf-dist/tex/generic/pst-gantt/pst-gantt.tex
index d0876e18139..5c2ea0b5cd4 100644
--- a/Master/texmf-dist/tex/generic/pst-gantt/pst-gantt.tex
+++ b/Master/texmf-dist/tex/generic/pst-gantt/pst-gantt.tex
@@ -29,8 +29,8 @@
% interface to the `xkeyval' package
\pst@addfams{pst-gantt}
%
-\def\fileversion{0.2}
-\def\filedate{2009/05/12}
+\def\fileversion{0.21}
+\def\filedate{2010/02/23}
\message{`pst-gantt' v\fileversion, \filedate\space (Denis Girou and Herbert Voss)}
%
% "pspicture" environment or not?
@@ -39,6 +39,14 @@
% Intervals to show?
\define@boolkey[psset]{pst-gantt}[Pst@]{ChartShowIntervals}[true]{}
\psset[pst-gantt]{ChartShowIntervals=false}
+\define@key[psset]{pst-gantt}{ChartStartInterval}[1]{\def\psk@GanttStartInterval{#1}}
+\psset[pst-gantt]{ChartStartInterval=1}
+%
+\define@boolkey[psset]{pst-gantt}[Pst@]{ChartModulo}[true]{}
+\psset[pst-gantt]{ChartModulo=false}
+\define@key[psset]{pst-gantt}{ChartModuloValue}[52]{\def\psk@ChartModuloValue{#1}}
+\psset[pst-gantt]{ChartModuloValue=52}
+%
% Style for the tasks
\define@key[psset]{pst-gantt}{TaskStyle}[TaskStyleDefault]{\def\psk@GanttTaskStyle{#1}}
\psset[pst-gantt]{TaskStyle=TaskStyleDefault}
@@ -129,13 +137,20 @@
\advance\pst@dima\@ne pt
\pst@dimtonum{\pst@dima}{\pst@tempa}
%
- \multido{\iInterval=1+1,\iIntervalPos=1+\psk@GanttTaskUnitIntervalValue,
+ \multido{\iStartInterval=\psk@GanttStartInterval+1,\iInterval=1+1,
+ \iIntervalPos=1+\psk@GanttTaskUnitIntervalValue,
\nIntervalPos=\pst@tempa+\psk@GanttTaskUnitIntervalValue.0}{\pst@cnta}{%
\ifnum\iInterval=\pst@cnta
\psline(\iIntervalPos,0)(\iIntervalPos,1.5)
\psline[linestyle=dotted](\iIntervalPos,-\pst@cntb)(\iIntervalPos,0)
\else
- \rput(\nIntervalPos,1){\psk@GanttChartUnitIntervalName\space\iInterval}
+ \ifPst@ChartModulo
+ \pst@mod{\iStartInterval}{\psk@ChartModuloValue}\pst@iInterval%
+ \pst@cntm=\pst@iInterval \advance\pst@cntm by \@ne
+ \rput(\nIntervalPos,1){\psk@GanttChartUnitIntervalName\space\the\pst@cntm}
+ \else
+ \rput(\nIntervalPos,1){\psk@GanttChartUnitIntervalName\space\iStartInterval}
+ \fi
\psline(\iIntervalPos,0)(\iIntervalPos,1.5)
\psline[linestyle=dotted](\iIntervalPos,-\pst@cntb)(\iIntervalPos,0)
\fi}