Module:Citation/CS1: திருத்தங்களுக்கு இடையிலான வேறுபாடு

'%f[%w][%w][%w]%.%a%a+$', -- two character hostname and TLD

'^%d%d?%d?%.%d%d?%d?%.%d%d?%d?%.%d%d?%d?', -- IPv4 address

}

 

local function link_param_ok (value)

local scheme, domain;

return false;

end

end

end

add_vanc_error (cfg.err_msg_supl['non-Latin char'], position);

return false; -- not a string of Latin characters; Vancouver requires Romanization

]]

 

 

if not name then -- if not initials and a suffix

end

 

end -- if here then name has 3 or more uppercase letters so treat them as a word

 

local i = 1; -- counter for number of initials

 

 

break; -- and done because suffix must fall at the end of a name

end -- no error message if not a suffix; possibly because of Romanization

end

if 3 > i then

end

i = i + 1; -- bump the counter

end

end

 

if one then -- if <one> has a value (name, mdash replacement, or mask text replacement)

local proj, tag = interwiki_prefixen_get (one, true); -- get the interwiki prefixen if present

if 'w' == proj and ('Wikipedia' == mw.site.namespaces.Project['name']) then

proj = nil; -- for stuff like :w:de:<article>, :w is unnecessary TODO: maint cat?

end

if proj then

tag = nil; -- unset; don't do both project and language

end

if lang then -- error messaging done in extract_names() where we know parameter names

one = one .. utilities.wrap_style ('interwiki', lang); -- add resized leading space, brackets, static text, language name

end

end

-- emit a maintenance message if user postscript is the default cs2 postscript

-- we catch the opposite case for cs1 in set_cs_style

utilities.set_message ('maint_postscript');

end

--[[--------------------------< E X T R A _ T E X T _ I N _ V O L _ I S S _ C H E C K >------------------------

 

 

For |volume=:

For |issue=:

'No.', 'I.', 'Iss.' (with or without the dot) abbreviations, or 'Issue' in the first characters of the

Single character values ('v', 'i', 'n') allowed when not followed by separator character ('.', ':', '=', or

end

local handler = 'v' == selector and 'err_extra_text_volume' or 'err_extra_text_issue';

val = val:lower(); -- force parameter value to lower case

if val:match (pattern) then -- when a match, error so

utilities.set_message (handler, name); -- add error message

local path, timestamp, flag; -- portions of the archive.org URL

if timestamp then -- if this was an archive.today url ...

end

-- here for archive.org urls

 

local Encyclopedia = A['Encyclopedia']; -- used as a flag by this module and by ~/COinS

 

if 'encyclopaedia' ~= config.CitationClass and 'citation' ~= config.CitationClass then

end

end

 

end

 

Periodical = Encyclopedia; -- error or no, set Periodical to Encyclopedia for rendering; {{citation}} could (not legitimately) have both; use Encyclopedia

Periodical_origin = A:ORIGIN ('Encyclopedia');

 

if utilities.is_set (Title) or utilities.is_set (ScriptTitle) then

if not utilities.is_set (Chapter) then

ScriptChapter = ScriptTitle;

ScriptChapter_origin = A:ORIGIN('ScriptTitle')

ChapterURL = URL;

ChapterURL_origin = URL_origin;

ChapterUrlAccess = UrlAccess;

 

if not utilities.is_set (ChapterURL) and utilities.is_set (TitleLink) then

Chapter = utilities.make_wikilink (TitleLink, Chapter);

end

Periodical = ''; -- redundant so unset

URL = '';

Format = '';

TitleLink = '';

end

Title = Periodical; -- |encyclopedia= set and |article= set so map |encyclopedia= to |title= for rendering

Periodical = ''; -- redundant so unset

end

end

local Year = A['Year'];

 

if not utilities.is_set (Date) then

Date = Year; -- promote Year to Date

local error_list = {};

anchor_year, Embargo = validation.dates(date_parameters_list, COinS_date, error_list);

 

if utilities.is_set (Year) and utilities.is_set (Date) then -- both |date= and |year= not normally needed;

validation.year_date_check (Year, A:ORIGIN ('Year'), Date, A:ORIGIN ('Date'), error_list);

end

if 0 == #error_list then -- error free dates only; 0 when error_list is empty

local modified = false; -- flag

 

Series = utilities.is_set (Series) and wrap_msg ('series', {sepc, Series}) or ""; -- not the same as SeriesNum

Volume = format_volume_issue (Volume, Issue, ArticleNumber, config.CitationClass, Periodical_origin, sepc, use_lowercase);

 

local arch_text;

if "live" == UrlStatus then

if sepc ~= "." then arch_text = arch_text:lower() end

if utilities.is_set (ArchiveDate) then

utilities.set_message ('maint_bot_unknown'); -- and add a category if not already added

else

end

else -- UrlStatus is empty, 'dead'

local tcommon2; -- used for book cite when |contributor= is set

if utilities.is_set (Contributors) then -- when we are citing foreword, preface, introduction, etc.

else

end

 

elseif 'map' == config.CitationClass then -- special cases for cite map

if utilities.is_set (Chapter) then -- map in a book; TitleType is part of Chapter

elseif utilities.is_set (Periodical) then -- map in a periodical

else -- a sheet or stand-alone map

end

elseif 'episode' == config.CitationClass then -- special case for cite episode

 

else -- all other CS1 templates

end

end

end

if utilities.is_set (PostScript) and PostScript ~= sepc then

text = safe_join( {text, sepc}, sepc ); -- Deals with italics, spaces, etc.

end

for _, v in ipairs (z.error_cats_t) do -- append error categories

table.insert (render_t, utilities.substitute (cfg.messages[cat_wikilink], {v, sort_key}));

end

for _, v in ipairs (z.maint_cats_t) do -- append maintenance categories

table.insert (render_t, utilities.substitute (cfg.messages[cat_wikilink], {v, sort_key}));

end

for _, v in ipairs (z.prop_cats_t) do -- append properties categories

table.insert (render_t, utilities.substitute (cfg.messages['cat wikilink'], v)); -- no sort keys

return nil;

end

enum_name = mw.ustring.gsub (name, '%d+$', '#'); -- where enumerator is last charaters in parameter name (these to protect |s2cid=)

enum_name = mw.ustring.gsub (enum_name, '%d+([%-l])', '#%1'); -- where enumerator is in the middle of the parameter name; |author#link= is the oddity