跳至內容

「模組:Collapsible list」:修訂間差異

增加 461 位元組 、​ 2025年4月5日 (星期六)
無編輯摘要
imported>CYL992
(建立內容為「-- This module implements {{collapsible list}}. local p = {} local function gettitlestyletracking( ts ) if not ts then return '' end ts = mw.ustring.gsub(mw.ustring.lower(ts), '%s', '') local tsvals = mw.text.split(ts, ';') table.sort(tsvals) local skey = table.concat(tsvals,';') skey = mw.ustring.gsub(skey, '^;', '') skey = mw.text.encode(mw.text.encode(skey),'%c%[%]=') if (mw.ustring.match(';' .. ts, ';background:') or mw.ustring.match(';' .. ts,…」的新頁面)
 
無編輯摘要
 
第1行: 第1行:
-- This module implements {{collapsible list}}.
local p = {}
local p = {}
local function gettitlestyletracking( ts )
if not ts then return '' end
ts = mw.ustring.gsub(mw.ustring.lower(ts), '%s', '')
local tsvals = mw.text.split(ts, ';')
table.sort(tsvals)
local skey = table.concat(tsvals,';')
skey = mw.ustring.gsub(skey, '^;', '')
skey = mw.text.encode(mw.text.encode(skey),'%c%[%]=')
if (mw.ustring.match(';' .. ts, ';background:') or mw.ustring.match(';' .. ts, ';background%-color:'))
and mw.ustring.match(';' .. ts, ';text%-align:') then
return '[[Category:页面同时使用了collapsible list的titlestyle的background和text-align|' .. skey .. ' ]]'
end
return '[[Category:页面均未使用collapsible list的titlestyle的background和text-align|' .. skey .. ' ]]'
end


local function getListItem( data )
local function getListItem( data )
第56行: 第39行:
end
end


-- TODO: use Module:List. Since the update for this comment is routine,
-- this is blocked without a consensus discussion by
-- [[:en:MediaWiki_talk:Common.css/Archive_15#plainlist_+_hlist_indentation]]
-- if we decide hlist in plainlist in this template isn't an issue, we can use
-- module:list directly
-- [https://en.wikipedia.org/w/index.php?title=Module:Collapsible_list/sandbox&oldid=1130172480]
-- is an implementation (that will code rot slightly I expect)
local function buildList( args )
local function buildList( args )
     -- Get the list items.
     -- Get the list items.
第67行: 第57行:
     end
     end
     listItems = table.concat( listItems )
     listItems = table.concat( listItems )
   
 
-- hack around mw-collapsible show/hide jumpiness by looking for text-alignment
-- by setting a margin if centered
local textAlignmentCentered = 'text%-align%s*:%s*center'
local centeredTitle = (args.title_style and args.title_style:lower():match(textAlignmentCentered)
or args.titlestyle and args.titlestyle:lower():match(textAlignmentCentered))
local centeredTitleSpacing
if centeredTitle then
centeredTitleSpacing = 'margin: 0 4em'
else
centeredTitleSpacing = ''
end
 
     -- Get class, style and title data.
     -- Get class, style and title data.
     local div1class = formatAttributes( 'class', 'NavFrame', not args.expand and 'collapsed' )
     local collapsibleContainerClass = formatAttributes(
     local div1style = formatAttributes(
    'class',
    'collapsible-list',
    'mw-collapsible',
    not args.expand and 'mw-collapsed'
    )
     local collapsibleContainerStyle = formatAttributes(
         'style',
         'style',
        -- mostly work around .infobox-full-data defaulting to centered
        'text-align: left;',
         args.frame_style,
         args.frame_style,
         args.framestyle,
         args.framestyle
        not ( args.frame_style or args.framestyle ) and 'border: none; padding: 0;'
     )
     )
     local div2class = formatAttributes( 'class', 'NavHead' )
     local collapsibleTitleStyle = formatAttributes(
    local div2style = formatAttributes(
         'style',
         'style',
         'font-size: 105%; background: transparent; text-align: left;',
         'line-height: 1.6em; font-weight: bold;',
         args.title_style,
         args.title_style,
         args.titlestyle
         args.titlestyle
    )
    local jumpyTitleStyle = formatAttributes(
        'style',
        centeredTitleSpacing
     )
     )
     local title = args.title or '列表'
     local title = args.title or '列表'
     local ulclass = formatAttributes( 'class', 'NavContent', args.hlist and 'hlist' )
     local ulclass = formatAttributes( 'class', 'mw-collapsible-content', args.hlist and 'hlist' )
     local ulstyle = formatAttributes(  
     local ulstyle = formatAttributes(  
         'style',
         'style',
         not args.bullets and 'list-style: none none; margin-left: 0;',
        'margin-top: 0; margin-bottom: 0; line-height: inherit;',
         not args.bullets and 'list-style: none; margin-left: 0;',
         args.list_style,
         args.list_style,
         args.liststyle,
         args.liststyle
        not ( args.list_style or args.liststyle ) and 'text-align: left;',
        'font-size: 105%; margin-top: 0; margin-bottom: 0; line-height: inherit;'
     )
     )
   
    local hlist_templatestyles = ''
    if args.hlist then
    hlist_templatestyles = mw.getCurrentFrame():extensionTag{
    name = 'templatestyles', args = { src = 'Hlist/styles.css' }
    }
    end
      
      
     -- Build the list.
     -- Build the list.
     return mw.ustring.format(  
     return mw.ustring.format(  
         '<div%s%s>\n<div%s%s>%s</div>\n<ul%s%s>%s</ul>\n</div>',
         '%s<div%s%s>\n<div%s><div%s>%s</div></div>\n<ul%s%s>%s</ul>\n</div>',
         div1class, div1style, div2class, div2style, title, ulclass, ulstyle, listItems
         hlist_templatestyles, collapsibleContainerClass, collapsibleContainerStyle,
     ) .. gettitlestyletracking(args.title_style or args.titlestyle)
        collapsibleTitleStyle, jumpyTitleStyle, title, ulclass, ulstyle, listItems
     )
end
end