From e864997842e157172211ee0dc749590d7547b594 Mon Sep 17 00:00:00 2001 From: Daniel Silverstone Date: Sun, 22 Apr 2018 10:51:43 +0100 Subject: Fix last uses of !NetSurf outside of riscos build --- utils/merge-messages.lua | 83 ------------------------------------------------ 1 file changed, 83 deletions(-) delete mode 100755 utils/merge-messages.lua (limited to 'utils') diff --git a/utils/merge-messages.lua b/utils/merge-messages.lua deleted file mode 100755 index 3aeac697c..000000000 --- a/utils/merge-messages.lua +++ /dev/null @@ -1,83 +0,0 @@ -#!/usr/bin/env lua5.1 - -local lfs = require "lfs" - -local en_stat = assert(lfs.attributes "!NetSurf/Resources/en/Messages") -local language = { } -local sorted = { } - -io.stderr:write("loading non-en languages...\n"); - -for dir in lfs.dir "!NetSurf/Resources" do - local path = "!NetSurf/Resources/" .. dir - if dir ~= "en" and lfs.attributes(path .. "/Messages") then - local f = io.open(path .. "/Messages", "r") - local c = 0 - io.stderr:write(dir, ":") - language[dir] = { } - sorted[#sorted + 1] = dir - for l in f:lines() do - if l:sub(1, 1) ~= "#" then - local tag, msg = l:match "^([^:]*):(.*)$" - if tag then - language[dir][tag] = msg - c = c + 1 - end - end - end - f:close() - io.stderr:write(tostring(c), " entries.\n") - end -end - -table.sort(sorted) - -io.stderr:write("working through en...\n") - -local manipulators = { - { "^(ami.*)", "ami.%1" }, - { "^(gtk.*)", "gtk.%1" }, - { "^(Help.*)", "ro.%1" }, - { "^(ARexx.*)", "ami.%1" }, - - { "^(.*)$", "all.%1" } -- must be last -} - -local function manipulate_tag(t) - for _, m in ipairs(manipulators) do - local r, s = t:gsub(m[1], m[2]) - if s > 0 then return r end - end - return t -end - -local f = io.open("!NetSurf/Resources/en/Messages", "r") - -for l in f:lines() do - if l:sub(1,1) == "#" then - print(l) - else - local tag, msg = l:match "^([^:]*):(.*)$" - if not tag then - print(l) - else - local mtag = manipulate_tag(tag) - io.stdout:write("en.", mtag, ":", msg, "\n") - for _, langname in ipairs(sorted) do - local trans = language[langname][tag] - if not trans then - io.stderr:write("*** language ", langname, " lacks translation for ", mtag, "/", tag, "\n") - trans = msg - end - io.stdout:write(langname, ".", mtag, ":", trans, "\n") - language[langname][tag] = nil - end - end - end -end - -for _, langname in ipairs(sorted) do - for tag in pairs(language[langname]) do - io.stderr:write("*** language ", langname, " contains orphan tag ", tag, "\n") - end -end \ No newline at end of file -- cgit v1.2.3