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