模块:Citation/CS1:修订间差异
imported>Tigerzeng |
imported>Hamish |
||
| 第3,490行: | 第3,490行: | ||
OriginalURLorigin = URLorigin; -- name of url parameter for error messages | OriginalURLorigin = URLorigin; -- name of url parameter for error messages | ||
OriginalFormat = Format; -- and original |format= | OriginalFormat = Format; -- and original |format= | ||
if 'no' | if not in_array (DeadURL, {'no', 'live'}) then -- if URL set then archive-url applies to it | ||
URL = ArchiveURL -- swap-in the archive's url | URL = ArchiveURL -- swap-in the archive's url | ||
URLorigin = A:ORIGIN('ArchiveURL') -- name of archive url parameter for error messages | URLorigin = A:ORIGIN('ArchiveURL') -- name of archive url parameter for error messages | ||
| 第3,499行: | 第3,499行: | ||
OriginalURLorigin = ChapterURLorigin; -- name of chapter-url parameter for error messages | OriginalURLorigin = ChapterURLorigin; -- name of chapter-url parameter for error messages | ||
OriginalFormat = ChapterFormat; -- and original |format= | OriginalFormat = ChapterFormat; -- and original |format= | ||
if 'no' | if not in_array (DeadURL, {'no', 'live'}) then | ||
ChapterURL = ArchiveURL -- swap-in the archive's url | ChapterURL = ArchiveURL -- swap-in the archive's url | ||
ChapterURLorigin = A:ORIGIN('ArchiveURL') -- name of archive-url parameter for error messages | ChapterURLorigin = A:ORIGIN('ArchiveURL') -- name of archive-url parameter for error messages | ||
| 第3,735行: | 第3,735行: | ||
ArchiveDate = set_error('archive_missing_date'); | ArchiveDate = set_error('archive_missing_date'); | ||
end | end | ||
if | if in_array (DeadURL, {'no', 'live'}) then | ||
local arch_text = cfg.messages['archived']; | local arch_text = cfg.messages['archived']; | ||
if sepc ~= "." then arch_text = arch_text:lower() end | if sepc ~= "." then arch_text = arch_text:lower() end | ||
| 第3,743行: | 第3,743行: | ||
Archived = Archived .. " " .. set_error('archive_missing_url'); | Archived = Archived .. " " .. set_error('archive_missing_url'); | ||
end | end | ||
elseif is_set(OriginalURL) then -- DeadURL is empty, 'yes', 'true', 'y', 'unfit' | elseif is_set(OriginalURL) then -- DeadURL is empty, 'yes', 'true', 'y', 'dead', 'unfit' or 'usurped' | ||
local arch_text = cfg.messages['archived-dead']; | local arch_text = cfg.messages['archived-dead']; | ||
if sepc ~= "." then arch_text = arch_text:lower() end | if sepc ~= "." then arch_text = arch_text:lower() end | ||
if in_array (DeadURL, {'unfit', 'usurped'}) then | if in_array (DeadURL, {'unfit', 'usurped'}) then | ||
Archived = sepc .. " " .. '原始内容存档于' .. ArchiveDate; -- format already styled | Archived = sepc .. " " .. '原始内容存档于' .. ArchiveDate; -- format already styled | ||
else -- DeadURL is empty, 'yes', 'true', or ' | else -- DeadURL is empty, 'yes', 'true', 'y' or 'dead' | ||
Archived = sepc .. " " .. substitute( arch_text, | Archived = sepc .. " " .. substitute( arch_text, | ||
{ external_link( OriginalURL, cfg.messages['original'], OriginalURLorigin ) .. OriginalFormat, ArchiveDate } ); -- format already styled | { external_link( OriginalURL, cfg.messages['original'], OriginalURLorigin ) .. OriginalFormat, ArchiveDate } ); -- format already styled | ||