texlive[63447] Master/texmf-dist: luatexja (30may22)

commits+karl at tug.org commits+karl at tug.org
Mon May 30 22:07:11 CEST 2022 

Revision: 63447
          http://tug.org/svn/texlive?view=revision&revision=63447
Author:   karl
Date:     2022-05-30 22:07:11 +0200 (Mon, 30 May 2022)
Log Message:
-----------
luatexja (30may22)

Modified Paths:
--------------
    trunk/Master/texmf-dist/doc/luatex/luatexja/README
    trunk/Master/texmf-dist/doc/luatex/luatexja/ltjsclasses.pdf
    trunk/Master/texmf-dist/doc/luatex/luatexja/luatexja-en.pdf
    trunk/Master/texmf-dist/doc/luatex/luatexja/luatexja-ja.pdf
    trunk/Master/texmf-dist/doc/luatex/luatexja/luatexja.dtx
    trunk/Master/texmf-dist/source/luatex/luatexja/ltjsclasses.dtx
    trunk/Master/texmf-dist/tex/luatex/luatexja/addons/luatexja-preset.sty
    trunk/Master/texmf-dist/tex/luatex/luatexja/ltj-setwidth.lua
    trunk/Master/texmf-dist/tex/luatex/luatexja/ltjsarticle.cls
    trunk/Master/texmf-dist/tex/luatex/luatexja/ltjsbook.cls
    trunk/Master/texmf-dist/tex/luatex/luatexja/ltjskiyou.cls
    trunk/Master/texmf-dist/tex/luatex/luatexja/ltjspf.cls
    trunk/Master/texmf-dist/tex/luatex/luatexja/ltjsreport.cls
    trunk/Master/texmf-dist/tex/luatex/luatexja/luatexja.lua
    trunk/Master/texmf-dist/tex/luatex/luatexja/luatexja.sty
    trunk/Master/texmf-dist/tex/luatex/luatexja/patches/lltjcore.sty
    trunk/Master/texmf-dist/tex/luatex/luatexja/patches/lltjp-listings.sty

Modified: trunk/Master/texmf-dist/doc/luatex/luatexja/README
===================================================================
--- trunk/Master/texmf-dist/doc/luatex/luatexja/README	2022-05-30 20:06:19 UTC (rev 63446)
+++ trunk/Master/texmf-dist/doc/luatex/luatexja/README	2022-05-30 20:07:11 UTC (rev 63447)
@@ -1,4 +1,4 @@
-The LuaTeX-ja Package 20220411.0
+The LuaTeX-ja Package 20220530.0
 --------------------------------
 Copyright (c) 2011--2022 The LuaTeX-ja project
 License: modified BSD (see COPYING)
@@ -42,9 +42,9 @@
 2. If you must/want to install manually:
 
    a. Download the source archive from CTAN,
-      or tagged as 20220411.0 in the Git repository by
+      or tagged as 20220530.0 in the Git repository by
       <http://git.osdn.jp/view?p=luatex-ja/luatexja.git
-                              ;a=snapshot;h=refs/tags/20220411.0;sf=tgz>
+                              ;a=snapshot;h=refs/tags/20220530.0;sf=tgz>
 
    b. Extract the archive and process following three files by LuaLaTeX
       to generate classes for Japanese typesetting:
@@ -93,4 +93,4 @@
   This file and ltj-kinsoku.lua are not used anymore.
   (Do not remove ltj-kinsoku.tex.)
 
-Last commit date: Mon Apr 11 16:22:21 2022 +0900
+Last commit date: Mon May 30 12:00:10 2022 +0900

Modified: trunk/Master/texmf-dist/doc/luatex/luatexja/ltjsclasses.pdf
===================================================================
(Binary files differ)

Modified: trunk/Master/texmf-dist/doc/luatex/luatexja/luatexja-en.pdf
===================================================================
(Binary files differ)

Modified: trunk/Master/texmf-dist/doc/luatex/luatexja/luatexja-ja.pdf
===================================================================
(Binary files differ)

Modified: trunk/Master/texmf-dist/doc/luatex/luatexja/luatexja.dtx
===================================================================
--- trunk/Master/texmf-dist/doc/luatex/luatexja/luatexja.dtx	2022-05-30 20:06:19 UTC (rev 63446)
+++ trunk/Master/texmf-dist/doc/luatex/luatexja/luatexja.dtx	2022-05-30 20:07:11 UTC (rev 63447)
@@ -8404,15 +8404,13 @@
 %</ja>
 \item[bold]
 %<*en>
-Substitute bold series of gothic for  bold series of mincho.
+Substitute bold series of gothic for medium series of gothic and bold series of mincho.
 If \texttt{nodeluxe} option is enabled, medium series of gothic is also changed,
 since we use same font for both series of gothic.
 %</en>
 %<*ja>
-「明朝の太字」をゴシック体の太字によって代替する．
-もし\texttt{nodeluxe}オプションが指定されている場合は，ゴシック体は1ウェイトしか使用されな
-	   いため，
-「ゴシック体の中字」も同時に変更されることになる．
+\texttt{nodeluxe}オプション指定時には，「明朝の太字」をゴシック体と同じフォントにする．
+\texttt{deluxe}オプション指定時には，「明朝の太字」「ゴシック体の中字」をゴシック体の太字と同じフォントにする．
 %</ja>
 \item[jis90\textrm{,~}90jis]
 %<en>Use JIS~X~0208:1990 glyph variants if possible.
@@ -8439,7 +8437,7 @@
 
 \item[jis]
 %<en>Same as \texttt{jfm\_yoko=jis}.
-%<ja>\texttt{jfm\_yoko=jis}と同じ．ここで用いるJFM\texttt{jfm-jis.lua}はJISフォントメトリックを元にしたものである．
+%<ja>\texttt{jfm\_yoko=jis}と同じ．ここで用いるJFM~\texttt{jfm-jis.lua}はJISフォントメトリックを元にしたものである．
 
 \end{cslist}
 %<*en>
@@ -8917,10 +8915,10 @@
   新たに<name>という名称のプリセットを定義する．この名称は，
   すでに定義されているプリセット名や，
   \ref{sssec:ltjpreset-general}で定義されているオプション，さらに
-  次の11個と重複してはならない．
+  次の13個と重複してはならない．
   \begin{quote}
 	\ttfamily
-	mc mc-l mc-m mc-b mc-bx gt gt-m gt-b gt-bx gt-eb mg-m
+	mc mc-l mc-m mc-b mc-bx gt gt-u gt-d gt-m gt-b gt-bx gt-eb mg-m
   \end{quote}
 
   <specification>は，プリセット名や以下のキー達のコンマ区切りリストを指定する：
@@ -8929,8 +8927,12 @@
    \item[\ttfamily mc-m=<font>] 明朝体中字(\cs{mcfamily}\cs{mdseries})
    \item[\ttfamily mc-b=<font>] 明朝体太字(\cs{mcfamily}\cs{bfseries})
    \item[\ttfamily mc-bx=<font>] \texttt{mc-b=<font>}と同義．
-   \item[\ttfamily gt-m=<font>] ゴシック体中字(\cs{gtfamily}\cs{mdseries})
-   \item[\ttfamily gt-b=<font>] ゴシック体太字(\cs{gtfamily}\cs{bfseries})
+   \item[\ttfamily gt-u=<font>] \texttt{deluxe}オプション未指定時のゴシック体(\cs{gtfamily})・明朝体太字
+   \item[\ttfamily gt-d=<font>] \texttt{deluxe}オプション指定時のゴシック体中字(\cs{gtfamily}\cs{mdseries})
+   \item[\ttfamily gt-m=<font>] \texttt{deluxe}オプションの指定の有無に関係なく
+    ゴシック体中字(\cs{gtfamily}\cs{mdseries})を指定する．「\texttt{gt-u=<font>, gt-d<font>}」と同義．
+   \item[\ttfamily gt-b=<font>] ゴシック体太字(\cs{gtfamily}\cs{bfseries})\\
+    なお，パッケージ読み込み時に\texttt{bold}オプションが指定された場合は，\texttt{mc-b=<font>}を指定したことにもなる．
    \item[\ttfamily gt-bx=<font>] \texttt{gt-b=<font>}と同義．
    \item[\ttfamily gt-eb=<font>] ゴシック体太字(\cs{gtfamily}\cs{ebseries})
    \item[\ttfamily mg-m=<font>] 丸ゴシック体(\cs{mgfamily})
@@ -8942,19 +8944,17 @@
    \item[\ttfamily gt=<font>] ゴシック体の中字・太字・極太全部を設定．
 	以下を指定したことと同じである：
 	\begin{quote}
-	  \ttfamily gt-m=<font>, gt-b=<font>, gt-eb=<font>
+	  \ttfamily gt-u=<font>, gt-d=<font>, gt-b=<font>, gt-eb=<font>
 	\end{quote}
   \end{description}
-  なお，パッケージ読み込み時に \texttt{deluxe} が有効でない場合は，
-  上記11キーのうち\texttt{mc}, \texttt{gt}しか実質的に意味を持たない．
 %</ja>
 %<*en>
   Define new preset~<name>. This <name> cannot be same as other presets,
   options described in Subsubsection~\ref{sssec:ltjpreset-general}, nor
-  following 11~strings:
+  following 13~strings:
   \begin{quote}
-	\ttfamily	
-	mc mc-l mc-m mc-b mc-bx gt gt-m gt-b gt-bx gt-eb mg-m
+	\ttfamily
+	mc mc-l mc-m mc-b mc-bx gt gt-u gt-d gt-m gt-b gt-bx gt-eb mg-m
   \end{quote}
 
   <specification> is a comma-separated list which consists of
@@ -8964,22 +8964,23 @@
    \item[\ttfamily mc-m=<font>] mincho medium
    \item[\ttfamily mc-b=<font>] mincho bold
    \item[\ttfamily mc-bx=<font>] synonym for \texttt{mc-b=<font>}
-   \item[\ttfamily gt-m=<font>] gothic medium
-   \item[\ttfamily gt-b=<font>] gothic bold
+   \item[\ttfamily gt-u=<font>] gothic, when \texttt{deluxe}~option is not specified.
+   \item[\ttfamily gt-d=<font>] gothic medium, when \texttt{deluxe}~option is specified.
+   \item[\ttfamily gt-m=<font>] gothic medium. This key is equivalent to ``\texttt{gt-u=<font>, gt-d<font>}''.
+   \item[\ttfamily gt-b=<font>] gothic bold\\
+    Note that this key also specifies mincho bold if \texttt{bold} option is specified.
    \item[\ttfamily gt-bx=<font>] synonym for \texttt{gt-b=<font>}
    \item[\ttfamily gt-eb=<font>] gothic extra~bold
    \item[\ttfamily mg-m=<font>] rounded gothic
-   \item[\ttfamily mc=<font>] Same as
+   \item[\ttfamily mc=<font>] Equivalent to
 	\begin{quote}
 	  \ttfamily mc-l=<font>, mc-m=<font>, mc-b=<font>
 	\end{quote}
-   \item[\ttfamily gt=<font>] Same as
+   \item[\ttfamily gt=<font>] Equivalent to
 	\begin{quote}
-	  \ttfamily gt-m=<font>, gt-b=<font>, gt-eb=<font>
+	  \ttfamily gt-u=<font>, gt-d=<font>, gt-b=<font>, gt-eb=<font>
 	\end{quote}
   \end{description}
-  If \texttt{deluxe} is not specified at loading the package,
-  only \texttt{mc}~and~\texttt{gt} keys (among above 11~keys) have a meaning.
 %</en>
  \item[\cs{ltjnewpreset}*\{<name>\}\{<specification>\}]
 %<*ja>

Modified: trunk/Master/texmf-dist/source/luatex/luatexja/ltjsclasses.dtx
===================================================================
--- trunk/Master/texmf-dist/source/luatex/luatexja/ltjsclasses.dtx	2022-05-30 20:06:19 UTC (rev 63446)
+++ trunk/Master/texmf-dist/source/luatex/luatexja/ltjsclasses.dtx	2022-05-30 20:07:11 UTC (rev 63447)
@@ -5164,12 +5164,13 @@
 % |\@makefnmark| は脚注の番号を出力する命令です。
 % ここでは脚注が左端から一定距離に来るようにしてあります。
 %
+%
 %    \begin{macrocode}
 \newcommand\@makefntext[1]{%
   \advance\leftskip 3\zw
   \parindent 1\zw
   \noindent
-  \llap{\@makefnmark\hskip0.3\zw}#1}
+  \hb at xt@\z@{\hss\@makefnmark\hskip0.3\zw}#1}
 %    \end{macrocode}
 % \end{macro}
 %

Modified: trunk/Master/texmf-dist/tex/luatex/luatexja/addons/luatexja-preset.sty
===================================================================
--- trunk/Master/texmf-dist/tex/luatex/luatexja/addons/luatexja-preset.sty	2022-05-30 20:06:19 UTC (rev 63446)
+++ trunk/Master/texmf-dist/tex/luatex/luatexja/addons/luatexja-preset.sty	2022-05-30 20:07:11 UTC (rev 63447)
@@ -110,7 +110,6 @@
   gt-m .code:n = % gtfamily , medium series
      \prop_put:Nnn \g__ltjpreset_font_prop { gt-u } {#1}
      \prop_put:Nnn \g__ltjpreset_font_prop { gt-d } {#1},
-  % gt-d, gt-u は隠し
   gt .groups:n = { preset },   gt .value_required:n = true,
   gt-m .groups:n = { preset }, gt-m .value_required:n = true,
 }

Modified: trunk/Master/texmf-dist/tex/luatex/luatexja/ltj-setwidth.lua
===================================================================
--- trunk/Master/texmf-dist/tex/luatex/luatexja/ltj-setwidth.lua	2022-05-30 20:06:19 UTC (rev 63446)
+++ trunk/Master/texmf-dist/tex/luatex/luatexja/ltj-setwidth.lua	2022-05-30 20:07:11 UTC (rev 63447)
@@ -128,8 +128,7 @@
       end
    end
 
-   local q
-   head, q = node_remove(head, p)
+   local q; head, q = node_remove(head, p)
    if pwidth > fwidth then
       if char_data.round_threshold then
          local frac = pwidth / fwidth

Modified: trunk/Master/texmf-dist/tex/luatex/luatexja/ltjsarticle.cls
===================================================================
--- trunk/Master/texmf-dist/tex/luatex/luatexja/ltjsarticle.cls	2022-05-30 20:06:19 UTC (rev 63446)
+++ trunk/Master/texmf-dist/tex/luatex/luatexja/ltjsarticle.cls	2022-05-30 20:07:11 UTC (rev 63447)
@@ -1401,7 +1401,7 @@
   \advance\leftskip 3\zw
   \parindent 1\zw
   \noindent
-  \llap{\@makefnmark\hskip0.3\zw}#1}
+  \hb at xt@\z@{\hss\@makefnmark\hskip0.3\zw}#1}
 \let\@inhibitglue=\ltjfakeparbegin
 \def\@item[#1]{%
   \if at noparitem

Modified: trunk/Master/texmf-dist/tex/luatex/luatexja/ltjsbook.cls
===================================================================
--- trunk/Master/texmf-dist/tex/luatex/luatexja/ltjsbook.cls	2022-05-30 20:06:19 UTC (rev 63446)
+++ trunk/Master/texmf-dist/tex/luatex/luatexja/ltjsbook.cls	2022-05-30 20:07:11 UTC (rev 63447)
@@ -1494,7 +1494,7 @@
   \advance\leftskip 3\zw
   \parindent 1\zw
   \noindent
-  \llap{\@makefnmark\hskip0.3\zw}#1}
+  \hb at xt@\z@{\hss\@makefnmark\hskip0.3\zw}#1}
 \let\@inhibitglue=\ltjfakeparbegin
 \def\@item[#1]{%
   \if at noparitem

Modified: trunk/Master/texmf-dist/tex/luatex/luatexja/ltjskiyou.cls
===================================================================
--- trunk/Master/texmf-dist/tex/luatex/luatexja/ltjskiyou.cls	2022-05-30 20:06:19 UTC (rev 63446)
+++ trunk/Master/texmf-dist/tex/luatex/luatexja/ltjskiyou.cls	2022-05-30 20:07:11 UTC (rev 63447)
@@ -1365,7 +1365,7 @@
   \advance\leftskip 3\zw
   \parindent 1\zw
   \noindent
-  \llap{\@makefnmark\hskip0.3\zw}#1}
+  \hb at xt@\z@{\hss\@makefnmark\hskip0.3\zw}#1}
 \let\@inhibitglue=\ltjfakeparbegin
 \def\@item[#1]{%
   \if at noparitem

Modified: trunk/Master/texmf-dist/tex/luatex/luatexja/ltjspf.cls
===================================================================
--- trunk/Master/texmf-dist/tex/luatex/luatexja/ltjspf.cls	2022-05-30 20:06:19 UTC (rev 63446)
+++ trunk/Master/texmf-dist/tex/luatex/luatexja/ltjspf.cls	2022-05-30 20:07:11 UTC (rev 63447)
@@ -1259,7 +1259,7 @@
   \advance\leftskip 3\zw
   \parindent 1\zw
   \noindent
-  \llap{\@makefnmark\hskip0.3\zw}#1}
+  \hb at xt@\z@{\hss\@makefnmark\hskip0.3\zw}#1}
 \let\@inhibitglue=\ltjfakeparbegin
 \def\@item[#1]{%
   \if at noparitem

Modified: trunk/Master/texmf-dist/tex/luatex/luatexja/ltjsreport.cls
===================================================================
--- trunk/Master/texmf-dist/tex/luatex/luatexja/ltjsreport.cls	2022-05-30 20:06:19 UTC (rev 63446)
+++ trunk/Master/texmf-dist/tex/luatex/luatexja/ltjsreport.cls	2022-05-30 20:07:11 UTC (rev 63447)
@@ -1487,7 +1487,7 @@
   \advance\leftskip 3\zw
   \parindent 1\zw
   \noindent
-  \llap{\@makefnmark\hskip0.3\zw}#1}
+  \hb at xt@\z@{\hss\@makefnmark\hskip0.3\zw}#1}
 \let\@inhibitglue=\ltjfakeparbegin
 \def\@item[#1]{%
   \if at noparitem

Modified: trunk/Master/texmf-dist/tex/luatex/luatexja/luatexja.lua
===================================================================
--- trunk/Master/texmf-dist/tex/luatex/luatexja/luatexja.lua	2022-05-30 20:06:19 UTC (rev 63446)
+++ trunk/Master/texmf-dist/tex/luatex/luatexja/luatexja.lua	2022-05-30 20:07:11 UTC (rev 63447)
@@ -323,7 +323,7 @@
    local to_node = node.direct.tonode
    local to_direct = node.direct.todirect
    local ensure_tex_attr = ltjb.ensure_tex_attr
-
+   local slide = node.slide
    -- mode = true iff main_process is called from pre_linebreak_filter
    local function main_process(head, mode, dir, gc)
       ensure_tex_attr(attr_icflag, 0)
@@ -330,6 +330,7 @@
       if gc == 'fin_row' then return head
       else
             start_time_measure('jfmglue')
+            slide(head);
             local p = ltjj.main(to_direct(head),mode, dir)
             stop_time_measure('jfmglue')
             return to_node(p)

Modified: trunk/Master/texmf-dist/tex/luatex/luatexja/luatexja.sty
===================================================================
--- trunk/Master/texmf-dist/tex/luatex/luatexja/luatexja.sty	2022-05-30 20:06:19 UTC (rev 63446)
+++ trunk/Master/texmf-dist/tex/luatex/luatexja/luatexja.sty	2022-05-30 20:07:11 UTC (rev 63447)
@@ -27,7 +27,7 @@
 \newif\ifltj at disablejfam
 
 %%%% VERSION
-\def\LuaTeXjaversion{20220411.0}
+\def\LuaTeXjaversion{20220530.0}
 
 %% Check if LaTeX is used.
 \begingroup\expandafter\expandafter\expandafter\endgroup

Modified: trunk/Master/texmf-dist/tex/luatex/luatexja/patches/lltjcore.sty
===================================================================
--- trunk/Master/texmf-dist/tex/luatex/luatexja/patches/lltjcore.sty	2022-05-30 20:06:19 UTC (rev 63446)
+++ trunk/Master/texmf-dist/tex/luatex/luatexja/patches/lltjcore.sty	2022-05-30 20:07:11 UTC (rev 63447)
@@ -3,7 +3,7 @@
 %
 
 \NeedsTeXFormat{LaTeX2e}
-\ProvidesPackage{lltjcore}[2022-01-17 Patch to LaTeX2e Kernel for LuaTeX-ja]
+\ProvidesPackage{lltjcore}[2022-05-30 Patch to LaTeX2e Kernel for LuaTeX-ja]
 \RequirePackage{etoolbox}
 
 %%% expl3
@@ -235,11 +235,16 @@
   \hskip\@tempskipa\color at endgroup\egroup}
 \pretocmd{\footnote}{\inhibitglue}{}{}
 \pretocmd{\footnotemark}{\inhibitglue}{}{}
-\patchcmd{\@footnotemark}{\@makefnmark}{%
-  \unless\ifnum\ltjgetparameter{direction}=3 \@makefnmark%
-  \else\hbox to\z@{\hskip-.25\zw\raise.9\zh\@makefnmark\hss}\fi%
-}{}{}
-\let\@parboxto\@empty
+\def\@ltj at process@makefnmark#1{%
+  \unless\ifnum\ltjgetparameter{direction}=3 #1%
+  \else\hbox to\z@{\hskip-.25\zw\raise.9\zh#1\hss}\fi%
+}%
+\ifdefined\@kernel at process@makefnmark %% 2022-06-01 latex-lab?
+  \let\ltj at orig@kernel at process@makefnmark=\@kernel at process@makefnmark
+  \def\@kernel at process@makefnmark#1{\ltj at orig@kernel at process@makefnmark{\@ltj at process@makefnmark#1}}
+\else
+  \patchcmd{\@footnotemark}{\@makefnmark}{\@ltj at process@makefnmark\@makefnmark}{}{}
+\fi
 \long\def\@iiiparbox#1#2[#3]#4#5{%
   \leavevmode
   \@pboxswfalse

Modified: trunk/Master/texmf-dist/tex/luatex/luatexja/patches/lltjp-listings.sty
===================================================================
--- trunk/Master/texmf-dist/tex/luatex/luatexja/patches/lltjp-listings.sty	2022-05-30 20:06:19 UTC (rev 63446)
+++ trunk/Master/texmf-dist/tex/luatex/luatexja/patches/lltjp-listings.sty	2022-05-30 20:07:11 UTC (rev 63447)
@@ -1,10 +1,11 @@
 %
-% lltjp-listings.sty 2020-03-23
+% lltjp-listings.sty 2022-05-22
 %
 
 \NeedsTeXFormat{LaTeX2e}
 \RequirePackage{etoolbox,listings,luatexbase-cctb}
 
+\newcount\ltj at lst@japanese at min \ltj at lst@japanese at min=128
 %%%%%%%%%%%%%%%% Japanese support
 %% whether letter-space in a fixed mode box is doubled or not
 \newif\if at ltj@lst at double
@@ -197,9 +198,6 @@
       \lsthk at PreSet\lstset{flexiblecolumns,#1}%
       \lsthk at TextStyle
       \@ifnextchar\bgroup \ltj at lst@InlineG \ltj at lstinline@}
-\def\ltj at lstinline@#1{%
-  \edef\ltj at lst@temp{\the\catcode`#1}\lst at Init\relax\catcode`#1\ltj at lst@temp
-  \lst at InlineJ#1}
 \def\ltj at lst@InlineG{%
   \lst at Init\relax\edef\ltj at lst@temp{\the\catcode`\}}\catcode`\}=2 \catcode`\ =12\relax
   \let\lst at arg\@empty\afterassignment\ltj at lst@InlineG@@\@temptokena}
@@ -207,10 +205,17 @@
   \catcode`\}=\ltj at lst@temp%
   \expandafter\expandafter\expandafter\lst at InsideConvert%
   \expandafter{\the\@temptokena}\lst at arg\lst at DeInit\egroup}
+\def\ltj at lstinline@#1{%
+  \edef\ltj at lst@temp{\the\catcode`#1}
+  \lst at Init\relax\catcode`#1\ltj at lst@temp
+  \ifnum\ltj at lst@temp=\active
+    \begingroup\lccode`\~=`#1\relax
+    \lowercase{\xdef\lst at next{\noexpand\lst at InlineJ\noexpand~}}\endgroup%
+  \else
+    \edef\lst at next{\noexpand\lst at InlineJ\scantextokens{#1}}%
+  \fi\lst at next
+}
 
-%%%%%%%%%%%%%%%% \lstMakeShortInline
-\patchcmd\lstMakeShortInline@{\lst at shortinlinedef#1}{\lst at shortinlinedef~}{}{}
-
 % We redefine \lst at BeginDropInput, since now we have
 % two additional `process macros'.
 \def\lst at BeginDropInput#1{%
@@ -239,7 +244,7 @@
            for i = 1, utf.len(buf) do
               local c = utf.sub(buf, i, i)
               local cu = utf.byte(c)
-              if cu >= 0x80 and tex.getcatcode(cu) \string~= 13 then
+              if cu >= \the\ltj at lst@japanese at min\space and tex.getcatcode(cu) \string~= 13 then
                 ret = ret .. utfchar(getcount('ltjlineendcomment'))
               end
               ret = ret .. c
@@ -283,7 +288,7 @@
 \gdef\ltj at lst@MakeActive@#1{\let\lst at next\relax%
     \ifx#1\relax
     \else\let\lst at next\ltj at lst@MakeActive@
-    \ifnum`#1>127 
+    \ifnum`#1>\numexpr\ltj at lst@japanese at min-1
       \lccode`\^^A=`#1 
       \lowercase{\lst at lAddTo\lst at temp{$^^A}}%$
     \else

More information about the tex-live-commits mailing list.