summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/source/uplatex/base
diff options
context:
space:
mode:
authorKarl Berry <karl@freefriends.org>2019-04-06 21:07:49 +0000
committerKarl Berry <karl@freefriends.org>2019-04-06 21:07:49 +0000
commitc948fca8b9884315b8cfef4b23b922f0511c0d5c (patch)
tree41e12bfb57a8c4a682f81ff02ecff629f4675ba9 /Master/texmf-dist/source/uplatex/base
parent356b6f8b38041bb39183b2b1d2c1d2c00eb941c0 (diff)
uplatex (6apr19)
git-svn-id: svn://tug.org/texlive/trunk@50811 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/source/uplatex/base')
-rw-r--r--Master/texmf-dist/source/uplatex/base/ujclasses.dtx61
-rw-r--r--Master/texmf-dist/source/uplatex/base/ukinsoku.dtx14
-rw-r--r--Master/texmf-dist/source/uplatex/base/uplcls.ins2
-rw-r--r--Master/texmf-dist/source/uplatex/base/uplvers.dtx2
4 files changed, 53 insertions, 26 deletions
diff --git a/Master/texmf-dist/source/uplatex/base/ujclasses.dtx b/Master/texmf-dist/source/uplatex/base/ujclasses.dtx
index 6b6d0ef24fd..693c91f915f 100644
--- a/Master/texmf-dist/source/uplatex/base/ujclasses.dtx
+++ b/Master/texmf-dist/source/uplatex/base/ujclasses.dtx
@@ -7,7 +7,7 @@
%
% Copyright (c) 2010 ASCII MEDIA WORKS
% Copyright (c) 2016 Takuji Tanaka
-% Copyright (c) 2016-2018 Japanese TeX Development Community
+% Copyright (c) 2016-2019 Japanese TeX Development Community
%
% This file is part of the upLaTeX2e system (community edition).
% --------------------------------------------------------------
@@ -110,6 +110,8 @@
% \changes{v1.8a}{2018/10/25}{ファイル書き出し時の行末文字対策
% (sync with ltsect.dtx 2018/09/26 v1.1c)}
% \changes{v1.8a-u00}{2018/10/25}{p\LaTeX{}用に追随}
+% \changes{v1.8b}{2019/04/02}{新元号対応}
+% \changes{v1.8b-u00}{2019/04/02}{p\LaTeX{}用に追随}
% \fi
%
% \iffalse
@@ -139,7 +141,7 @@
%<11pt&bk>\ProvidesFile{utbk11.clo}
%<12pt&bk>\ProvidesFile{utbk12.clo}
%</tate>
- [2018/10/25 v1.8a-u00
+ [2019/04/02 v1.8b-u00
%<article|report|book> Standard upLaTeX class]
%<10pt|11pt|12pt> Standard upLaTeX file (size option)]
%<*driver>
@@ -4378,6 +4380,7 @@
%
% \begin{macro}{\heisei}
% \changes{v1.1m}{1998/04/07}{\cs{today}の計算手順を変更}
+% \changes{v1.8b}{2019/04/02}{\cs{heisei}の値は$\mbox{西暦}-1988$で固定}
% |\today|コマンドを|\rightmark|で指定したとき、|\rightmark|を出力する部分
% で和暦のための計算ができないので、クラスファイルを読み込む時点で計算して
% おきます。
@@ -4387,32 +4390,46 @@
% \end{macro}
%
% \begin{macro}{\today}
-% 縦組の場合は、漢数字で出力します。
-% \begin{macrocode}
-\def\today{{%
- \iftdir
- \if西暦
- \kansuji\number\year 年
- \kansuji\number\month 月
- \kansuji\number\day 日
+% \begin{macro}{\pltx@today@year}
+% \changes{v1.8b}{2019/04/02}{\cs{today}の計算・出力方法を変更。}
+% 縦組の場合は、漢数字で出力します
+% \pLaTeX\ 2018-12-01以前では縦数式ディレクション時でも漢数字で出力していましたが、
+% \pLaTeX\ 2019-04-06以降からはそうしなくなりました。
+% \begin{macrocode}
+\def\pltx@today@year@#1{%
+ \ifnum\numexpr\year-#1=1 元\else
+ \ifnum1=\iftdir\ifmdir0\else1\fi\else0\fi
+ \kansuji\number\numexpr\year-#1\relax
\else
- 平成\ifnum\heisei=1 元年\else\kansuji\number\heisei 年\fi
- \kansuji\number\month 月
- \kansuji\number\day 日
+ \number\numexpr\year-#1\relax\nobreak
\fi
+ \fi 年
+}
+\def\pltx@today@year{%
+ \ifnum\numexpr\year*10000+\month*100+\day<19890108
+ 昭和\pltx@today@year@{1925}%
+ \else\ifnum\numexpr\year*10000+\month*100+\day<20190501
+ 平成\pltx@today@year@{1988}%
\else
- \if西暦
- \number\year~年
- \number\month~月
- \number\day~日
- \else
- 平成\ifnum\heisei=1 元年\else\number\heisei~年\fi
- \number\month~月
- \number\day~日
- \fi
+ 令和\pltx@today@year@{2018}%
+ \fi\fi}
+\def\today{{%
+ \if西暦
+ \ifnum1=\iftdir\ifmdir0\else1\fi\else0\fi\kansuji\number\year
+ \else\number\year\nobreak\fi 年
+ \else
+ \pltx@today@year
+ \fi
+ \ifnum1=\iftdir\ifmdir0\else1\fi\else0\fi
+ \kansuji\number\month 月
+ \kansuji\number\day 日
+ \else
+ \number\month\nobreak 月
+ \number\day\nobreak 日
\fi}}
% \end{macrocode}
% \end{macro}
+% \end{macro}
%
%
%
diff --git a/Master/texmf-dist/source/uplatex/base/ukinsoku.dtx b/Master/texmf-dist/source/uplatex/base/ukinsoku.dtx
index ec9c0975598..6a7d6bab260 100644
--- a/Master/texmf-dist/source/uplatex/base/ukinsoku.dtx
+++ b/Master/texmf-dist/source/uplatex/base/ukinsoku.dtx
@@ -7,7 +7,7 @@
%
% Copyright (c) 2010 ASCII MEDIA WORKS
% Copyright (c) 2016 Takuji Tanaka
-% Copyright (c) 2016-2018 Japanese TeX Development Community
+% Copyright (c) 2016-2019 Japanese TeX Development Community
%
% This file is part of the upLaTeX2e system (community edition).
% --------------------------------------------------------------
@@ -29,13 +29,14 @@
% Latin-1 Supplementのうち属性がLatinのもの
% (Latin-1 letters)をコードポイントで指定}
% \changes{v1.0b-u03}{2018/04/08}{\LaTeX\ 2018-04-01対策}
+% \changes{v1.0b-u04}{2019/01/29}{内部Unicode化されていることを確認}
% \fi
%
% \iffalse
%<*driver>
\NeedsTeXFormat{pLaTeX2e}
% \fi
-\ProvidesFile{ukinsoku.dtx}[2018/04/08 v1.0b-u03 upLaTeX Kernel]
+\ProvidesFile{ukinsoku.dtx}[2019/01/29 v1.0b-u04 upLaTeX Kernel]
% \iffalse
\documentclass{jltxdoc}
\GetFileInfo{ukinsoku.dtx}
@@ -56,10 +57,19 @@
% なお、このファイルのコード部分は、
% p\TeX{}やp\LaTeX{}で配布されている\file{kinsoku.tex}に、
% JIS X 0213の定義文字などの設定を追加したものです。
+% このファイルは内部コードUnicode (|uptex|)なup\TeX{}エンジンで読まれる
+% 必要があります。
% \changes{v1.0-u00}{2011/05/07}{p\LaTeX{}用からup\LaTeX{}用に修正。}
+% \changes{v1.0b-u04}{2019/01/29}{内部コードがUnicodeであることを確認}
%
% \begin{macrocode}
%<*plcore>
+\ifnum\ucs"3000="3000 \else
+ \errhelp{Please try to run (e)uptex with option
+ `-kanji-internal=uptex'.}%
+ \errmessage{This file should be read with
+ internal Kanji encoding Unicode}\@@end
+\fi
% \end{macrocode}
%
% \section{禁則}
diff --git a/Master/texmf-dist/source/uplatex/base/uplcls.ins b/Master/texmf-dist/source/uplatex/base/uplcls.ins
index 1f6e9749679..7876d28c990 100644
--- a/Master/texmf-dist/source/uplatex/base/uplcls.ins
+++ b/Master/texmf-dist/source/uplatex/base/uplcls.ins
@@ -9,7 +9,7 @@
Copyright (c) 2010 ASCII MEDIA WORKS
Copyright (c) 2016 Takuji Tanaka
-Copyright (c) 2016-2018 Japanese TeX Development Community
+Copyright (c) 2016-2019 Japanese TeX Development Community
This file is part of the upLaTeX2e system (community edition).
--------------------------------------------------------------
diff --git a/Master/texmf-dist/source/uplatex/base/uplvers.dtx b/Master/texmf-dist/source/uplatex/base/uplvers.dtx
index cfe35608c41..f6f8869e840 100644
--- a/Master/texmf-dist/source/uplatex/base/uplvers.dtx
+++ b/Master/texmf-dist/source/uplatex/base/uplvers.dtx
@@ -7,7 +7,7 @@
%
% Copyright (c) 2010 ASCII MEDIA WORKS
% Copyright (c) 2016 Takuji Tanaka
-% Copyright (c) 2016-2018 Japanese TeX Development Community
+% Copyright (c) 2016-2019 Japanese TeX Development Community
%
% This file is part of the upLaTeX2e system (community edition).
% --------------------------------------------------------------