Модуль:Loc/Marking: различия между версиями

мНет описания правки
Нет описания правки
 
(не показаны 32 промежуточные версии этого же участника)
Строка 87: Строка 87:
end
end


local function convert_lists(s)
local function convert_lists(s, indent_size)
    indent_size = indent_size or 2
     if not s or s == "" then return s end
     if not s or s == "" then return s end
     local lines = mw.text.split(s, "\n")
     local lines = mw.text.split(s, "\n")
     local first_non_empty = nil
     local out_lines = {}
    local first_non_empty_unescaped = nil


     for i, line in ipairs(lines) do
     local stack = {}
        if line and line:match("%S") then
            first_non_empty = line
            first_non_empty_unescaped = mw.ustring.gsub(line, " ", " ")
            break
        end
    end


     local enable_numeric = false
     local function make_prefix_from_stack()
    if first_non_empty_unescaped and mw.ustring.match(first_non_empty_unescaped, "^%s*%d+%.") then
        if #stack == 0 then return "" end
        enable_numeric = true
        return table.concat(stack, "")
     end
     end


    local out_lines = {}
     for _, line in ipairs(lines) do
     for _, line in ipairs(lines) do
        local processed = line
        local handled = false
         local line_unescaped = mw.ustring.gsub(line, " ", " ")
         local line_unescaped = mw.ustring.gsub(line, " ", " ")
        local leading, num, rest_num = mw.ustring.match(line_unescaped, "^(%s*)(%d+)%.%s*(.*)$")
        local leading2, rest_dash = mw.ustring.match(line_unescaped, "^(%s*)%-%s+(.*)$")


         if enable_numeric then
         if num then
             local leading, num, rest = mw.ustring.match(line_unescaped, "^(%s*)(%d+)%.%s*(.*)$")
             local indent = mw.ustring.len(leading or "")
            if num then
            local level = math.floor(indent / indent_size)
                local indent = mw.ustring.len(leading or "")
            while #stack > level do table.remove(stack) end
                local level = math.floor(indent / 2)
            if #stack == level then
                local hashes = string.rep('#', 1 + level)
                 table.insert(stack, "#")
                 processed = hashes .. (rest ~= "" and (" " .. rest) or "")
            else
                 table.insert(out_lines, processed)
                while #stack < level do table.insert(stack, "#") end
                handled = true
                 table.insert(stack, "#")
             end
             end
        end
            local prefix = make_prefix_from_stack()
 
            local text = rest_num or ""
        if not handled then
             table.insert(out_lines, (prefix ~= "" and (prefix .. (text ~= "" and (" " .. text) or "")) or text))
             local leading, rest = mw.ustring.match(line_unescaped, "^(%s*)%-%s+(.*)$")
        elseif rest_dash then
            if rest then
            local indent = mw.ustring.len(leading2 or "")
                local indent = mw.ustring.len(leading or "")
            local level = math.floor(indent / indent_size)
                local level = math.floor(indent / 2)
            while #stack > level do table.remove(stack) end
                local stars = string.rep('#', 1 + level)
            if #stack == level then
                 processed = stars .. (rest ~= "" and (" " .. rest) or "")
                 table.insert(stack, "*")
                 table.insert(out_lines, processed)
            else
                handled = true
                while #stack < level do table.insert(stack, "*") end
                 table.insert(stack, "*")
             end
             end
        end
            local prefix = make_prefix_from_stack()
 
            local text = rest_dash or ""
         if not handled then
            table.insert(out_lines, (prefix ~= "" and (prefix .. (text ~= "" and (" " .. text) or "")) or text))
             table.insert(out_lines, processed)
         else
            stack = {}
             table.insert(out_lines, line)
         end
         end
     end
     end
Строка 156: Строка 153:
             if tip == "" and params._value and visible ~= params._value then tip = params._value end
             if tip == "" and params._value and visible ~= params._value then tip = params._value end
         end
         end
        visible = mw.ustring.gsub(visible, "|", "&#124;")
         return "{{altTooltip|1=" .. (visible or "") .. "|2=<span style='white-space:pre-wrap;'>{{#invoke:Loc|GetRawString|noFormat=1|" .. (tip or "") .. "}}</span>}}"
        tip = mw.ustring.gsub(tip, "|", "&#124;")
         return "{{altTooltip|" .. (visible or "") .. "|{{loc|" .. (tip or "") .. "}}}}"
     end)
     end)
     while true do
     while true do
Строка 190: Строка 185:
             :gsub('=', '&#61;')
             :gsub('=', '&#61;')
             :gsub(' ', '&#32;')
             :gsub(' ', '&#32;')
            :gsub('{"', '')
            :gsub('"}', '')
             :gsub('{', '&#123;')
             :gsub('{', '&#123;')
             :gsub('"', '&#34;')
             :gsub('"', '&#34;')
Строка 200: Строка 197:
     local args = frame.args or {}
     local args = frame.args or {}
     local text = args[1] or args.text or ""
     local text = args[1] or args.text or ""
    local noFormat = args.noFormat
     text = mw.text.unstripNoWiki(text)
     text = mw.text.unstripNoWiki(text)
     text = process_nowiki_equals(text)
     text = process_nowiki_equals(text)
     return frame:preprocess(transform(text))
 
    local class = noFormat and "ts-loc-format" or ""
    local content = transform(text)
    if mw.ustring.find(content, '^[ \t]*[#%*;%:]+') then
        content = '\n' .. content
    end
 
     return frame:preprocess(
        frame:extensionTag(
            'templatestyles',
            '',
            { src = 'Модуль:Loc/styles.css' }
        ) ..
        '<span class="list-reset-margin ' .. class .. '">' .. content .. '</span>'
    )
end
end


return p
return p