summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/source/platex/base/jclasses.dtx
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/source/platex/base/jclasses.dtx')
-rw-r--r--Master/texmf-dist/source/platex/base/jclasses.dtx60
1 files changed, 38 insertions, 22 deletions
diff --git a/Master/texmf-dist/source/platex/base/jclasses.dtx b/Master/texmf-dist/source/platex/base/jclasses.dtx
index b3b99a53a2b..04c939bacb8 100644
--- a/Master/texmf-dist/source/platex/base/jclasses.dtx
+++ b/Master/texmf-dist/source/platex/base/jclasses.dtx
@@ -3,7 +3,7 @@
%
% Copyright 1995-2001 ASCII Corporation.
% Copyright (c) 2010 ASCII MEDIA WORKS
-% Copyright (c) 2016-2018 Japanese TeX Development Community
+% Copyright (c) 2016-2019 Japanese TeX Development Community
%
% This file is part of the pLaTeX2e system (community edition).
% -------------------------------------------------------------
@@ -97,6 +97,7 @@
% \changes{v1.8}{2018/07/03}{\cs{today}$B$N%G%U%)%k%H$rOBNq$+$i@>Nq$KJQ99(B}
% \changes{v1.8a}{2018/10/25}{$B%U%!%$%k=q$-=P$7;~$N9TKvJ8;zBP:v(B
% (sync with ltsect.dtx 2018/09/26 v1.1c)}
+% \changes{v1.8b}{2019/04/02}{$B?7859fBP1~(B}
% \fi
%
% \iffalse
@@ -126,7 +127,7 @@
%<11pt&bk>\ProvidesFile{tbk11.clo}
%<12pt&bk>\ProvidesFile{tbk12.clo}
%</tate>
- [2018/10/25 v1.8a
+ [2019/04/02 v1.8b
%<article|report|book> Standard pLaTeX class]
%<10pt|11pt|12pt> Standard pLaTeX file (size option)]
%<*driver>
@@ -4364,6 +4365,7 @@
%
% \begin{macro}{\heisei}
% \changes{v1.1m}{1998/04/07}{\cs{today}$B$N7W;;<j=g$rJQ99(B}
+% \changes{v1.8b}{2019/04/02}{\cs{heisei}$B$NCM$O(B$\mbox{$B@>Nq(B}-1988$$B$G8GDj(B}
% |\today|$B%3%^%s%I$r(B|\rightmark|$B$G;XDj$7$?$H$-!"(B|\rightmark|$B$r=PNO$9$kItJ,(B
% $B$GOBNq$N$?$a$N7W;;$,$G$-$J$$$N$G!"%/%i%9%U%!%$%k$rFI$_9~$`;~E@$G7W;;$7$F(B
% $B$*$-$^$9!#(B
@@ -4373,32 +4375,46 @@
% \end{macro}
%
% \begin{macro}{\today}
-% $B=DAH$N>l9g$O!"4A?t;z$G=PNO$7$^$9!#(B
-% \begin{macrocode}
-\def\today{{%
- \iftdir
- \if$B@>Nq(B
- \kansuji\number\year $BG/(B
- \kansuji\number\month $B7n(B
- \kansuji\number\day $BF|(B
+% \begin{macro}{\pltx@today@year}
+% \changes{v1.8b}{2019/04/02}{\cs{today}$B$N7W;;!&=PNOJ}K!$rJQ99!#(B}
+% $B=DAH$N>l9g$O!"4A?t;z$G=PNO$7$^$9(B
+% \pLaTeX\ 2018-12-01$B0JA0$G$O=D?t<0%G%#%l%/%7%g%s;~$G$b4A?t;z$G=PNO$7$F$$$^$7$?$,!"(B
+% \pLaTeX\ 2019-04-06$B0J9_$+$i$O$=$&$7$J$/$J$j$^$7$?!#(B
+% \begin{macrocode}
+\def\pltx@today@year@#1{%
+ \ifnum\numexpr\year-#1=1 $B85(B\else
+ \ifnum1=\iftdir\ifmdir0\else1\fi\else0\fi
+ \kansuji\number\numexpr\year-#1\relax
\else
- $BJ?@.(B\ifnum\heisei=1 $B85G/(B\else\kansuji\number\heisei $BG/(B\fi
- \kansuji\number\month $B7n(B
- \kansuji\number\day $BF|(B
+ \number\numexpr\year-#1\relax\nobreak
\fi
+ \fi $BG/(B
+}
+\def\pltx@today@year{%
+ \ifnum\numexpr\year*10000+\month*100+\day<19890108
+ $B><OB(B\pltx@today@year@{1925}%
+ \else\ifnum\numexpr\year*10000+\month*100+\day<20190501
+ $BJ?@.(B\pltx@today@year@{1988}%
\else
- \if$B@>Nq(B
- \number\year~$BG/(B
- \number\month~$B7n(B
- \number\day~$BF|(B
- \else
- $BJ?@.(B\ifnum\heisei=1 $B85G/(B\else\number\heisei~$BG/(B\fi
- \number\month~$B7n(B
- \number\day~$BF|(B
- \fi
+ $BNaOB(B\pltx@today@year@{2018}%
+ \fi\fi}
+\def\today{{%
+ \if$B@>Nq(B
+ \ifnum1=\iftdir\ifmdir0\else1\fi\else0\fi\kansuji\number\year
+ \else\number\year\nobreak\fi $BG/(B
+ \else
+ \pltx@today@year
+ \fi
+ \ifnum1=\iftdir\ifmdir0\else1\fi\else0\fi
+ \kansuji\number\month $B7n(B
+ \kansuji\number\day $BF|(B
+ \else
+ \number\month\nobreak $B7n(B
+ \number\day\nobreak $BF|(B
\fi}}
% \end{macrocode}
% \end{macro}
+% \end{macro}
%
%
%