Module:BibleQuote: Difference between revisions

From BibleVerseWiki
No edit summary
No edit summary
Line 1: Line 1:
local p = {} --p stands for package
local p = {} --p stands for package


function p.standard(frame)
local function verses(verseSpec)
     local _, _, book, chapter, startVerse, stopVerse =  
     local _, _, book, chapter, startVerse, stopVerse =  
         string.find(frame.args[1], "%s-(.+)%s+(%d+):(%d+)-(%d+)")
         string.find(verseSpec, "%s-(.+)%s+(%d+):(%d+)-(%d+)")
     local verses = {}
     local verses = {}


     if stopVerse == nil then
     if stopVerse == nil then
         return frame:expandTemplate{title = frame.args[1]}  
         return frame:expandTemplate{title = verseSpec}  
     end
     end
      
      
Line 17: Line 17:


     return table.concat(verses, " ")
     return table.concat(verses, " ")
end
local function removePilcrow(verse)
    return string.gsub(verse, "¶ ", "")
end
function p.standard(frame)
    local result = verses(frame.args[1])
    if not frame.args.showPilcrow then
        return removePilcrow(result)
    end
    return result
end
end


return p
return p

Revision as of 16:06, 8 December 2023

Documentation for this module may be created at Module:BibleQuote/doc

local p = {} --p stands for package

local function verses(verseSpec)
    local _, _, book, chapter, startVerse, stopVerse = 
        string.find(verseSpec, "%s-(.+)%s+(%d+):(%d+)-(%d+)")
    local verses = {}

    if stopVerse == nil then
        return frame:expandTemplate{title = verseSpec} 
    end
    
    for i = startVerse, stopVerse, 1 do
        local verse = frame:expandTemplate{title = book.." "..chapter..":"..i} 

        table.insert(verses, verse)        
    end

    return table.concat(verses, " ")
end

local function removePilcrow(verse)
    return string.gsub(verse, "¶ ", "")
end

function p.standard(frame)
    local result = verses(frame.args[1])

    if not frame.args.showPilcrow then
        return removePilcrow(result)
    end

    return result
end

return p