texlive[71156] Master/texmf-dist: luavlna (2may24)

[commits+karl at tug.org]

Revision: 71156
          https://tug.org/svn/texlive?view=revision&revision=71156
Author:   karl
Date:     2024-05-02 21:43:21 +0200 (Thu, 02 May 2024)
Log Message:
-----------
luavlna (2may24)

Modified Paths:
--------------
    trunk/Master/texmf-dist/doc/luatex/luavlna/README.md
    trunk/Master/texmf-dist/doc/luatex/luavlna/luavlna-doc.pdf
    trunk/Master/texmf-dist/doc/luatex/luavlna/luavlna-doc.tex
    trunk/Master/texmf-dist/tex/luatex/luavlna/luavlna-langno.lua
    trunk/Master/texmf-dist/tex/luatex/luavlna/luavlna.lua
    trunk/Master/texmf-dist/tex/luatex/luavlna/luavlna.sty
    trunk/Master/texmf-dist/tex/luatex/luavlna/luavlna.tex

Modified: trunk/Master/texmf-dist/doc/luatex/luavlna/README.md
===================================================================
--- trunk/Master/texmf-dist/doc/luatex/luavlna/README.md	2024-05-02 19:43:09 UTC (rev 71155)
+++ trunk/Master/texmf-dist/doc/luatex/luavlna/README.md	2024-05-02 19:43:21 UTC (rev 71156)
@@ -1,4 +1,4 @@
-# Luavlna, version 0.1l, 2023-06-21
+# Luavlna, version 0.1m, 2024-05-02
 
 # Introduction
 

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

Modified: trunk/Master/texmf-dist/doc/luatex/luavlna/luavlna-doc.tex
===================================================================
--- trunk/Master/texmf-dist/doc/luatex/luavlna/luavlna-doc.tex	2024-05-02 19:43:09 UTC (rev 71155)
+++ trunk/Master/texmf-dist/doc/luatex/luavlna/luavlna-doc.tex	2024-05-02 19:43:21 UTC (rev 71156)
@@ -87,7 +87,7 @@
 Ch. Borner.
 
 Podpora jednotek: 100,5 MN\cdot{}s, 100.5 kJ, 200 µA, $-1$ dag, 
-12 MiB, 1 m$^3$/s.
+12 MiB.
 
 Uvnitř matematiky by mělo být zpracování vypnuté:  $k \in \mathbb N$. 
 Pokračujeme v příkladu.
@@ -113,7 +113,7 @@
 
 Podpora iniciál a titulů: M. J. Hegel, Ing. Běháková, Ph.D., Ž. Zíbrt, Ch. Borner.
 
-Podpora jednotek: 100,5 MN\cdot{}s, 100.5 kJ, 200 µA, $-1$ dag, 12 MiB, 1 m$^3$/s.
+Podpora jednotek: 100,5 MN\cdot{}s, 100.5 kJ, 200 µA, $-1$ dag, 12 MiB.
 
 Uvnitř matematiky by mělo být zpracování vypnuté:  $k \in \mathbb N$. Pokračujeme v příkladu.
 
@@ -298,7 +298,9 @@
     local luatex = langno.load_languages(fmt)
     local t = {}
     for k, v in pairs(luatex.names) do
-      t[#t+1]=k
+      if k and k~="" then
+        t[#t+1]=k
+      end
     end
     table.sort(t)
     tex.print(table.concat(t,", "))

Modified: trunk/Master/texmf-dist/tex/luatex/luavlna/luavlna-langno.lua
===================================================================
--- trunk/Master/texmf-dist/tex/luatex/luavlna/luavlna-langno.lua	2024-05-02 19:43:09 UTC (rev 71155)
+++ trunk/Master/texmf-dist/tex/luatex/luavlna/luavlna-langno.lua	2024-05-02 19:43:21 UTC (rev 71156)
@@ -58,7 +58,8 @@
 end
 
 local load_lang_dat_lualatex = function()
-  return load_lang_dat(1)
+  -- it used to be 1, but it seems that in newer LuaLaTeX versions, we should start at 0
+  return load_lang_dat(0)
 end
 
 local load_csplain= function()

Modified: trunk/Master/texmf-dist/tex/luatex/luavlna/luavlna.lua
===================================================================
--- trunk/Master/texmf-dist/tex/luatex/luavlna/luavlna.lua	2024-05-02 19:43:09 UTC (rev 71155)
+++ trunk/Master/texmf-dist/tex/luatex/luavlna/luavlna.lua	2024-05-02 19:43:21 UTC (rev 71156)
@@ -260,6 +260,15 @@
   return false
 end
 
+local function handle_unit(word, anchor)
+  -- insert nbsp between numbers and units
+  word = cut_off_end_chars(word, false)
+  if is_unit(word) then
+    anchor = replace_with_thin_space(anchor)
+    insert_penalty(anchor.prev)
+  end
+end
+
 local predegrees = Set (require "luavlna-predegrees")
 local sufdegrees = Set (require "luavlna-sufdegrees")
 
@@ -299,11 +308,7 @@
         if wasnumber then
           if word ~= "" then
             wasnumber = false
-            word = cut_off_end_chars(word, false)
-            if is_unit(word) then
-              anchor = replace_with_thin_space(anchor)
-              insert_penalty(anchor.prev)
-            end
+            handle_unit(word, anchor)
           end
         elseif is_number(word) then
           wasnumber = true
@@ -356,6 +361,10 @@
     end
     head = head.next                                                            
   end                                                                             
+  -- insert spaces at the end of node list
+  if wasnumber then
+    handle_unit(word, anchor)
+  end
   return  true
 end               
 

Modified: trunk/Master/texmf-dist/tex/luatex/luavlna/luavlna.sty
===================================================================
--- trunk/Master/texmf-dist/tex/luatex/luavlna/luavlna.sty	2024-05-02 19:43:09 UTC (rev 71155)
+++ trunk/Master/texmf-dist/tex/luatex/luavlna/luavlna.sty	2024-05-02 19:43:21 UTC (rev 71156)
@@ -1,4 +1,4 @@
-\ProvidesPackage{luavlna}[2023-06-21 luavlna]
+\ProvidesPackage{luavlna}[2024-05-02 luavlna]
 
 \ifdefined\directlua\else
 \PackageWarning{luavlna}{Luavlna needs LuaLaTeX, aborting}

Modified: trunk/Master/texmf-dist/tex/luatex/luavlna/luavlna.tex
===================================================================
--- trunk/Master/texmf-dist/tex/luatex/luavlna/luavlna.tex	2024-05-02 19:43:09 UTC (rev 71155)
+++ trunk/Master/texmf-dist/tex/luatex/luavlna/luavlna.tex	2024-05-02 19:43:21 UTC (rev 71156)
@@ -72,10 +72,15 @@
 % we can try to find the language ID from macros first, if it fails
 % we pass the language name to Lua. it will try to find ID in luanguage.dat and other sources
 \def\singlecharsgetlang#1{%
-  \ifcsname lang@#1\endcsname% 
-    \the\csname lang@#1\endcsname%
-  \else% unknown language macro, let langno library to find it 
-    #1%
+  \ifcsname l@#1\endcsname% 
+    \the\csname l@#1\endcsname%
+  \else%
+    \ifcsname lang@#1\endcsname% 
+      \the\csname lang@#1\endcsname%
+    \else%
+      % unknown language macro, let langno library to find it 
+      #1%
+    \fi%
   \fi%
 }