texlive[45291] Master/texmf-dist: bxjaprnind (14sep17)

[commits+karl at tug.org]

Revision: 45291
          http://tug.org/svn/texlive?view=revision&revision=45291
Author:   karl
Date:     2017-09-14 00:06:15 +0200 (Thu, 14 Sep 2017)
Log Message:
-----------
bxjaprnind (14sep17)

Modified Paths:
--------------
    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/tex/latex/bxjaprnind/bxjaprnind.sty

Modified: trunk/Master/texmf-dist/doc/latex/bxjaprnind/LICENSE
===================================================================
--- trunk/Master/texmf-dist/doc/latex/bxjaprnind/LICENSE	2017-09-13 22:05:58 UTC (rev 45290)
+++ trunk/Master/texmf-dist/doc/latex/bxjaprnind/LICENSE	2017-09-13 22:06:15 UTC (rev 45291)
@@ -1,6 +1,6 @@
 The MIT License
 
-Copyright (c) 2013 Takayuki YATO (aka. "ZR")
+Copyright (c) 2017 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

Modified: trunk/Master/texmf-dist/doc/latex/bxjaprnind/README-ja.md
===================================================================
--- trunk/Master/texmf-dist/doc/latex/bxjaprnind/README-ja.md	2017-09-13 22:05:58 UTC (rev 45290)
+++ trunk/Master/texmf-dist/doc/latex/bxjaprnind/README-ja.md	2017-09-13 22:06:15 UTC (rev 45291)
@@ -34,6 +34,8 @@
 更新履歴
 --------
 
+  * Version 0.3b 〈2017/09/12〉
+      - source special 挿入への対策。
   * Version 0.3a 〈2013/05/05〉
       - 会話用の特別な鉤括弧の処理を追加した。
   * Version 0.3  〈2013/04/29〉

Modified: trunk/Master/texmf-dist/doc/latex/bxjaprnind/README.md
===================================================================
--- trunk/Master/texmf-dist/doc/latex/bxjaprnind/README.md	2017-09-13 22:05:58 UTC (rev 45290)
+++ trunk/Master/texmf-dist/doc/latex/bxjaprnind/README.md	2017-09-13 22:06:15 UTC (rev 45291)
@@ -52,6 +52,7 @@
 Revision History
 ----------------
 
+  * Version 0.3b 〈2017/09/12〉
   * Version 0.3a 〈2013/05/05〉
   * Version 0.3  〈2013/04/29〉
   * Version 0.2  〈2012/05/14〉

Modified: trunk/Master/texmf-dist/doc/latex/bxjaprnind/bxjaprnind.pdf
===================================================================
(Binary files differ)

Modified: trunk/Master/texmf-dist/doc/latex/bxjaprnind/bxjaprnind.tex
===================================================================
--- trunk/Master/texmf-dist/doc/latex/bxjaprnind/bxjaprnind.tex	2017-09-13 22:05:58 UTC (rev 45290)
+++ trunk/Master/texmf-dist/doc/latex/bxjaprnind/bxjaprnind.tex	2017-09-13 22:06:15 UTC (rev 45291)
@@ -5,7 +5,8 @@
 \usepackage{metalogo}
 \usepackage{shortvrb}
 \MakeShortVerb{\|}
-\newcommand{\PkgVersion}{0.3a}
+\newcommand{\PkgVersion}{0.3b}
+\newcommand{\PkgDate}{2017/09/12}
 \newcommand{\Pkg}[1]{\textsf{#1}}
 \newcommand{\Meta}[1]{$\langle$\mbox{}#1\mbox{}$\rangle$}
 \newcommand{\Note}{\par\noindent ※}
@@ -16,7 +17,7 @@
 \begin{document}
 \title{\Pkg{bxjaprnind} パッケージ（v\PkgVersion）}
 \author{八登崇之\ （Takayuki YATO; aka.~``ZR''）}
-\date{2013/05/05}
+\date{v\PkgVersion\quad[\PkgDate]}
 \maketitle
 
 %===========================================================

Modified: trunk/Master/texmf-dist/tex/latex/bxjaprnind/bxjaprnind.sty
===================================================================
--- trunk/Master/texmf-dist/tex/latex/bxjaprnind/bxjaprnind.sty	2017-09-13 22:05:58 UTC (rev 45290)
+++ trunk/Master/texmf-dist/tex/latex/bxjaprnind/bxjaprnind.sty	2017-09-13 22:06:15 UTC (rev 45291)
@@ -3,7 +3,7 @@
 %
 
 \NeedsTeXFormat{LaTeX2e}
-\ProvidesPackage{bxjaprnind}[2013/05/05 v0.3a]
+\ProvidesPackage{bxjaprnind}[2017/09/12 v0.3b]
 
 \def\bxpi at pkgname{bxjaprnind}
 \def\bxpi at error{\PackageError\bxpi at pkgname}
@@ -109,6 +109,8 @@
 \newbool{bxpi at forceind}
 %% \bxpi at choice
 \let\bxpi at choice\relax
+%% \bxpi at special
+\let\bxpi at special\relax
 
 %%<*> \useparheadparenindent
 \bxNewrobustcmd*{\useparheadparenindent}{
@@ -165,6 +167,7 @@
   \bxpi at prnindtrue
   \bxpi at forceindfalse
   \let\bxpi at choice=m
+  \let\bxpi at special\relax
   \kernel at ifnextchar[{
     \bxpi at prnind@a
   }{%else
@@ -185,6 +188,7 @@
   \bxpi at forceindfalse
   \let\bxpi at choice=l
   \let\bxpi at value\bxpi at linehead
+  \let\bxpi at special\relax
 }
 
 %% \bxpi at parse@arg{<str>}
@@ -234,6 +238,19 @@
   \bxpi at forceindfalse
   \let\bxpi at choice=p
   \let\bxpi at value\bxpi at parhead
+  \let\bxpi at special\relax
+  \futurelet\bxpi at tok\bxpi at par@hook at a
+}
+\def\bxpi at par@hook at a{
+  \bxIfx{\bxpi at tok\special}{
+    \bxpi at par@hook at b
+  }{%else
+    \bxpi at paren@indent
+  }
+}
+\def\bxpi at par@hook at b#1#2{
+  \def\bxpi at special{#2}
+\bxDebug{special:#2}
   \bxpi at paren@indent
 }
 
@@ -250,6 +267,7 @@
   \ifbool{bxpi at prnind}{
     \futurelet\bxpi at tok\bxpi at prnindent@a
   }{%else
+    \bxpi at put@special
     \ignorespaces
   }
 }
@@ -262,6 +280,7 @@
   }{\bxIfCharToken\bxpi at tok{
     \bxpi at prnindent@b
   }{%else
+    \bxpi at put@special
     \ignorespaces
   }}
 }
@@ -280,6 +299,7 @@
     \fi
     \bxpi at prnindent@c
   }
+  \bxpi at put@special
   #1
 }
 \def\bxpi at prnindent@c{
@@ -292,6 +312,15 @@
   \bxpi at inhibitglue
 }
 
+%% \bxpi at put@special
+\def\bxpi at put@special{
+  \ifx\bxpi at special\relax\else
+\bxDebug{put-special:}
+    \special{\bxpi at special}
+    \let\bxpi at special\relax
+  \fi
+}
+
 %% \bxpi at if@open at paren
 \def\bxpi at if@open at paren#1{
   \bxIfcsundef{bxpi at P/#1}