[latex3-commits] [l3svn] 01/02: l3build: More LuaTeX normalisation

[noreply at latex-project.org]

This is an automated email from the git hooks/post-receive script.

joseph pushed a commit to branch master
in repository l3svn.

commit 75a40192ddf47026aa3c94f1038e33c2f03a363d
Author: Joseph Wright <joseph.wright at morningstar2.co.uk>
Date:   Fri Sep 11 22:05:32 2015 +0100

    l3build: More LuaTeX normalisation
---
 l3build/l3build.lua |   20 ++++++++++++++++++++
 1 file changed, 20 insertions(+)

diff --git a/l3build/l3build.lua b/l3build/l3build.lua
index 8b03cd4..5ea0865 100644
--- a/l3build/l3build.lua
+++ b/l3build/l3build.lua
@@ -906,6 +906,26 @@ function formatlualog(logfile, newfile)
         return line, ""
       end
     end
+    -- Wrap some cases that can be picked out
+    -- In some places LuaTeX does use max_print_line, then we
+    -- get into issues with different wrapping approaches
+    local kpse = require("kpse")
+    kpse.set_program_name("luatex")
+    local maxprintline = tonumber(kpse.expand_var("$max_print_line"))
+    if (string.len(line) == maxprintline) then
+      return "", line
+    elseif (string.len(lastline) == maxprintline) then
+      if string.match(line, "\\ETC%.%}$") then
+        -- If the line wrapped at \ETC we might have lost a space
+        return lastline 
+          .. ((string.match(line, "^\\ETC%.%}$") and " ") or "")
+          .. line, ""
+      elseif string.match(line, "^%}%}%}$") then
+        return lastline .. line, ""
+      else
+        return lastline .. os_newline .. line, ""
+      end
+    end
     return line, ""
   end
   local newlog = ""

-- 
To stop receiving notification emails like this one, please contact
the administrator of this repository.