texlive[67468] trunk: luafindfont (26jun23)

[commits+karl at tug.org]

Revision: 67468
          http://tug.org/svn/texlive?view=revision&revision=67468
Author:   karl
Date:     2023-06-26 00:26:08 +0200 (Mon, 26 Jun 2023)
Log Message:
-----------
luafindfont (26jun23)

Modified Paths:
--------------
    trunk/Build/source/texk/texlive/linked_scripts/luafindfont/luafindfont.lua
    trunk/Master/texmf-dist/doc/support/luafindfont/CHANGELOG
    trunk/Master/texmf-dist/doc/support/luafindfont/luafindfont-doc.pdf
    trunk/Master/texmf-dist/scripts/luafindfont/luafindfont.lua

Modified: trunk/Build/source/texk/texlive/linked_scripts/luafindfont/luafindfont.lua
===================================================================
--- trunk/Build/source/texk/texlive/linked_scripts/luafindfont/luafindfont.lua	2023-06-25 22:18:20 UTC (rev 67467)
+++ trunk/Build/source/texk/texlive/linked_scripts/luafindfont/luafindfont.lua	2023-06-25 22:26:08 UTC (rev 67468)
@@ -1,6 +1,6 @@
 #!/usr/bin/env texlua
 --
---  $Id: luafindfont.lua 734 2023-06-21 10:04:46Z herbert $
+--  $Id: luafindfont.lua 735 2023-06-22 19:12:29Z herbert $
 -----------------------------------------------------------------------
 --         FILE:  luafindfont.lua
 --  DESCRIPTION:  search for fonts in the database
@@ -8,7 +8,7 @@
 --       AUTHOR:  Herbert Voß  (C) 2023-06-21
 -----------------------------------------------------------------------
         luafindfont = luafindfont or { }
-      local version = 0.12
+      local version = 0.13
 luafindfont.version = version
 
 --[[
@@ -324,7 +324,9 @@
 	    return false 
 	else 
 	    return string.lower(a["basename"]) < string.lower(b["basename"]) 
-	end end)
+	end 
+end)
+
 -- strip duplicates
 local newFontDataMap = {}
 if #fontDataMap > 0 then
@@ -403,7 +405,13 @@
       if string.len(exrun:read('*all')) > 0 then
         kpsewhich = "1"
       end
+    else
+      print("!!! There maybe a problem with font "..v["basename"].." kpsewhich doesn't work")
+      print(tostring(exrun))
+	  kpsewhich = "0"
+	  os.exit()
     end
+    exrun:close()
   end
   if (font_str ~= "*") and not noSymbolicNames then
     if args_xetex > 0 then

Modified: trunk/Master/texmf-dist/doc/support/luafindfont/CHANGELOG
===================================================================
--- trunk/Master/texmf-dist/doc/support/luafindfont/CHANGELOG	2023-06-25 22:18:20 UTC (rev 67467)
+++ trunk/Master/texmf-dist/doc/support/luafindfont/CHANGELOG	2023-06-25 22:26:08 UTC (rev 67468)
@@ -1,3 +1,4 @@
+0.13  2023-06-23  - add exrun:close() for every kpsewhich test
 0.12  2023-06-21  - bugfix for undefined exrun (l. 251)
                   - check for empty font list and given font number
                   - print a message if no fonts for given (partial) name exists

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

Modified: trunk/Master/texmf-dist/scripts/luafindfont/luafindfont.lua
===================================================================
--- trunk/Master/texmf-dist/scripts/luafindfont/luafindfont.lua	2023-06-25 22:18:20 UTC (rev 67467)
+++ trunk/Master/texmf-dist/scripts/luafindfont/luafindfont.lua	2023-06-25 22:26:08 UTC (rev 67468)
@@ -1,6 +1,6 @@
 #!/usr/bin/env texlua
 --
---  $Id: luafindfont.lua 734 2023-06-21 10:04:46Z herbert $
+--  $Id: luafindfont.lua 735 2023-06-22 19:12:29Z herbert $
 -----------------------------------------------------------------------
 --         FILE:  luafindfont.lua
 --  DESCRIPTION:  search for fonts in the database
@@ -8,7 +8,7 @@
 --       AUTHOR:  Herbert Voß  (C) 2023-06-21
 -----------------------------------------------------------------------
         luafindfont = luafindfont or { }
-      local version = 0.12
+      local version = 0.13
 luafindfont.version = version
 
 --[[
@@ -324,7 +324,9 @@
 	    return false 
 	else 
 	    return string.lower(a["basename"]) < string.lower(b["basename"]) 
-	end end)
+	end 
+end)
+
 -- strip duplicates
 local newFontDataMap = {}
 if #fontDataMap > 0 then
@@ -403,7 +405,13 @@
       if string.len(exrun:read('*all')) > 0 then
         kpsewhich = "1"
       end
+    else
+      print("!!! There maybe a problem with font "..v["basename"].." kpsewhich doesn't work")
+      print(tostring(exrun))
+	  kpsewhich = "0"
+	  os.exit()
     end
+    exrun:close()
   end
   if (font_str ~= "*") and not noSymbolicNames then
     if args_xetex > 0 then