diff options
Diffstat (limited to 'Master/texmf-dist/tex/xelatex/xepersian/xepersian-persiancal.sty')
-rw-r--r-- | Master/texmf-dist/tex/xelatex/xepersian/xepersian-persiancal.sty | 13 |
1 files changed, 8 insertions, 5 deletions
diff --git a/Master/texmf-dist/tex/xelatex/xepersian/xepersian-persiancal.sty b/Master/texmf-dist/tex/xelatex/xepersian/xepersian-persiancal.sty index 223e7984a1f..e9891246101 100644 --- a/Master/texmf-dist/tex/xelatex/xepersian/xepersian-persiancal.sty +++ b/Master/texmf-dist/tex/xelatex/xepersian/xepersian-persiancal.sty @@ -13,7 +13,7 @@ %% %% \NeedsTeXFormat{LaTeX2e} -\ProvidesPackage{xepersian-persiancal}[2010/07/25 v0.1 provides Persian calendar] +\ProvidesPackage{xepersian-persiancal}[2012/07/25 v0.2 provides Persian calendar] \newif\ifXePersian@leap \newif\ifXePersian@kabiseh \newcount\XePersian@i \newcount\XePersian@y \newcount\XePersian@m \newcount\XePersian@d @@ -40,7 +40,6 @@ \newcount\XePersian@sn \newcount\XePersian@mminusone -\def\persiantoday{% \XePersian@y=\year \XePersian@m=\month \XePersian@d=\day \XePersian@temp=\XePersian@y \divide\XePersian@temp by 100\relax @@ -169,10 +168,14 @@ \else \XePersian@d = \XePersian@dn \advance \XePersian@d by -\XePersian@sn \fi -\beginL\number\XePersian@d\endL\space% -\persianmonth{\XePersian@m}\space\beginL\number\XePersian@y\endL% +\newcommand*{\persiantoday}{% +\number\XePersian@d\space% +\XePersian@persian@month{\XePersian@m}\space\number\XePersian@y% } -\def\persianmonth#1{\ifcase#1\or فروردین\or +\let\persianyear\XePersian@y +\let\persianmonth\XePersian@m +\let\persianday\XePersian@d +\def\XePersian@persian@month#1{\ifcase#1\or فروردین\or اردیبهشت\or خرداد\or تیر\or مرداد\or |