Module:Search/sandbox: Difference between revisions

Revision as of 03:00, 2 December 2022

Revision as of 22:14, 8 December 2022

Line 12:

end

local function addlink(urlp, unabbreviatedu, abbreviationa, t, s)

local item = ll:tag('li')

return '[' .. url .. ' <abbr title="' .. unabbreviated .. '">' .. abbreviation ..'</abbr>]'

item:wikitext(p .. '[' .. u .. ' ')

item:tag('abbr')

:attr('title', a)

:wikitext(')'t)

retitem:wikitext('(]' .. s)

end

Line 26 ⟶ 31:

local ret = mw.html.create('div')

:addClass('template-search')

:addClass('plainlist')

:addClass('plainlinks')

ll = ret:tag('ul')

local list1 = {

addlink('//en.wikipedia.org/w/index.php?title=Special:Search&search=' .. ssenc, 'Wikipedia', 'wp')

}

if long then

table.insertaddlink(list1'', addlink('https://www.google.com/search?q=site%3Awikipedia.org+' .. ssenc, 'Wikipedia over Google', 'gwp'), ' ')

addlink('', 'https://www.binggoogle.com/search?q=' .. ssenc, 'BingGoogle', 'bg', ' ')

table.insertaddlink(list1'', addlink('https://www.bing.com/search?q=site%3Awikipedia.org+' .. ssenc, 'Wikipedia over Bing', 'bwp'), ' ')

table.insertaddlink(list1'', addlink('https://www.bing.com/search?q=' .. ssenc, 'Bing', 'b'), ' | ')

addlink('', 'https://www.britannica.com/search?nop&query=' .. ssenc, 'Encyclopaedia Britannica', 'eb'), ' ')

addlink('', 'https://www.bartleby.com/cgi-bin/texis/webinator/65search?query=' .. ssenc, 'Columbia Encyclopedia', 'co'), ' ')

addlink('', 'https://www.google.com/search?q=site%3Ahttp%3A%2F%2Fwww.pcmag.com%2Fencyclopedia_term%2F+' .. ssenc, 'PC Magazine Encyclopedia over Google', 'gct'), ' ')

addlink('', 'https://scienceworld.wolfram.com/search/index.cgi?as_q=' .. ssenc, 'World of Science', 'sw'), ' ')

addlink('', 'https://archive.org/search.php?query=' .. ssenc, 'Internet Archive', 'arc'), ' ')

addlink('', 'https://babel.hathitrust.org/cgi/ls?field1=ocr;q1=' .. ssenc .. ';a=srchls;lmt=ft', 'HathiTrust', 'ht', ')')

else

addlink('(', '//en.wikipedia.org/w/index.php?title=Special:Search&search=' .. ssenc, 'Wikipedia', 'wp', ' ')

table.insert addlink(list1'', addlink('https://www.google.com/search?q=' .. ssenc, 'Google', 'g'), ' ')

addlink('', 'https://www.bing.com/search?q=' .. ssenc, 'Bing', 'b', ')')

end

table.insert(list1, addlink('https://www.google.com/search?q=' .. ssenc, 'Google', 'g'))

if long then

table.insert(list1, addlink('https://www.bing.com/search?q=site%3Awikipedia.org+' .. ssenc, 'Wikipedia over Bing', 'bwp'))

table.insert(list1, addlink('https://www.bing.com/search?q=' .. ssenc, 'Bing', 'b'))

end

local list2 = long and {

addlink('https://www.britannica.com/search?nop&query=' .. ssenc, 'Encyclopaedia Britannica', 'eb'),

addlink('https://www.bartleby.com/cgi-bin/texis/webinator/65search?query=' .. ssenc, 'Columbia Encyclopedia', 'co'),

addlink('https://www.google.com/search?q=site%3Ahttp%3A%2F%2Fwww.pcmag.com%2Fencyclopedia_term%2F+' .. ssenc, 'PC Magazine Encyclopedia over Google', 'gct'),

addlink('https://scienceworld.wolfram.com/search/index.cgi?as_q=' .. ssenc, 'World of Science', 'sw'),

addlink('https://archive.org/search.php?query=' .. ssenc, 'Internet Archive', 'arc'),

addlink('https://babel.hathitrust.org/cgi/ls?field1=ocr;q1=' .. ssenc .. ';a=srchls;lmt=ft', 'HathiTrust', 'ht')

} or {

addlink('https://www.bing.com/search?q=' .. ssenc, 'Bing', 'b')

}

local make_list = require('Module:List').makeList

ret:wikitext('(')

:wikitext(make_list('unbulleted', list1))

if long then ret:wikitext(' | ') end

ret:wikitext(make_list('unbulleted', list2))

:wikitext(')')

return frame:extensionTag{