Module:Development versions

This module implements {{development versions}}.

local p = {}
p.list = function( f )
	local args = f:getParent().args
	local title = mw.title.getCurrentTitle().rootText
	local version = args[1] or title

	if not version:find('Edition') then
		version = 'Java Edition ' .. version
	end
	
	f:callParserFunction ( '#dplvar:set', 'parentVersion', version )
	
	local categories = args.categories or 'snapshots, pre-releases'
	local devVersions = {}
	for category in mw.text.gsplit( categories, '%s*,%s*' ) do
		table.insert( devVersions,
			f:callParserFunction( '#dpl:', {
				category = version .. ' ' .. category,
				format = ',|%PAGE%',
				ordermethod = 'sortkey',
				debug = '1'
			} )
		)
	end
	devVersions = mw.text.trim( table.concat( devVersions ), '%s|' )
	
	local edition
	if version:match( '^Pocket Edition ' ) then
		edition = 'Pocket Edition '
	end

	local content = {}
	local brokenPages = {}
	for page in mw.text.gsplit( devVersions, '|' ) do
		local devVersion = page
		if edition then
			devVersion = page:gsub( '^' .. edition, '' )
		end
		
		local wikitext = mw.title.new( page ):getContent()
		if wikitext:match( '<onlyinclude>' ) and wikitext:match( '</onlyinclude>' ) then
			table.insert( content, '<onlyinclude>=' .. devVersion .. '=</onlyinclude>' .. wikitext )
		else
			table.insert( brokenPages, '"[[' .. page .. ']]"' )
		end
	end
	
	if #brokenPages > 0 then
		error( mw.text.listToText( brokenPages ) .. ' missing <onlyinclude>', 0 )
		return
	end
	
	content = table.concat( content )
		:gsub( '^.-<onlyinclude>%s*', '\n' )
		:gsub( '%s*</onlyinclude>.-<onlyinclude>%s*', '\n' )
		:gsub( '%s*</onlyinclude>.*$', '\n' )
		:gsub( '\n(=+ *[^\n]+ *=+)', '\n=%1=' )
	
	return f:preprocess( mw.text.trim( content ) )
end
return p