texlive[44554] Master: bxjaprnind (10jun17)

commits+karl at tug.org commits+karl at tug.org
Sat Jun 10 23:42:09 CEST 2017


Revision: 44554
          http://tug.org/svn/texlive?view=revision&revision=44554
Author:   karl
Date:     2017-06-10 23:42:08 +0200 (Sat, 10 Jun 2017)
Log Message:
-----------
bxjaprnind (10jun17)

Modified Paths:
--------------
    trunk/Master/tlpkg/bin/tlpkg-ctan-check
    trunk/Master/tlpkg/tlpsrc/collection-langjapanese.tlpsrc

Added Paths:
-----------
    trunk/Master/texmf-dist/doc/latex/bxjaprnind/
    trunk/Master/texmf-dist/doc/latex/bxjaprnind/LICENSE
    trunk/Master/texmf-dist/doc/latex/bxjaprnind/README-ja.md
    trunk/Master/texmf-dist/doc/latex/bxjaprnind/README.md
    trunk/Master/texmf-dist/doc/latex/bxjaprnind/bxjaprnind.pdf
    trunk/Master/texmf-dist/doc/latex/bxjaprnind/bxjaprnind.tex
    trunk/Master/texmf-dist/doc/latex/bxjaprnind/sample-bxjaprnind.pdf
    trunk/Master/texmf-dist/doc/latex/bxjaprnind/sample-bxjaprnind.tex
    trunk/Master/texmf-dist/tex/latex/bxjaprnind/
    trunk/Master/texmf-dist/tex/latex/bxjaprnind/bxjaprnind.sty
    trunk/Master/tlpkg/tlpsrc/bxjaprnind.tlpsrc

Added: trunk/Master/texmf-dist/doc/latex/bxjaprnind/LICENSE
===================================================================
--- trunk/Master/texmf-dist/doc/latex/bxjaprnind/LICENSE	                        (rev 0)
+++ trunk/Master/texmf-dist/doc/latex/bxjaprnind/LICENSE	2017-06-10 21:42:08 UTC (rev 44554)
@@ -0,0 +1,21 @@
+The MIT License
+
+Copyright (c) 2013 Takayuki YATO (aka. "ZR")
+
+Permission is hereby granted, free of charge, to any person obtaining a copy
+of this software and associated documentation files (the "Software"), to deal
+in the Software without restriction, including without limitation the rights
+to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
+copies of the Software, and to permit persons to whom the Software is
+furnished to do so, subject to the following conditions:
+
+The above copyright notice and this permission notice shall be included in
+all copies or substantial portions of the Software.
+
+THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
+IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
+FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL THE
+AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
+LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
+OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
+THE SOFTWARE.

Added: trunk/Master/texmf-dist/doc/latex/bxjaprnind/README-ja.md
===================================================================
--- trunk/Master/texmf-dist/doc/latex/bxjaprnind/README-ja.md	                        (rev 0)
+++ trunk/Master/texmf-dist/doc/latex/bxjaprnind/README-ja.md	2017-06-10 21:42:08 UTC (rev 44554)
@@ -0,0 +1,45 @@
+BXjaprnind パッケージ
+=====================
+
+LaTeX: 段落頭の開き括弧類の位置の自動調整
+
+段落冒頭および強制改行後の行頭における開き括弧の位置をユーザが予め
+設定した値に自動的に調整する。
+
+### 対応環境
+
+  - TeX フォーマット: LaTeX
+  - TeX エンジン: pTeX/upTeX/LuaTeX(+LuaTeX-ja)
+  - 依存パッケージ: bxtoolbox([BXbase] バンドル)
+
+[BXbase]: https://www.ctan.org/pkg/bxbase
+
+### インストール
+
+TDS 1.1 に準拠するシステムの場合、以下のようにファイルを移動する:
+
+  - *.sty      →  $TEXMF/tex/latex/BXjaprnind
+
+この後必要に応じて mktexlsr を実行する。
+
+### ライセンス
+
+本パッケージは MIT ライセンスの下で配布される。
+
+bxjaprnind パッケージ ― 本体
+-----------------------------
+
+詳細は解説文書 bxjaprnind.pdf を参照。
+
+更新履歴
+--------
+
+  * Version 0.3a 〈2013/05/05〉
+      - 会話用の特別な鉤括弧の処理を追加した。
+  * Version 0.3  〈2013/04/29〉
+      - everyhook パッケージへの依存を無くした。
+  * Version 0.2  〈2012/05/14〉
+
+----------------------------------------
+Takayuki YATO (aka. "ZR")  
+http://zrbabbler.sp.land.to/


Property changes on: trunk/Master/texmf-dist/doc/latex/bxjaprnind/README-ja.md
___________________________________________________________________
Added: svn:eol-style
## -0,0 +1 ##
+native
\ No newline at end of property
Added: trunk/Master/texmf-dist/doc/latex/bxjaprnind/README.md
===================================================================
--- trunk/Master/texmf-dist/doc/latex/bxjaprnind/README.md	                        (rev 0)
+++ trunk/Master/texmf-dist/doc/latex/bxjaprnind/README.md	2017-06-10 21:42:08 UTC (rev 44554)
@@ -0,0 +1,61 @@
+BXjaprnind Package
+==================
+
+LaTeX: To adjust the position of parentheses at paragraph head
+
+In Japanese typesetting, opening parentheses placed at the beginning
+of paragraphs or lines are treated specially; for example, while the
+paragraph indent before normal kanji characters is 1em, the indent
+before parentheses can be 0.5em, 1em or 1.5em deoending on the local
+rule in effect.
+
+This package allows users to specify the amount of indent just before
+Japanese parentheses placed at paragraph/line head.
+
+### System requirement
+
+  * TeX format: LaTeX.
+  * TeX engine: pTeX / upTeX / LuaTeX (+ LuaTeX-ja).  
+    (The support for XeTeX is currently broken.)
+  * Dependent packages:
+      - bxtoolbox (from [BXbase] bundle)
+
+[BXbase]: https://www.ctan.org/pkg/bxbase
+
+### Package content
+
+  * `bxjaprnind.sty`: the package
+  * `bxjaprnind.pdf`: the user manual (in Japanese)
+  * `bxjaprnind.tex`: the source file of `bxjaprnind.pdf`
+  * `sample-bxjaprnind.pdf`: a sample document (in Japanese)
+  * `sample-bxjaprnind.tex`: the source file of `sample-bxjaprnind.pdf`
+
+### Installation
+
+In a system compliant to TDS 1.1, move the files as follows:
+
+  - `*.sty` → $TEXMF/tex/latex/BXjaprnind
+
+And rehash your TEXMF trees if necessary.
+
+### License
+
+This package is distributed under the MIT License.
+
+
+bxjaprnind package ― main
+--------------------------
+
+See the manual bxjaprnind.pdf (in Japanese) for detail.
+
+
+Revision History
+----------------
+
+  * Version 0.3a 〈2013/05/05〉
+  * Version 0.3  〈2013/04/29〉
+  * Version 0.2  〈2012/05/14〉
+
+--------------------
+Takayuki YATO (aka. "ZR")  
+https://github.com/zr-tex8r


Property changes on: trunk/Master/texmf-dist/doc/latex/bxjaprnind/README.md
___________________________________________________________________
Added: svn:eol-style
## -0,0 +1 ##
+native
\ No newline at end of property
Added: trunk/Master/texmf-dist/doc/latex/bxjaprnind/bxjaprnind.pdf
===================================================================
(Binary files differ)

Index: trunk/Master/texmf-dist/doc/latex/bxjaprnind/bxjaprnind.pdf
===================================================================
--- trunk/Master/texmf-dist/doc/latex/bxjaprnind/bxjaprnind.pdf	2017-06-10 21:36:05 UTC (rev 44553)
+++ trunk/Master/texmf-dist/doc/latex/bxjaprnind/bxjaprnind.pdf	2017-06-10 21:42:08 UTC (rev 44554)

Property changes on: trunk/Master/texmf-dist/doc/latex/bxjaprnind/bxjaprnind.pdf
___________________________________________________________________
Added: svn:mime-type
## -0,0 +1 ##
+application/pdf
\ No newline at end of property
Added: trunk/Master/texmf-dist/doc/latex/bxjaprnind/bxjaprnind.tex
===================================================================
--- trunk/Master/texmf-dist/doc/latex/bxjaprnind/bxjaprnind.tex	                        (rev 0)
+++ trunk/Master/texmf-dist/doc/latex/bxjaprnind/bxjaprnind.tex	2017-06-10 21:42:08 UTC (rev 44554)
@@ -0,0 +1,118 @@
+% 文字コードは UTF-8
+% lualatex で組版する(LuaTeX-ja 使用)
+\documentclass[a4paper]{ltjsarticle}
+\usepackage[ipaex]{luatexja-preset}
+\usepackage{metalogo}
+\usepackage{shortvrb}
+\MakeShortVerb{\|}
+\newcommand{\PkgVersion}{0.3a}
+\newcommand{\Pkg}[1]{\textsf{#1}}
+\newcommand{\Meta}[1]{$\langle$\mbox{}#1\mbox{}$\rangle$}
+\newcommand{\Note}{\par\noindent ※}
+\newcommand{\Means}{~:\quad}
+\providecommand{\pTeX}{p\TeX}
+\providecommand{\upTeX}{u\pTeX}
+%-----------------------------------------------------------
+\begin{document}
+\title{\Pkg{bxjaprnind} パッケージ(v\PkgVersion)}
+\author{八登崇之\ (Takayuki YATO; aka.~``ZR'')}
+\date{2013/05/05}
+\maketitle
+
+%===========================================================
+\section{概要}
+
+以下の機能を提供する。
+\begin{itemize}
+\item 段落冒頭および強制改行後の行頭における開き括弧の前に
+  (環境により)挿入されるグルーを除去する。
+  このようなグルーが行分割の都合で伸縮すると、
+  ソース上で同じ条件にある括弧の位置が揃わないという
+  不都合が生じる。
+\item さらに、そのような開き括弧の前の字下げを、
+  著者が予め設定した量に自動的に調整する。
+\item 強制改行命令(|\\|)のオプションとして
+  改行後に予め設定した量の字下げを行えるようにする。
+\end{itemize}
+
+\paragraph{対応フォーマット} \LaTeX。
+
+\paragraph{対応エンジン} 次の何れか。
+\begin{itemize}
+\item {\pTeX}またはその拡張。
+\item {\XeTeX}(\Pkg{ZXjatype}パッケージ使用時)
+\item {\LuaTeX}(\Pkg{LuaTeX-ja}パッケージ使用時)
+\end{itemize}
+
+\paragraph{依存パッケージ} 次の通り。
+\begin{itemize}
+\item \Pkg{bxtoolbox} パッケージ(\Pkg{BXbase}バンドルに含まれる)
+\item 0.3版以降は\Pkg{everyhook}パッケージに依存しなくなった。
+しかし、\Pkg{everyhook}パッケージが利用可能である場合はそれを利用する。
+\item \Pkg{everyhook}パッケージは\Pkg{svn-proc} パッケージに依存する。
+\end{itemize}
+
+%===========================================================
+\section{パッケージの読込}
+
+|\usepackage| で読み込む。
+オプションはない。
+\begin{verbatim}
+\usepackage{bxjaprnind}
+\end{verbatim}
+
+%===========================================================
+\section{機能}
+
+以下の命令が提供される。
+
+\begin{itemize}
+\item |\useparheadparenindent|/|\nouseparheadparenindent|\Means
+  段落頭での開き括弧調整を有効/無効にする。
+\item |\uselineheadparenindent|/|\nouselineheadparenindent|\Means
+  強制改行後の行頭での開き括弧調整を有効/無効にする。
+  \Note 折り返しの行頭の調整には対応しない
+  (これにはJFMの修正が必須)。
+  現在(u){\pTeX}で標準的に用いられるJFMの場合、
+  折り返し行頭の開き括弧の前には空きは入らない。
+\item |\prnind[|\Meta{実数$r$}|]|\Means
+  段落頭で用いて、当該の箇所での調整を
+  (|\nouseparheadparenindent| の状態でも)有効にする。
+  オプションの引数が存在する場合は、
+  開き括弧の前の空きを$r$全角幅とする。
+\item |\\[|\Meta{引数}|]|/|\\*[|\Meta{引数}|]|\Means
+  強制改行命令のオプション引数が次のように拡張される。
+  \begin{itemize}
+  \item |\\[>]|\Means
+    行頭に |\lineheadforceindentamount| で指定した幅の
+    字下げを挿入する。
+  \item |\\[!]|\Means
+    開き括弧調整の有効・無効を逆転する。
+    元々の引数(改行調整の値)と併用する場合は、
+    |!| や |>| を長さの値の前に記述する
+    (例えば |\\[>!2mm]|)。
+  \end{itemize}
+\item |\parheadparenindentamount{|\Meta{実数$r$}|}|\Means
+  段落頭での開き括弧の前の追加の空きを$r$全角幅とする。
+  段落下げの空き(|\parindent|)はこれとは独立に入ることに注意。
+\item |\lineheadparenindentamount{|\Meta{実数$r$}|}|\Means
+  強制改行後の行頭での開き括弧の前の追加の空きを$r$全角幅とする。
+  (強制字下げ(|\\[>]|)の空きとは独立。)
+\item |\lineheadforceindentamount{|\Meta{実数$r$}|}|\Means
+  強制字下げ(|\\[>]|)の空きを$r$全角幅とする。
+\item |\usedialogueparenindent|/|\nousedialogueparenindent|\Means
+  会話用の特別な開き括弧調整を有効/無効にする。
+  有効にすると鉤括弧「」『』について以下のように調整方法が変わる。
+  \begin{itemize}
+  \item 空きの量を |\dialogueparenindentamount| で指定された値にする。
+  \item 段落頭の場合は段落下げの空き(|\parindent|)を無効にする。
+  \end{itemize}
+  \Note
+  臨時に鉤括弧の扱いを通常の括弧と同じにしたい場合は、
+  当該の鉤括弧の前に |\prnind| を置けばよい。
+\item |\dialogueparenindentamount{|\Meta{実数$r$}|}|\Means
+  段落頭・強制改行行頭での会話用の開き鉤括弧の前の追加の
+  空きを$r$全角幅とする。
+\end{itemize}
+
+\end{document}


Property changes on: trunk/Master/texmf-dist/doc/latex/bxjaprnind/bxjaprnind.tex
___________________________________________________________________
Added: svn:eol-style
## -0,0 +1 ##
+native
\ No newline at end of property
Added: trunk/Master/texmf-dist/doc/latex/bxjaprnind/sample-bxjaprnind.pdf
===================================================================
(Binary files differ)

Index: trunk/Master/texmf-dist/doc/latex/bxjaprnind/sample-bxjaprnind.pdf
===================================================================
--- trunk/Master/texmf-dist/doc/latex/bxjaprnind/sample-bxjaprnind.pdf	2017-06-10 21:36:05 UTC (rev 44553)
+++ trunk/Master/texmf-dist/doc/latex/bxjaprnind/sample-bxjaprnind.pdf	2017-06-10 21:42:08 UTC (rev 44554)

Property changes on: trunk/Master/texmf-dist/doc/latex/bxjaprnind/sample-bxjaprnind.pdf
___________________________________________________________________
Added: svn:mime-type
## -0,0 +1 ##
+application/pdf
\ No newline at end of property
Added: trunk/Master/texmf-dist/doc/latex/bxjaprnind/sample-bxjaprnind.tex
===================================================================
--- trunk/Master/texmf-dist/doc/latex/bxjaprnind/sample-bxjaprnind.tex	                        (rev 0)
+++ trunk/Master/texmf-dist/doc/latex/bxjaprnind/sample-bxjaprnind.tex	2017-06-10 21:42:08 UTC (rev 44554)
@@ -0,0 +1,131 @@
+% upLaTeX文書; 文字コードはUTF-8
+\documentclass[a4paper,uplatex]{jsarticle}
+\usepackage{bxjaprnind}
+\newcommand{\Pkg}[1]{\textsf{#1}}
+\begin{document}
+\title{\Pkg{bxjaprnind}パッケージサンプル出力}
+\author{八登崇之\ (Takayuki YATO; aka.~``ZR'')}
+\date{2013/04/29}
+\maketitle
+
+%-------------------
+\section{段落頭の括弧類の空き自動補正}
+\newcommand\SampleTextA{%
+「□□□□?」\par
+「□□□□□□□□、□□□□□□□□」\par
+「□□□□□□□□!」\par
+}
+
+\begin{itemize}
+\item 左は自動補正を無効化(\verb|\nouseparheadparenindent|)。
+\item 右は自動補正を有効化(\verb|\useparheadparenindent|)。
+\end{itemize}
+\begin{center}
+% 既定は有効だが敢えて無効にする
+\nouseparheadparenindent   % 段落頭での補正を無効に
+\fbox{\begin{minipage}{10zw}
+  \setlength{\parindent}{1zw}
+  \SampleTextA
+\end{minipage}}%
+\hspace{4zw}
+\useparheadparenindent   % 段落頭での補正を有効に
+\fbox{\begin{minipage}{10zw}
+  \setlength{\parindent}{1zw}
+  \SampleTextA
+\end{minipage}}%
+\end{center}
+
+%-------------------
+\section{段落頭の括弧類の空きの補正値の変更}
+\newcommand\SampleTextB{%
+「□□□□□□□、□□□□□□□□□□□□□□□」
+}
+
+\begin{itemize}
+\item 左は既定(\verb|\parheadparenindentamount{0}|)。
+\item 右は半角下げに変更(\verb|\parheadparenindentamount{-0.5}|)。
+\item 段落下げ(\verb|\parindent|)が入った位置を基準にしている。
+\item 強制改行後の空白の調整は可能(\verb|\lineheadparenindentamount|)
+だが折り返し行頭の空白の調整は{\pTeX}の仕様上困難である。
+\end{itemize}
+\begin{center}
+\parheadparenindentamount{0} % 全角下げ(既定値)
+\fbox{\begin{minipage}{10zw}
+  \setlength{\parindent}{1zw}
+  \SampleTextB
+\end{minipage}}%
+\hspace{4zw}
+\parheadparenindentamount{-0.5} % 二分下げ
+\fbox{\begin{minipage}{10zw}
+  \setlength{\parindent}{1zw}
+  \SampleTextB
+\end{minipage}}%
+\end{center}
+
+%-------------------
+\section{強制改行後の括弧類の空きの補正値の変更}
+\newcommand\SampleTextC{%
+「□□□□?」\\
+「□□□。□□!」\\
+「□□□□□□。□□□□□□□□□□□□□□」\\
+「□□□□□□□!」
+}
+
+\begin{itemize}
+\item ソースでは各台詞の間に強制改行が入れられている。
+\item 左は既定の設定。
+\item 右は %
+\verb|\parheadparenindentamount{-0.5}\lineheadparenindentamount{0.5}|。
+\item 鉤括弧以外の括弧にも効くのでグローバル設定には不適切であるが、
+この設定にする環境を作る等の方法が考えられる。
+\item やっぱり不便なので次節の機能を作った。
+\end{itemize}
+\begin{center}
+\fbox{\begin{minipage}{10zw}
+  \setlength{\parindent}{1zw}
+  \SampleTextC
+\end{minipage}}%
+\hspace{4zw}
+\parheadparenindentamount{-0.5}\lineheadparenindentamount{0.5}
+\fbox{\begin{minipage}{10zw}
+  \setlength{\parindent}{1zw}
+  \SampleTextC
+\end{minipage}}%
+\end{center}
+
+%-------------------
+\section{会話の鉤括弧のための特別な処理}
+\newcommand\SampleTextD{%
+□□□、□□□□□□□□□。\par
+「□□□□?」\\
+「□□□。□□!」\\
+「□□□□□□。□□□□□□□□□□□□□□」\\
+「□□□□□□□!」\par
+(□□□)□□□□、□□□□□□。\par
+}
+
+\begin{itemize}
+\item ソースでは各台詞の間に強制改行が入れられている。
+(その前後は改段落している。)
+\item 左は既定の設定。
+\item 右は \verb|\usedialogueparenindent|。
+\item 鉤括弧だけ \verb|\dialogueparenindentamount| で指定した字下げ量
+(既定は半角)になり、さらに段落下げが無効になる。
+鉤括弧以外の括弧の処理は通常通り。
+\item 鉤括弧を通常の括弧として扱いたい場合は、直前に \verb|\prnind|
+を置けばよい。
+\end{itemize}
+\begin{center}
+\fbox{\begin{minipage}{10zw}
+  \setlength{\parindent}{1zw}
+  \SampleTextD
+\end{minipage}}%
+\hspace{4zw}
+\usedialogueparenindent
+\fbox{\begin{minipage}{10zw}
+  \setlength{\parindent}{1zw}
+  \SampleTextD
+\end{minipage}}%
+\end{center}
+
+\end{document}


Property changes on: trunk/Master/texmf-dist/doc/latex/bxjaprnind/sample-bxjaprnind.tex
___________________________________________________________________
Added: svn:eol-style
## -0,0 +1 ##
+native
\ No newline at end of property
Added: trunk/Master/texmf-dist/tex/latex/bxjaprnind/bxjaprnind.sty
===================================================================
--- trunk/Master/texmf-dist/tex/latex/bxjaprnind/bxjaprnind.sty	                        (rev 0)
+++ trunk/Master/texmf-dist/tex/latex/bxjaprnind/bxjaprnind.sty	2017-06-10 21:42:08 UTC (rev 44554)
@@ -0,0 +1,359 @@
+%
+% bxjaprnind.sty
+%
+
+\NeedsTeXFormat{LaTeX2e}
+\ProvidesPackage{bxjaprnind}[2013/05/05 v0.3a]
+
+\def\bxpi at pkgname{bxjaprnind}
+\def\bxpi at error{\PackageError\bxpi at pkgname}
+
+%% definitions
+\newdimen\bxpi at dima
+
+%% code guards
+\edef\bxpi at restore@codes{%
+\catcode33=\the\catcode33%<!>
+\catcode34=\the\catcode34%<">
+\catcode62=\the\catcode62%<>>
+\endlinechar=\the\endlinechar%
+\relax}%
+\catcode33=12 %
+\catcode34=12 %
+\catcode62=12 %
+\AtEndOfPackage{%
+\bxpi at restore@codes
+\undef\bxpi at restore@codes}
+
+%------------------- setting the everypar hook
+
+\RequirePackage{bxtoolbox}
+
+%% Checks if everyhook package is available
+\@tempswafalse
+\ifbxineTeX
+  \IfFileExists{everyhook.sty}{%
+    \@tempswatrue
+  }{}
+\fi
+
+\if at tempswa
+  % if everyhook is available...
+  \RequirePackage{everyhook}[2011/02/04]
+
+  % register the hook
+  \PushPostHook{par}{\bxpi at par@hook}
+
+\else
+  % otherwise...
+  % makes a hook to \everypar for myself
+  \let\bxpi at everypar\everypar
+  \newtoks\everypar
+  \everypar\bxpi at everypar
+  \bxpi at everypar{\the\expandafter\everypar\bxpi at par@hook}%
+
+\fi
+\endlinechar=-1 %
+%------------------- setting the newline hook
+
+%% adds hooks to (subcommands of) \\
+\preto\@xnewline{\bxpi at init@param}
+\let\bxpi at org@@newline\@newline
+\def\@newline[#1]{
+  \bxpi at parse@arg{#1}
+  \expandafter\bxpi at org@@newline\expandafter[\bxpi at res]
+}
+\begingroup
+  \toks@\expandafter{\@gnewline{#1}}
+  \edef\bxpi at next{
+    \gdef\noexpand\@gnewline##1{
+      \the\toks@
+      \noexpand\bxpi at paren@indent
+    }
+  }
+  \bxpi at next
+\endgroup
+
+%------------------- helpers
+
+%% \bxpi at inhibitglue
+\ifdef\inhibitglue{
+  \let\bxpi at inhibitglue\inhibitglue
+}{%else
+  \let\bxpi at inhibitglue\relax
+  \bxpi at warn{
+    \string\inhibitglue\space unavailable in current settings;
+    \MessageBreak the package may not work properly
+  }
+}
+
+%------------------- main
+
+%% \def\bxpi at parhead
+\def\bxpi at parhead{0}
+%% \def\bxpi at linehead
+\def\bxpi at linehead{0}
+%% \def\bxpi at dialogue
+\def\bxpi at dialogue{0.5}
+%% \def\bxpi at lineheadforce
+\def\bxpi at lineheadforce{1}
+%% \ifbxpi at d@parprnind
+\newbool{bxpi at d@parprnind}\bxpi at d@parprnindtrue
+%% \ifbxpi at d@lineprnind
+\newbool{bxpi at d@lineprnind}\bxpi at d@lineprnindtrue
+%% \ifbxpi at diaprnind
+\newbool{bxpi at diaprnind}\bxpi at diaprnindfalse
+%% \ifbxpi at prnind
+\newbool{bxpi at prnind}
+%% \ifbxpi at forceind
+\newbool{bxpi at forceind}
+%% \bxpi at choice
+\let\bxpi at choice\relax
+
+%%<*> \useparheadparenindent
+\bxNewrobustcmd*{\useparheadparenindent}{
+  \bxpi at d@parprnindtrue
+}
+
+%%<*> \nouseparheadparenindent
+\bxNewrobustcmd*{\nouseparheadparenindent}{
+  \bxpi at d@parprnindfalse
+}
+
+%%<*> \uselineheadparenindent
+\bxNewrobustcmd*{\uselineheadparenindent}{
+  \bxpi at d@lineprnindtrue
+}
+
+%%<*> \nouselineheadparenindent
+\bxNewrobustcmd*{\nouselineheadparenindent}{
+  \bxpi at d@lineprnindfalse
+}
+
+%%<*> \usedialogueparenindent
+\bxNewrobustcmd*{\usedialogueparenindent}{
+  \bxpi at diaprnindtrue
+}
+
+%%<*> \nousedialogueparenindent
+\bxNewrobustcmd*{\nousedialogueparenindent}{
+  \bxpi at diaprnindfalse
+}
+
+%%<*> \parheadparenindentamount
+% Sets the value of \bxpi at parhead.
+\bxNewrobustcmd*{\parheadparenindentamount}[1]{
+  \edef\bxpi at parhead{#1}
+}
+
+%<*> \lineheadparenindentamount
+% Sets the value of \bxpi at linehead.
+\bxNewrobustcmd*{\lineheadparenindentamount}[1]{
+  \edef\bxpi at linehead{#1}
+}
+
+%<*> \lineheadforceindentamount
+% Sets the value of \bxpi at lineheadforce.
+\bxNewrobustcmd*{\lineheadforceindentamount}[1]{
+  \edef\bxpi at lineheadforce{#1}
+}
+
+%%<*> \prnind
+%
+\bxNewrobustcmd*{\prnind}{
+  \leavevmode\relax
+  \bxpi at prnindtrue
+  \bxpi at forceindfalse
+  \let\bxpi at choice=m
+  \kernel at ifnextchar[{
+    \bxpi at prnind@a
+  }{%else
+    \let\bxpi at value\bxpi at parhead
+    \bxpi at paren@indent
+  }
+}
+\def\bxpi at prnind@a[#1]{
+  \def\bxpi at value{#1}
+  \bxpi at paren@indent
+}
+
+%% \bxpi at init@param
+% Initializes the parameters.
+% (Invoked at every \\.)
+\def\bxpi at init@param{
+  \bxpi at prnind@linedflt
+  \bxpi at forceindfalse
+  \let\bxpi at choice=l
+  \let\bxpi at value\bxpi at linehead
+}
+
+%% \bxpi at parse@arg{<str>}
+% Parses the option argument of \\. It reads the prefix > and !
+% and sets the switches bxpi at forceind and bxpi at prnind, then
+% sets the remaining string to \bxpi at res, which is passed to
+% the original argument parser (\@newline).
+\def\bxpi at parse@arg#1{%
+  \bxpi at parse@arg at a#1\bxpi at end
+}
+\def\bxpi at parse@arg at a{
+  \futurelet\bxpi at tok\bxpi at parse@arg at b
+}
+\def\bxpi at parse@arg at b{
+  \bxIfx{\bxpi at tok\bgroup}{
+    \bxpi at parse@arg at c
+  }{%else
+    \bxpi at parse@arg at d
+  }
+}
+\def\bxpi at parse@arg at c#1\bxpi at end{
+  \ifstrempty{#1}{
+    \def\bxpi at res{\z@}
+  }{%else
+    \def\bxpi at res{#1}
+  }
+}
+\def\bxpi at parse@arg at d#1{%
+  \bxIfx{,#1}{
+    \bxpi at parse@arg at a
+  }{\bxIfx{!#1}{
+    \ifbxpi at prnind \bxpi at prnindfalse
+    \else \bxpi at prnindtrue
+    \fi
+    \bxpi at parse@arg at a
+  }{\bxIfx{>#1}{
+    \bxpi at forceindtrue
+    \bxpi at parse@arg at a
+  }{
+    \bxpi at parse@arg at c#1
+  }}}
+}
+
+%% \bxpi at par@hook
+\def\bxpi at par@hook{
+  \bxpi at prnind@pardflt
+  \bxpi at forceindfalse
+  \let\bxpi at choice=p
+  \let\bxpi at value\bxpi at parhead
+  \bxpi at paren@indent
+}
+
+%% \bxpi at paren@indent
+\def\bxpi at paren@indent{
+  \bxpi at dima=-\maxdimen
+  \ifbxpi at forceind
+    \bxGetZenkakuWidth
+    \bxpi at dima=\bxResDim
+    % empty boxes never warn undefhull
+    \hb at xt@\bxpi at lineheadforce\bxpi at dima{}
+\bxDebug{forceind:\bxpi at lineheadforce}
+  \fi
+  \ifbool{bxpi at prnind}{
+    \futurelet\bxpi at tok\bxpi at prnindent@a
+  }{%else
+    \ignorespaces
+  }
+}
+\expandafter\def\expandafter\bxpi at prnindent@space\space{
+  \futurelet\bxpi at tok\bxpi at prnindent@a
+}
+\def\bxpi at prnindent@a{
+  \bxIf{\@sptoken\bxpi at tok}{
+    \bxpi at prnindent@space
+  }{\bxIfCharToken\bxpi at tok{
+    \bxpi at prnindent@b
+  }{%else
+    \ignorespaces
+  }}
+}
+\def\bxpi at prnindent@b#1{
+  \bxpi at if@open at paren#1{
+    \ifbxpi at diaprnind
+      \if m\bxpi at choice \else
+        \bxpi at if@dia at open@paren#1{
+          \let\bxpi at value\bxpi at dialogue
+          \if p\bxpi at choice
+            {\setbox0=\lastbox}
+\bxDebug{cancel parindent}
+          \fi
+        }
+      \fi
+    \fi
+    \bxpi at prnindent@c
+  }
+  #1
+}
+\def\bxpi at prnindent@c{
+  \ifdim \bxpi at dima<\z@
+    \bxGetZenkakuWidth
+    \bxpi at dima=\bxResDim
+  \fi
+  \kern\bxpi at value\bxpi at dima
+\bxDebug{parind:\bxpi at value}
+  \bxpi at inhibitglue
+}
+
+%% \bxpi at if@open at paren
+\def\bxpi at if@open at paren#1{
+  \bxIfcsundef{bxpi at P/#1}
+   {\@gobble}
+   {\@firstofone}
+}
+
+%% \bxpi at if@dia at open@paren
+\def\bxpi at if@dia at open@paren#1{
+  \bxIfcsundef{bxpi at DP/#1}
+   {\@gobble}
+   {\@firstofone}
+}
+
+%% \bxpi at prnind@pardflt
+\edef\bxpi at prnind@pardflt{
+  \let\bxCsNoexpand{ifbxpi at prnind}
+   \bxCsNoexpand{ifbxpi at d@parprnind}
+}
+%% \bxpi at prnind@linedflt
+\edef\bxpi at prnind@linedflt{
+  \let\bxCsNoexpand{ifbxpi at prnind}
+   \bxCsNoexpand{ifbxpi at d@lineprnind}
+}
+
+%------------------- character table
+
+%% \bxpi at P/<char>
+\def\do#1#2{%
+  \bxToUcsCharDual{"#1}{"#2}
+  \cslet{bxpi at P/\bxRes}{t}
+}
+\do{2146}{2018}
+\do{2148}{201C}
+\do{214A}{FF08}
+\do{214C}{3014}
+\do{214E}{FF3B}
+\do{2150}{FF5B}
+\do{2152}{3008}
+\do{2154}{300A}
+\do{2156}{300C}
+\do{2158}{300E}
+\do{215A}{3010}
+\ifbxHasUcsChar
+  \def\do#1{
+    \bxToUcsChar{"#1}
+    \cslet{bxpi at P/\bxRes}{t}
+  }
+\do{2985}
+\do{3018}
+\do{3016}
+\do{00AB}
+\do{301D}
+\fi
+
+%% \bxpi at DP/<char>
+\def\do#1#2{%
+  \bxToUcsCharDual{"#1}{"#2}
+  \cslet{bxpi at DP/\bxRes}{t}
+}
+\do{2156}{300C}
+\do{2158}{300E}
+
+%------------------- all done
+\endinput


Property changes on: trunk/Master/texmf-dist/tex/latex/bxjaprnind/bxjaprnind.sty
___________________________________________________________________
Added: svn:eol-style
## -0,0 +1 ##
+native
\ No newline at end of property
Modified: trunk/Master/tlpkg/bin/tlpkg-ctan-check
===================================================================
--- trunk/Master/tlpkg/bin/tlpkg-ctan-check	2017-06-10 21:36:05 UTC (rev 44553)
+++ trunk/Master/tlpkg/bin/tlpkg-ctan-check	2017-06-10 21:42:08 UTC (rev 44554)
@@ -124,7 +124,7 @@
     breakcites breakurl bredzenie breqn bropd brushscr
     bullcntr bundledoc burmese bussproofs
     bxbase bxcalc bxcjkjatype bxdpx-beamer bxdvidriver
-    bxpapersize bxpdfver bxeepic bxenclose
+    bxjaprnind bxpapersize bxpdfver bxeepic bxenclose
     bxjalipsum bxjscls bxnewfont bxorigcapt bytefield 
   c90 c-pascal cabin cachepic caladea calcage calctab calculation calculator
     calligra calligra-type1 callouts calrsfs cals calxxxx-yyyy cancel

Added: trunk/Master/tlpkg/tlpsrc/bxjaprnind.tlpsrc
===================================================================
Modified: trunk/Master/tlpkg/tlpsrc/collection-langjapanese.tlpsrc
===================================================================
--- trunk/Master/tlpkg/tlpsrc/collection-langjapanese.tlpsrc	2017-06-10 21:36:05 UTC (rev 44553)
+++ trunk/Master/tlpkg/tlpsrc/collection-langjapanese.tlpsrc	2017-06-10 21:42:08 UTC (rev 44554)
@@ -8,6 +8,7 @@
 depend bxbase
 depend bxcjkjatype
 depend bxjalipsum
+depend bxjaprnind
 depend bxjscls
 depend bxorigcapt
 depend convbkmk



More information about the tex-live-commits mailing list