Wikisource eswikisource https://es.wikisource.org/wiki/Portada MediaWiki 1.47.0-wmf.7 first-letter Medio Especial Discusión Usuario Usuario discusión Wikisource Wikisource discusión Archivo Archivo discusión MediaWiki MediaWiki discusión Plantilla Plantilla discusión Ayuda Ayuda discusión Categoría Categoría discusión Portal Portal discusión Página Página Discusión Índice Índice Discusión Autor Autor discusión TimedText TimedText talk Módulo Módulo discusión Evento Evento discusión 10 84040 1664812 1417631 2026-06-17T12:18:31Z Ezarate 4249 wikinoticias cerro 1664812 wikitext text/x-wiki <div style="overflow:auto; overflow-y:hidden;"> {| cellpadding="4" cellspacing="0" style="width:100%; background:none; margin-top:10px;" class="plainlinks" | colspan="12" style="text-align:center; padding-bottom:10px; font-size: 90%" | Wikisource es un proyecto sostenido por la [//wikimediafoundation.org Fundación Wikimedia], al igual que los siguientes proyectos plurilingües de contenido libre: |- style="text-align:center; padding:10px;" | style="width:8.3%;" | [[Archivo:Wiktionary-logo.svg|43x50px|link=wikt:|Wikcionario]] | style="width:8.3%;" | [[Archivo:Wikipedia-logo.svg|42x50px|link=w:|Wikipedia]] | style="width:8.3%;" | [[Archivo:Wikiquote-logo.svg|35x50px|link=q:|Wikiquote]] | style="width:8.3%;" | [[Archivo:Wikibooks-logo.svg|35x50px|link=b:|Wikilibros]] | style="width:8.3%;" | [[Archivo:Wikispecies-logo.svg|35x50px|link=species:|Wikiespecies]] | style="width:8.3%;" | [[Archivo:Commons-logo.svg|35x50px|link=c:|Wikimedia Commons]] | style="width:8.3%;" | [[Archivo:Wikimedia Community Logo.svg|35x50px|link=m:Portada/Es|Meta-Wiki]] | style="width:8.3%;" | [[Archivo:Wikiversity-logo.svg|43x50px|link=v:|Wikiversidad]] | style="width:8.3%;" | [[Archivo:Wikivoyage-Logo-v3-icon.svg|36px|link=voy:|Wikiviajes]] | style="width:8.3%;" | [[Archivo:Wikidata-logo.svg|50px|link=d:|Wikidata]] | style="width:8.3%;" | [[Archivo:MediaWiki-2020-large-icon.svg|47px|link=mw:|MediaWiki]] |- style="text-align:center; vertical-align:top; font-size:85%;" | style="padding-bottom:10px;" | [[wikt:|'''Wikcionario''']]<br />Diccionario con sinónimos | style="padding-bottom:10px;" | [[w:|'''Wikipedia''']]<br />Enciclopedia libre | style="padding-bottom:10px;" | [[q:|'''Wikiquote''']]<br />Colección de citas | style="padding-bottom:10px;" | [[b:|'''Wikilibros''']]<br /> Libros de texto y manuales | style="padding-bottom:10px;" | [[species:|'''Wikiespecies''']]<br />Directorio de especies | style="padding-bottom:10px;" | [[c:|'''Commons''']]<br />Imágenes y multimedia | style="padding-bottom:10px;" | [[m:Portada/ES|'''Meta-Wiki''']]<br />Coordinación de proyectos | style="padding-bottom:10px;" | [[v:|'''Wikiversidad''']]<br />Plataforma educativa libre | style="padding-bottom:10px;" | [[voy:|'''Wikiviajes''']]<br />Guía de viajes | style="padding-bottom:10px;" | [[d:|'''Wikidata''']]<br />Base de datos libre | style="padding-bottom:10px;" | [[mw:MediaWiki/es|'''MediaWiki''']]<br />Desarrollo de ''software'' |- |} </div><noinclude>[[Categoría:Wikisource:Plantillas de enlace entre proyectos]]</noinclude> o0v1qmjn7dfc5drq7d6mwxegk6x1cza 828 225014 1664877 1664545 2026-06-18T01:21:02Z Ignacio Rodríguez 3603 1664877 Scribunto text/plain require('strict') local p = {} local QID = mw.wikibase.getEntityIdForCurrentPage() local Str = require('Módulo:String') local delink = Str.delink local Args = require('Módulo:Arguments') local Enlaces = require('Módulo:Enlaces') local Obra = require('Módulo:Obra') local categorias = {} local errorcats = {} local lang = mw.language.new('es') --parámetros reconocidos. 1 = vigente, 0 = obsoleto. En orden alfabético: local params = {['ano']=1,['anterior']=1,['audio']=1,['autor']=1,["bilingüe"]=1,['catálogo']=0,['commons']=1,['commonscat']=1,['derechos']=1,['desambiguación']=1, ['editor']=1, ['editorial']=1, ['enlaces']=1,['históricos']=1,['ilustrador']=1,['imprenta']=1, ['lugar']=1, ['más info']=1,['meta']=1,['noano']=1,['notas']=1, ['progreso']=1, ['próximo']=1, ['sección']=1,['sección autor']=1,['sub-titulo']=1,['subsección']=1,['subpágina']=1,['titulo']=1,['traductor']=1,['última muerte']=1, ['volumen']=1, ['wikcionario']=1,['wikidata']=1,['wikilibros']=1,['wikinoticias']=1,['wikipedia']=1,['wikiquote']=1,['wikispecies']=1,['wikiversidad']=1, ['header']=1, ['index']=1, ['index_wikidata']=1 } local enlacePagina = mw.title.getCurrentTitle().text local textoenlace=mw.uri.encode(enlacePagina, "QUERY") local altparams= {['título']='titulo', ['title']='titulo', ['subtítulo']='sub-titulo', ['subtitulo']='sub-titulo', ['sub-título']='sub-titulo', ['sub-title']='sub-titulo', ['subtitle']='sub-titulo', ['left']='anterior', ['right']='próximo', ['siguiente']='próximo', ['author']='autor', ['traducción']='traductor', ['año']='ano', ['bilingue']='bilingüe', ['noaño']='noano', ['nota']='notas', ['subpagina']='subpágina', ['seccion']='sección', ['seccion autor']='sección autor', ['seccion-autor']='sección autor', ['sección-autor']='sección autor' } local function link(s) if s:find("[%[%{%<]") then return s else return '[[Autor:'..s..'|'..s..']]' end end local function aCadena(t) if not t then return '' end if type(t) == 'string' then t = mw.text.split(t, '[/,]') for i, v in ipairs(t) do t[i] = {text = v} end end local z = {} for i, creator in ipairs(t) do z[i] = creator.text if (z[i] == 'Anónimo') or (z[i] == 'valor desconocido') then z[i] = '[[Portal:Anónimo|Anónimo]]' elseif z[i] == 'Wikisource' then z[i] = '[[Ayuda:Directrices para traducciones|Wikisource]]' else z[i] = link(z[i]) end end return mw.text.listToText(z) end local function nav_link(argus, class, arrow, content) local span = mw.html.create('span'):addClass(class..'-span') span:tag('span'):addClass(class..'-span-arrow') if class=='prev' then span:wikitext(arrow .. ' ' .. content) end if class=='next' then span:wikitext(content .. ' ' .. arrow) end if argus['enlaces'] and mw.ustring.lower(argus['enlaces']) == 'no' then span:cssText('display:none') end return tostring(span) end local function errorMessage(text) -- Función que entrega un mensaje de error formateado como tal local html = mw.html.create('div') html:addClass('error') :wikitext(text) table.insert(errorcats, '[[Categoría:Wikisource:Páginas con errores en la plantilla Encabe]]') return tostring(html) end local function linktarget(s) if not s:match("%[%[") then return s end local result = s -- Find the display area of the wikilink if result:match("|") then -- Find if we're dealing with a pipecd link. result = result:match("%[%[(.+)%|.+%]%]") else result = result:match("%[%[(.-)%]%]") end return result end local deAutor = function(s) --Para [[Autor:AAA|BBB]], devuelve AAA -- remover entidades html s = s:gsub("<[%a%d%s%\"'/#;:=]+>", "") local m = mw.ustring.match(s, '%[%[Autor:(.+)%|.+%]%]') if m and m ~= '' then return m end m = mw.ustring.match(s, '%[%[Autor:(.+)%]%]') if m and m ~= '' then return m end --enlaces a wikidata u otros m = mw.ustring.match(s, '%[%[.+%|(.+)%]%]') if m and m ~= '' then return m end return delink(s) end local function enlaceMicroformato(param, valor) if valor and valor ~= '' then if type(valor) == 'string' then return mw.html.create('span') :addClass('ws-' .. param) --ws-author, ws-title, etc. :wikitext(delink(valor)) elseif type(valor) == 'table' then local spans = {} for i, v in ipairs(valor) do -- creadores if type(v)=='table' then v = v.wsPage or v.label end table.insert(spans, tostring(mw.html.create('span') :addClass('ws-' .. param) :wikitext(delink(v))) ) end return table.concat(spans) end end return '' end local function microformato(d, argus) local microformat = mw.html.create('div') :cssText('display:none') :attr('id', 'ws-data') :addClass('ws-noexport') -- todo: no captura datos del Índice si tiene otro Wikidata (p.ej. Q88887973) -- todo: los que no están en [[Plantilla:Proofreadpage header template]] (lugar, volumen, nivel) no llegan del -- índice y sólo los captura de Wikidata. if d.title and d.title ~= '' then microformat:node( enlaceMicroformato( 'title', d.title ) ) microformat:node( enlaceMicroformato( 'key', d.title ) ) --todo: mejorable end if d.pubYear and d.pubYear ~= '' then microformat:node( enlaceMicroformato( 'year', d.pubYear ) ) end if d.author and d.author ~= '' then microformat:node( enlaceMicroformato( 'author', d.author ) ) end if d.translator and d.translator ~= '' then microformat:node( enlaceMicroformato( 'translator', d.translator ) ) end if d.illustrator and d.illustrator ~= '' then microformat:node( enlaceMicroformato( 'illustrator', d.illustrator ) ) end if argus["sección"] and argus["sección"] ~= '' then microformat:node( enlaceMicroformato( 'chapter', argus["sección"] ) ) end if d.printer and d.printer ~= '' then --ojo: Editorial ~= Editor ~= Imprenta microformat:node( enlaceMicroformato( 'publisher', d.printer ) ) end if d.place and d.place ~= '' then microformat:node( enlaceMicroformato( 'place', d.place ) ) end if d.progress then microformat:node( enlaceMicroformato( 'progress', d.progress.indicator ) ) --puede que esté roto end if d.volume and d.volume ~= '' then microformat:node( enlaceMicroformato( 'volume', d.volume ) ) end --todo: pdte. (¿adaptar de [[:ca:Module:Header]]?) --if argus.index then -- microformat:node( enlaceMicroformato( 'scan', argus.index ) ) -- if argus.image and mw.ustring.match(argus.image, '^%d+$') ~= nil then -- microformat:node( enlaceMicroformato( 'cover', argus.index .. '/' .. argus.image ) ) -- end -- end --todo: ¿extraer de listaenlaces? argus.x ~= listaenlaces if argus.wikipedia and argus.wikipedia ~= '' then microformat:node( enlaceMicroformato( 'wikipedia', argus.wikipedia ) ) end if argus.wikiquote and argus.wikiquote ~= '' then microformat:node( enlaceMicroformato( 'wikiquote', argus.wikiquote ) ) end if argus.commonscat and argus.commonscat ~= '' then microformat:node( enlaceMicroformato( 'commons', argus.commons ) ) end if argus.notas and argus.notas ~= '' then microformat:tag('div') --no puede ser span :addClass('ws-notes') --ws-summary? :wikitext(argus.notas) end return tostring(microformat) end local function buscaDesam(title) local match = string.match( title.text, '(.-) %(.-%)') if not match then return end local desam = mw.title.new(match) for i, cat in ipairs(desam.categories) do if cat == 'Wikisource:Páginas de desambiguación' then return match end end end local function personaCats(t, catprefix, cats) if not t then return '' end if type(t) == 'string' then t = mw.text.split(t, '[/,]') for i, v in ipairs(t) do t[i] = {text = v} end end if t then for i, creator in ipairs(t) do local name = creator.text local delinked = delink(name) if (delinked == 'Anónimo') or (delinked == 'valor desconocido') then table.insert(cats, '[[Categoría:'..catprefix..' de autor anónimo]]') else table.insert(cats, '[[Categoría:'..catprefix..' de '..deAutor(name):match("^%s*(.-)%s*$") ..']]') end end end if catprefix ~= '' then return cats end return '' end function p.encabe( frame ) local titulo = mw.title.getCurrentTitle() local html = mw.html.create() local argus = Args.getArgs(frame) argus = Args.alias(argus, altparams) argus.index_wikidata = argus.wikidata -- guarda el QID del Índice, por si difiere de la obra/subdivisión local essub = titulo.isSubpage if argus['subpágina'] == 'no' then essub = false end -- QID real prevalece sobre el importado desde el índice (importante en subdivisiones) if QID and QID ~= '' then argus['wikidata'] = QID or argus['wikidata'] or '' end -- obtener todos los datos local d = Obra.newWork((QID or titulo.text), argus) --variables matemática derechos de autor local anosmuerte local anospub if d.pubYear and tonumber(d.pubYear) ~= nil then anospub = tonumber(lang:formatDate('Y')) - tonumber(d.pubYear) end if argus['última muerte'] and tonumber(argus['última muerte']) ~= nil then anosmuerte = tonumber(lang:formatDate('Y')) - tonumber(argus['última muerte']) end -- estructura HTML local divgrande = html:tag('div'):attr('id','headertemplate'):addClass('noprint ws-noexport notheme') -- div principal que contiene al resto local main = divgrande:tag('div'):addClass('main-div') local anterior = main:tag('div'):attr('id','headerprevious') local medio = main:tag('div'):addClass('middle-div') local proximo = main:tag('div'):attr('id','headernext') ----- enlaces de navegación if argus['anterior'] and argus['anterior'] ~= '' then anterior:wikitext(nav_link(argus, 'prev', '← ', argus['anterior'])) end if argus['próximo'] and argus['próximo'] ~= '' then proximo:wikitext(nav_link(argus, 'next', ' →', argus['próximo'])) end if d.partede then -- TODO: hacer algo con las obras que son parte de otras end -- datos bibliográficos if d.mainTitle then medio:wikitext("'''''".. d.mainTitle .."'''''") if d.subtitle then medio:wikitext(': '..'<span style="font-size:83%;">'.. d.subtitle ..'</span>') end if d.pubYear and not argus['noano'] then medio:wikitext(' ('.. d.pubYear ..')') if tonumber(d.pubYear) ~= nil then table.insert(categorias, '[[Categoría:P'.. d.pubYear ..']]') end end medio:wikitext('<br>') else table.insert(errorcats, '[[Categoría:Wikisource:Textos sin título]]') end if d.mainAuthor then personaCats(d.author, '', {}) medio:wikitext('de '.. aCadena(d.mainAuthor) ..'<br>') end if d.translator then personaCats(d.translator, 'Traducciones', categorias) medio:wikitext('traducción de '..aCadena(d.translator)..'<br>') end if d.illustrator then personaCats(d.illustrator, 'Ilustraciones', categorias) medio:wikitext('ilustración de '..aCadena(d.illustrator)..'<br>') end if argus['más info'] then medio:wikitext(argus['más info']..'<br>') end if d.title and d.title ~= d.mainTitle then -- "sección" pasa a "title" cuando este último no existe medio:tag('span'):cssText('font-style:italics'):wikitext(d.title) if d.author and aCadena(d.mainAuthor) ~= aCadena(d.author) then medio:wikitext(' de '..aCadena(d.author)) end if argus['subsección'] then medio:tag('span'):cssText('font-size: 83%;'):wikitext('<br>'..argus['subsección']) end end if not argus['desambiguación'] and not essub then argus['desambiguación'] = buscaDesam(titulo) end -- ENLACES A PROYECTOS HERMANOS local inferior = main:tag('div'):addClass('noprint plainlinks lower-div') local listaenlaces = Enlaces.all(argus) -- TODO: pasarlo al módulo enlaces, o es muy específico de encabezado? if d.edicionde then listaenlaces[3] = { ['name'] = 'Otras versiones', ['image'] = 'OOjs_UI_icon_book-ltr.svg', ['text'] = 'otras versiones', ['prefix'] = '', ['title'] = linktarget(d.edicionde),} end --matematica y manejo derechos de autor if not argus['derechos'] or argus['derechos'] == '' then if d.place then argus['derechos'] = require('Módulo:Obra/países').get_country(d.place[1]) end end if argus['derechos'] then listaenlaces[1] = {['text'] = argus.derechos, ['image'] = 'PD-icon.svg', ['prefix'] = ':Wikisource:Duración de derechos de autor por país#', ['title'] = argus.derechos} if (argus['última muerte'] == 'seudónimo' or argus['última muerte'] == 'anónimo') and (anospub ~= nil) then local numero = math.floor((anospub - 1)/10) if numero > 10 then numero = 10 end listaenlaces[2] = {['image'] = nil, ['text'] = tostring(numero*10)..' p.a.p. o menos', ['prefix'] = ':Wikisource:Duración de derechos de autor por país#', ['title'] = tostring(numero*10)..' p.a.p.'} table.insert(categorias, '[[Categoría:'..tostring(numero*10)..' p.a.p.]]') elseif argus['última muerte'] and (anosmuerte ~= nil) then local numero = math.floor((anosmuerte - 1)/10) if numero > 4 then --a partir de 50 p.m.a. if numero > 10 then numero = 10 end listaenlaces[2] = {['image'] = nil, ['text'] = tostring(numero*10)..' p.m.a. o menos', ['prefix'] = ':Wikisource:Duración de derechos de autor por país#', ['title'] = tostring(numero*10)..' p.m.a.'} table.insert(categorias, '[[Categoría:'..tostring(numero*10)..' p.m.a.]]') end end local cadena = argus.derechos:gsub(" y ", ", ") -- Usar string.gmatch para separar por comas y procesar directamente for nombre in cadena:gmatch("([^,]+)") do table.insert(categorias, '[[Categoría:Publicado en '.. nombre:match("^%s*(.-)%s*$") ..']]') end end -- inserta enlaces inferior:wikitext(Enlaces.formattedlinks(listaenlaces)) if argus['bilingüe'] and argus['bilingüe'] ~= '' then inferior:wikitext('['..titulo:fullUrl({['match']=argus['bilingüe']})..' ver texto bilingüe]') end --Enlaces de descarga if not essub then local LinkExport='https://ws-export.wmcloud.org/?lang=es&page='..textoenlace..'&format=' local w = "<div style=\"font-size:80%\">Descargar como &nbsp;" w = w .. "[[Archivo:EPUB silk icon.svg|12px|link="..LinkExport.."epub|Descargar en formato ePub]]&nbsp;" w = w .. "[[Archivo:Document-pdf.svg|15px|link="..LinkExport.."pdf|Descargar en formato PDF]]&nbsp;" w = w .. "[[Archivo:Mobi_icon.svg|22px|link="..LinkExport.."mobi|Descargar en formato mobi]]</div>" inferior:wikitext(w) end if argus['notas'] and argus['notas'] ~= '' then divgrande:tag('div'):addClass('notes'):wikitext("'''Nota:''' "..argus['notas']):tag('hr') end if argus['audio'] and argus['audio'] ~= '' then divgrande:tag('div'):addClass('notes'):wikitext(frame:expandTemplate{ title = 'Multimedia', args = { argus['audio'] } }) end --categorías automáticas if not essub then table.insert(categorias, '[[Categoría:ES-'..Str.CaracterParaOrdenar(titulo.rootText)..']]') else categorias = {'[[Categoría:'..titulo.rootText..']]'} html:wikitext('__EXPECTED_UNCONNECTED_PAGE__') end for k,v in pairs(argus) do if params[k] or altparams[k] then if params[k] == 0 then table.insert(errorcats, '[[Categoría:Wikisource:Páginas que usan parámetros obsoletos en la plantilla Encabe]]') --añade categoría de seguimiento a parámetros obsoletos (declarados arriba) end else html:wikitext(errorMessage('Error: parámetro '..k..' no reconocido')) table.insert(errorcats, '[[Categoría:Wikisource:Páginas que usan parámetros no reconocidos en la plantilla Encabe]]') end end if titulo.namespace ~= 0 then --solo categorías en el espacio principal categorias = {} end table.sort(categorias) html:wikitext(table.concat(categorias)) html:wikitext(table.concat(errorcats)) html:wikitext(microformato(d, argus)) return tostring(html) end return p j7iyfr6w8l1vrgiaugd80urwjfhwxgj 828 352524 1664846 1644224 2026-06-17T22:22:48Z Ignacio Rodríguez 3603 nueva versión (algunas plantillas podrían presentar fallas temporalmente) 1664846 Scribunto text/plain --[=[ Importado de la Wikisource inglesa en esta versión: https://en.wikisource.org/w/index.php?title=Module:Work&oldid=12000562 Se trata de un módulo que genera un objeto (una tabla) cuyos elementos o propiedades son las propiedades de una edición/obra ]=] require('strict') local p = {} -- Module constants p.TYPES = { EDITION = 'edición', WORK = 'obra literaria', ARTICLE = 'artículo', --scholarly articles, MOVIE = 'obra audiovisual', OTHER = 'obra' } p.local_map = { isA = { p = 'P31' }, language = { p = 'P407' }, title = { header = 'sección', index = 'Titulo', p = 'P1476' }, -- título obra hija/único mainTitle = { header = 'titulo', p = 'P1476' }, -- título obra madre subtitle = { header = 'sub-titulo', index = 'Subtitulo', p = 'P1680' }, series = { index = 'Serie', p = 'P361' }, author = { header = 'sección autor',index = 'Autor', p = 'P50' }, -- autor obra hija/único mainAuthor = { header = 'autor', p = 'P50' }, -- autor obra madre translator = { header = 'traductor', index = 'Traductor', p = 'P655' }, editor = { header = 'editor', index = 'Editor', p = 'P98' }, illustrator = { header = 'ilustrador', index = 'Ilustrador', p = 'P110' }, introducer = { header = 'prologuista', index = 'Prologuista', p = 'P2679' }, pubYear = { header = 'ano', index = 'Ano', p = 'P577' }, inception = { p = 'P571' }, publisher = { header = 'editorial', index = 'Editorial', p = 'P123' }, printer = { header = 'imprenta', index = 'Imprenta', p = 'P123' }, place = { header = 'lugar', index = 'Lugar', p = 'P291' }, country = { header = 'derechos', index = 'derechos' }, volume = { header = 'volumen', index = 'Volumen', p = 'P478' }, issue = { p = 'P433' }, pages = { p = 'P304' }, parentWork = { header = 'publicadoen', p = 'P1433' }, editionof = { header = 'obra', index = 'Obra', p = 'P629' }, commonsFile = { p = 'P996' }, editions = { p = 'P747' }, derivedWorks = { p = 'P4969' }, basedOn = { p = 'P144' }, progress = { header = 'progreso', index = 'Progreso' } } local Wikidata = require('Módulo:Wikidata') -- Función de salida hacia el Módulo:Wikidata local function fetchFromWikidata( entityId, propertyId, options ) if not entityId or not propertyId then return nil end options = options or {} local queryArgs = { item = entityId, property = propertyId, } for k, v in pairs(options) do queryArgs[k] = v end local result = Wikidata.claim(queryArgs) if result and result ~= "" then return result end return nil end local ENTITIES = { human = 'Q5', edition = 'Q3331189', scholarlyArticle = 'Q13442814', literaryWork = 'Q7725634', movie = {'Q11424', -- película 'Q202866', --película animada 'Q506240', --telefilme 'Q18011171', --película inacabada 'Q5398426', --serie de televisión }, } --[=[ Util function: return true if the item is in the given table ]=] local function valueIn( t, v ) if type(v) == 'string' then for _, tv in pairs( t ) do if tv == v then return true end end elseif type(v) == 'table' then for _, vv in ipairs( v ) do for _, tv in ipairs( t ) do if tv == vv then return true end end end end return false end --[=[ Get the entity for a QID, or a page title ]=] local function getEntity( titleOrQid ) local item if type(titleOrQid) == 'table' then -- this is already Wikibase item data item = titleOrQid elseif string.match( titleOrQid, 'Q%d+', 1 ) then -- it's a QID item = mw.wikibase.getEntity( titleOrQid ) elseif string.find( titleOrQid, '%.pdf' ) or string.find( titleOrQid, '%.djvu' ) then -- es un índice! local index = mw.ext.proofreadPage.newIndex( titleOrQid ) local Qid = index.fields.Wikidata item = mw.wikibase.getEntity( Qid ) else -- assume it's a page title -- TODO only return the ID and look it up (expensive) only if actually used item = mw.wikibase.getEntity( mw.wikibase.getEntityIdForTitle( titleOrQid ) ) end return item end local function getLocalSiteLink( id ) if not id or type(id) ~= 'string' or not id:match('Q%d+') then return end local sl = mw.wikibase.getSitelink(id) if sl then return sl end local entity = mw.wikibase.getEntity(id) if not entity.sitelinks then return end for k, v in pairs(entity.sitelinks) do local m = string.match( k, '(%l+)wikisource') if m then return 's:'..m..':'..entity:getSitelink(k) end end end local function getProgressLevel(qid, ws) -- devuelve tanto el ícono como el indicador, para el uso que se le de return {icon = Wikidata.badge{qid=qid, ws=ws}, indicator = Wikidata.badge{qid=qid, ws=ws, indicator=true} } end local function getPropIds( id, prop ) -- formatting: raw trae sólo QIDS return fetchFromWikidata( id, prop, { formatting = 'raw', tabla = true } ) end local function getPropLabels( id, prop ) return fetchFromWikidata( id, prop, { formatting = 'label', tabla = true } ) end local function getPropTable( id, prop ) return fetchFromWikidata( id, prop, { tabla = true } ) end local function getStringProp( id, prop ) -- directo, para cadenas return fetchFromWikidata( id, prop, {list = false} ) end local function getYearProp( id, prop ) local dateStr = fetchFromWikidata( id, prop ) if dateStr then local year = string.match(dateStr, "%d%d%d%d") return year or dateStr end end local function getCreatorList( id, prop ) local creators = {} local strings_table = getPropTable( id, prop) or {} local ids_table = getPropIds(id, prop) or {} for i, v in ipairs(ids_table) do v = v:match('Q%d+') and v or nil table.insert(creators, { id = v, text = strings_table[i], wsPage = getLocalSiteLink(v), label = mw.wikibase.getLabel(v) or strings_table[i] }) end if prop == p.local_map.mainAuthor.p then -- P2093 = cadena de autor local string_authors = fetchFromWikidata( id, 'P2093', { tabla = true } ) if string_authors then for _, name in ipairs( string_authors ) do table.insert( creators, {text = name, label = name} ) end end end return #creators > 0 and creators or nil end local function getEditionList( id, prop ) local editions = getPropIds( id, prop ) if not editions then return end local list = {} for _, v in pairs( editions ) do local edition = p.newWork( v ) table.insert( list, edition ) end return list end --[=[ Get the 'type' of the work Options are: edition, articles (as in journal articles), or works ]=] local function getWorkType( id ) local isVals = getPropIds( id, p.local_map.isA.p ) if valueIn( isVals, ENTITIES.edition ) then return p.TYPES.EDITION elseif valueIn( isVals, ENTITIES.scholarlyArticle ) then return p.TYPES.ARTICLE elseif valueIn( isVals, ENTITIES.movie ) then return p.TYPES.MOVIE elseif valueIn( isVals, ENTITIES.literaryWork ) then return p.TYPES.WORK end return p.TYPES.OTHER end --[=[ The main entry point (Modificado para aceptar fuentes de Wikisource) ]=] function p.newWork( titleOrQid, header_args, index_args ) local obj = {} -- Asegurar que las fuentes locales existan como tablas vacías si no se pasan header_args = header_args or {} index_args = index_args or {} local item = getEntity( titleOrQid ) if not item then -- error( 'Failed to look up item: ' .. titleOrQid ) -- obras no conectadas a Wikidata... categoría?? item = {} end local index if type(titleOrQid) == 'string' and (string.find( titleOrQid, '%.pdf' ) or string.find( titleOrQid, '%.djvu' )) then index = titleOrQid end local m_qid = index_args['Wikidata'] or header_args['index_wikidata'] local qid = item.id local qid_fallback = (m_qid and m_qid ~= "" and m_qid) or qid -- Almacén interno de datos y estado de carga local data = { item = item, index = index, qid = qid, m_qid = m_qid } return setmetatable( obj, { __eq = item.equals, __lt = item.__lt, __tostring = function ( _ ) return item.prefixedText end, __index = function ( _, k ) -- Caché interna if data[k] ~= nil then return data[k] end -- Resolver propiedades sin P if k == 'type' then data.type = getWorkType( qid ) return data.type end if k == 'wsPage' then data.wsPage = getLocalSiteLink( qid ) return data.wsPage end if k == 'progress' then local progress = header_args[p.local_map.progress.header] or index_args[p.local_map.progress.index] data.progress = getProgressLevel(qid, progress) return data.progress end -- Campos modificables (en el índice o encabezado) local mapping = p.local_map[k] if mapping then -- Prioridades en orden: local P = mapping.p local val_header = header_args[mapping.header] -- Comportamiento especial para el título y autor (sección, sección-autor) -- Si se pide título (por defecto, sección) y no hay: if not val_header or val_header == "" then if k == 'title' then val_header = header_args[p.local_map.mainTitle.header] elseif k == 'author' then val_header = header_args[p.local_map.mainAuthor.header] end end -- Prioridad 4: Campos ingresados manualmente en {{Encabezado}} if val_header and val_header ~= "" then data[k] = val_header return data[k] end -- Prioridad 3: Wikidata de la Sección/Capítulo -- Solo buscamos aquí si el qid de la sección difiere del qid de la madre (Índice) if qid ~= qid_fallback then local val_wd = nil if k == 'title' then val_wd = getStringProp( qid, P ) elseif k == 'author' then val_wd = getCreatorList( qid, P ) -- El resto de las propiedades menores se pueden interceptar aquí redundantemente si es necesario end if val_wd then data[k] = val_wd return data[k] end end -- Prioridad 2: Campos ingresados manualmente en el Índice (Espacio de nombres Índice) local val_index = index_args[mapping.index] if val_index and val_index ~= "" then data[k] = val_index return data[k] end -- Prioridad 1: Wikidata de la Edición Madre -- Fuentes más locales no tenían el dato. if k == 'title' or k == 'subtitle' or k == 'mainTitle' then data[k] = getStringProp( qid_fallback, P ) return data[k] end if k == 'language' or k == 'place' then data[k] = getPropLabels( qid_fallback, P ) return data[k] end if k == 'series' or k == 'publisher' or k == 'printer' then data[k] = getPropTable( qid_fallback, P ) return data[k] end if k == 'pubYear' then local theDate if data.type == p.TYPES.WORK then theDate = getYearProp( qid_fallback, p.local_map.inception.p ) end if not theDate then theDate = getYearProp( qid_fallback, p.local_map.pubYear.p ) end data[k] = theDate return data[k] end if k == 'author' or k == 'illustrator' or k == 'editor' or k == 'mainAuthor' or k == 'translator' or k == 'introducer' then data[k] = getCreatorList( qid_fallback, P ) return data[k] end if k == 'parentWork' or k == 'editions' or k == 'derivedWorks' or k == 'basedOn' then data[k] = getEditionList(qid_fallback, P) return data[k] end if k == 'commonsFile' then if data.index == nil then data[k] = getPropLabels( qid_fallback, P ) else data[k] = {data.index} end return data[k] end end return nil end, __newindex = function ( _, k, _ ) error( "index '" .. k .. "' is read only", 2 ) end } ) end fkn6pay1zlj4k3g1vtwqlx8km8jri7w 1664851 1664846 2026-06-17T22:24:02Z Ignacio Rodríguez 3603 el peor error posible X_X 1664851 Scribunto text/plain --[=[ Importado de la Wikisource inglesa en esta versión: https://en.wikisource.org/w/index.php?title=Module:Work&oldid=12000562 Se trata de un módulo que genera un objeto (una tabla) cuyos elementos o propiedades son las propiedades de una edición/obra ]=] require('strict') local p = {} -- Module constants p.TYPES = { EDITION = 'edición', WORK = 'obra literaria', ARTICLE = 'artículo', --scholarly articles, MOVIE = 'obra audiovisual', OTHER = 'obra' } p.local_map = { isA = { p = 'P31' }, language = { p = 'P407' }, title = { header = 'sección', index = 'Titulo', p = 'P1476' }, -- título obra hija/único mainTitle = { header = 'titulo', p = 'P1476' }, -- título obra madre subtitle = { header = 'sub-titulo', index = 'Subtitulo', p = 'P1680' }, series = { index = 'Serie', p = 'P361' }, author = { header = 'sección autor',index = 'Autor', p = 'P50' }, -- autor obra hija/único mainAuthor = { header = 'autor', p = 'P50' }, -- autor obra madre translator = { header = 'traductor', index = 'Traductor', p = 'P655' }, editor = { header = 'editor', index = 'Editor', p = 'P98' }, illustrator = { header = 'ilustrador', index = 'Ilustrador', p = 'P110' }, introducer = { header = 'prologuista', index = 'Prologuista', p = 'P2679' }, pubYear = { header = 'ano', index = 'Ano', p = 'P577' }, inception = { p = 'P571' }, publisher = { header = 'editorial', index = 'Editorial', p = 'P123' }, printer = { header = 'imprenta', index = 'Imprenta', p = 'P123' }, place = { header = 'lugar', index = 'Lugar', p = 'P291' }, country = { header = 'derechos', index = 'derechos' }, volume = { header = 'volumen', index = 'Volumen', p = 'P478' }, issue = { p = 'P433' }, pages = { p = 'P304' }, parentWork = { header = 'publicadoen', p = 'P1433' }, editionof = { header = 'obra', index = 'Obra', p = 'P629' }, commonsFile = { p = 'P996' }, editions = { p = 'P747' }, derivedWorks = { p = 'P4969' }, basedOn = { p = 'P144' }, progress = { header = 'progreso', index = 'Progreso' } } local Wikidata = require('Módulo:Wikidata') -- Función de salida hacia el Módulo:Wikidata local function fetchFromWikidata( entityId, propertyId, options ) if not entityId or not propertyId then return nil end options = options or {} local queryArgs = { item = entityId, property = propertyId, } for k, v in pairs(options) do queryArgs[k] = v end local result = Wikidata.claim(queryArgs) if result and result ~= "" then return result end return nil end local ENTITIES = { human = 'Q5', edition = 'Q3331189', scholarlyArticle = 'Q13442814', literaryWork = 'Q7725634', movie = {'Q11424', -- película 'Q202866', --película animada 'Q506240', --telefilme 'Q18011171', --película inacabada 'Q5398426', --serie de televisión }, } --[=[ Util function: return true if the item is in the given table ]=] local function valueIn( t, v ) if type(v) == 'string' then for _, tv in pairs( t ) do if tv == v then return true end end elseif type(v) == 'table' then for _, vv in ipairs( v ) do for _, tv in ipairs( t ) do if tv == vv then return true end end end end return false end --[=[ Get the entity for a QID, or a page title ]=] local function getEntity( titleOrQid ) local item if type(titleOrQid) == 'table' then -- this is already Wikibase item data item = titleOrQid elseif string.match( titleOrQid, 'Q%d+', 1 ) then -- it's a QID item = mw.wikibase.getEntity( titleOrQid ) elseif string.find( titleOrQid, '%.pdf' ) or string.find( titleOrQid, '%.djvu' ) then -- es un índice! local index = mw.ext.proofreadPage.newIndex( titleOrQid ) local Qid = index.fields.Wikidata item = mw.wikibase.getEntity( Qid ) else -- assume it's a page title -- TODO only return the ID and look it up (expensive) only if actually used item = mw.wikibase.getEntity( mw.wikibase.getEntityIdForTitle( titleOrQid ) ) end return item end local function getLocalSiteLink( id ) if not id or type(id) ~= 'string' or not id:match('Q%d+') then return end local sl = mw.wikibase.getSitelink(id) if sl then return sl end local entity = mw.wikibase.getEntity(id) if not entity.sitelinks then return end for k, v in pairs(entity.sitelinks) do local m = string.match( k, '(%l+)wikisource') if m then return 's:'..m..':'..entity:getSitelink(k) end end end local function getProgressLevel(qid, ws) -- devuelve tanto el ícono como el indicador, para el uso que se le de return {icon = Wikidata.badge{qid=qid, ws=ws}, indicator = Wikidata.badge{qid=qid, ws=ws, indicator=true} } end local function getPropIds( id, prop ) -- formatting: raw trae sólo QIDS return fetchFromWikidata( id, prop, { formatting = 'raw', tabla = true } ) end local function getPropLabels( id, prop ) return fetchFromWikidata( id, prop, { formatting = 'label', tabla = true } ) end local function getPropTable( id, prop ) return fetchFromWikidata( id, prop, { tabla = true } ) end local function getStringProp( id, prop ) -- directo, para cadenas return fetchFromWikidata( id, prop, {list = false} ) end local function getYearProp( id, prop ) local dateStr = fetchFromWikidata( id, prop ) if dateStr then local year = string.match(dateStr, "%d%d%d%d") return year or dateStr end end local function getCreatorList( id, prop ) local creators = {} local strings_table = getPropTable( id, prop) or {} local ids_table = getPropIds(id, prop) or {} for i, v in ipairs(ids_table) do v = v:match('Q%d+') and v or nil table.insert(creators, { id = v, text = strings_table[i], wsPage = getLocalSiteLink(v), label = mw.wikibase.getLabel(v) or strings_table[i] }) end if prop == p.local_map.mainAuthor.p then -- P2093 = cadena de autor local string_authors = fetchFromWikidata( id, 'P2093', { tabla = true } ) if string_authors then for _, name in ipairs( string_authors ) do table.insert( creators, {text = name, label = name} ) end end end return #creators > 0 and creators or nil end local function getEditionList( id, prop ) local editions = getPropIds( id, prop ) if not editions then return end local list = {} for _, v in pairs( editions ) do local edition = p.newWork( v ) table.insert( list, edition ) end return list end --[=[ Get the 'type' of the work Options are: edition, articles (as in journal articles), or works ]=] local function getWorkType( id ) local isVals = getPropIds( id, p.local_map.isA.p ) if valueIn( isVals, ENTITIES.edition ) then return p.TYPES.EDITION elseif valueIn( isVals, ENTITIES.scholarlyArticle ) then return p.TYPES.ARTICLE elseif valueIn( isVals, ENTITIES.movie ) then return p.TYPES.MOVIE elseif valueIn( isVals, ENTITIES.literaryWork ) then return p.TYPES.WORK end return p.TYPES.OTHER end --[=[ The main entry point (Modificado para aceptar fuentes de Wikisource) ]=] function p.newWork( titleOrQid, header_args, index_args ) local obj = {} -- Asegurar que las fuentes locales existan como tablas vacías si no se pasan header_args = header_args or {} index_args = index_args or {} local item = getEntity( titleOrQid ) if not item then -- error( 'Failed to look up item: ' .. titleOrQid ) -- obras no conectadas a Wikidata... categoría?? item = {} end local index if type(titleOrQid) == 'string' and (string.find( titleOrQid, '%.pdf' ) or string.find( titleOrQid, '%.djvu' )) then index = titleOrQid end local m_qid = index_args['Wikidata'] or header_args['index_wikidata'] local qid = item.id local qid_fallback = (m_qid and m_qid ~= "" and m_qid) or qid -- Almacén interno de datos y estado de carga local data = { item = item, index = index, qid = qid, m_qid = m_qid } return setmetatable( obj, { __eq = item.equals, __lt = item.__lt, __tostring = function ( _ ) return item.prefixedText end, __index = function ( _, k ) -- Caché interna if data[k] ~= nil then return data[k] end -- Resolver propiedades sin P if k == 'type' then data.type = getWorkType( qid ) return data.type end if k == 'wsPage' then data.wsPage = getLocalSiteLink( qid ) return data.wsPage end if k == 'progress' then local progress = header_args[p.local_map.progress.header] or index_args[p.local_map.progress.index] data.progress = getProgressLevel(qid, progress) return data.progress end -- Campos modificables (en el índice o encabezado) local mapping = p.local_map[k] if mapping then -- Prioridades en orden: local P = mapping.p local val_header = header_args[mapping.header] -- Comportamiento especial para el título y autor (sección, sección-autor) -- Si se pide título (por defecto, sección) y no hay: if not val_header or val_header == "" then if k == 'title' then val_header = header_args[p.local_map.mainTitle.header] elseif k == 'author' then val_header = header_args[p.local_map.mainAuthor.header] end end -- Prioridad 4: Campos ingresados manualmente en {{Encabezado}} if val_header and val_header ~= "" then data[k] = val_header return data[k] end -- Prioridad 3: Wikidata de la Sección/Capítulo -- Solo buscamos aquí si el qid de la sección difiere del qid de la madre (Índice) if qid ~= qid_fallback then local val_wd = nil if k == 'title' then val_wd = getStringProp( qid, P ) elseif k == 'author' then val_wd = getCreatorList( qid, P ) -- El resto de las propiedades menores se pueden interceptar aquí redundantemente si es necesario end if val_wd then data[k] = val_wd return data[k] end end -- Prioridad 2: Campos ingresados manualmente en el Índice (Espacio de nombres Índice) local val_index = index_args[mapping.index] if val_index and val_index ~= "" then data[k] = val_index return data[k] end -- Prioridad 1: Wikidata de la Edición Madre -- Fuentes más locales no tenían el dato. if k == 'title' or k == 'subtitle' or k == 'mainTitle' then data[k] = getStringProp( qid_fallback, P ) return data[k] end if k == 'language' or k == 'place' then data[k] = getPropLabels( qid_fallback, P ) return data[k] end if k == 'series' or k == 'publisher' or k == 'printer' then data[k] = getPropTable( qid_fallback, P ) return data[k] end if k == 'pubYear' then local theDate if data.type == p.TYPES.WORK then theDate = getYearProp( qid_fallback, p.local_map.inception.p ) end if not theDate then theDate = getYearProp( qid_fallback, p.local_map.pubYear.p ) end data[k] = theDate return data[k] end if k == 'author' or k == 'illustrator' or k == 'editor' or k == 'mainAuthor' or k == 'translator' or k == 'introducer' then data[k] = getCreatorList( qid_fallback, P ) return data[k] end if k == 'parentWork' or k == 'editions' or k == 'derivedWorks' or k == 'basedOn' then data[k] = getEditionList(qid_fallback, P) return data[k] end if k == 'commonsFile' then if data.index == nil then data[k] = getPropLabels( qid_fallback, P ) else data[k] = {data.index} end return data[k] end end return nil end, __newindex = function ( _, k, _ ) error( "index '" .. k .. "' is read only", 2 ) end } ) end return p 2t7sujbsn20frwbydxwkny8x35b0p42 1664852 1664851 2026-06-17T22:32:01Z Ignacio Rodríguez 3603 label desconocido 1664852 Scribunto text/plain --[=[ Importado de la Wikisource inglesa en esta versión: https://en.wikisource.org/w/index.php?title=Module:Work&oldid=12000562 Se trata de un módulo que genera un objeto (una tabla) cuyos elementos o propiedades son las propiedades de una edición/obra ]=] require('strict') local p = {} -- Module constants p.TYPES = { EDITION = 'edición', WORK = 'obra literaria', ARTICLE = 'artículo', --scholarly articles, MOVIE = 'obra audiovisual', OTHER = 'obra' } p.local_map = { isA = { p = 'P31' }, language = { p = 'P407' }, title = { header = 'sección', index = 'Titulo', p = 'P1476' }, -- título obra hija/único mainTitle = { header = 'titulo', p = 'P1476' }, -- título obra madre subtitle = { header = 'sub-titulo', index = 'Subtitulo', p = 'P1680' }, series = { index = 'Serie', p = 'P361' }, author = { header = 'sección autor',index = 'Autor', p = 'P50' }, -- autor obra hija/único mainAuthor = { header = 'autor', p = 'P50' }, -- autor obra madre translator = { header = 'traductor', index = 'Traductor', p = 'P655' }, editor = { header = 'editor', index = 'Editor', p = 'P98' }, illustrator = { header = 'ilustrador', index = 'Ilustrador', p = 'P110' }, introducer = { header = 'prologuista', index = 'Prologuista', p = 'P2679' }, pubYear = { header = 'ano', index = 'Ano', p = 'P577' }, inception = { p = 'P571' }, publisher = { header = 'editorial', index = 'Editorial', p = 'P123' }, printer = { header = 'imprenta', index = 'Imprenta', p = 'P123' }, place = { header = 'lugar', index = 'Lugar', p = 'P291' }, country = { header = 'derechos', index = 'derechos' }, volume = { header = 'volumen', index = 'Volumen', p = 'P478' }, issue = { p = 'P433' }, pages = { p = 'P304' }, parentWork = { header = 'publicadoen', p = 'P1433' }, editionof = { header = 'obra', index = 'Obra', p = 'P629' }, commonsFile = { p = 'P996' }, editions = { p = 'P747' }, derivedWorks = { p = 'P4969' }, basedOn = { p = 'P144' }, progress = { header = 'progreso', index = 'Progreso' } } local Wikidata = require('Módulo:Wikidata') -- Función de salida hacia el Módulo:Wikidata local function fetchFromWikidata( entityId, propertyId, options ) if not entityId or not propertyId then return nil end options = options or {} local queryArgs = { item = entityId, property = propertyId, } for k, v in pairs(options) do queryArgs[k] = v end local result = Wikidata.claim(queryArgs) if result and result ~= "" then return result end return nil end local ENTITIES = { human = 'Q5', edition = 'Q3331189', scholarlyArticle = 'Q13442814', literaryWork = 'Q7725634', movie = {'Q11424', -- película 'Q202866', --película animada 'Q506240', --telefilme 'Q18011171', --película inacabada 'Q5398426', --serie de televisión }, } --[=[ Util function: return true if the item is in the given table ]=] local function valueIn( t, v ) if type(v) == 'string' then for _, tv in pairs( t ) do if tv == v then return true end end elseif type(v) == 'table' then for _, vv in ipairs( v ) do for _, tv in ipairs( t ) do if tv == vv then return true end end end end return false end --[=[ Get the entity for a QID, or a page title ]=] local function getEntity( titleOrQid ) local item if type(titleOrQid) == 'table' then -- this is already Wikibase item data item = titleOrQid elseif string.match( titleOrQid, 'Q%d+', 1 ) then -- it's a QID item = mw.wikibase.getEntity( titleOrQid ) elseif string.find( titleOrQid, '%.pdf' ) or string.find( titleOrQid, '%.djvu' ) then -- es un índice! local index = mw.ext.proofreadPage.newIndex( titleOrQid ) local Qid = index.fields.Wikidata item = mw.wikibase.getEntity( Qid ) else -- assume it's a page title -- TODO only return the ID and look it up (expensive) only if actually used item = mw.wikibase.getEntity( mw.wikibase.getEntityIdForTitle( titleOrQid ) ) end return item end local function getLocalSiteLink( id ) if not id or type(id) ~= 'string' or not id:match('Q%d+') then return end local sl = mw.wikibase.getSitelink(id) if sl then return sl end local entity = mw.wikibase.getEntity(id) if not entity.sitelinks then return end for k, v in pairs(entity.sitelinks) do local m = string.match( k, '(%l+)wikisource') if m then return 's:'..m..':'..entity:getSitelink(k) end end end local function getProgressLevel(qid, ws) -- devuelve tanto el ícono como el indicador, para el uso que se le de return {icon = Wikidata.badge{qid=qid, ws=ws}, indicator = Wikidata.badge{qid=qid, ws=ws, indicator=true} } end local function getPropIds( id, prop ) -- formatting: raw trae sólo QIDS return fetchFromWikidata( id, prop, { formatting = 'raw', tabla = true } ) end local function getPropLabels( id, prop ) return fetchFromWikidata( id, prop, { formatting = 'label', tabla = true } ) end local function getPropTable( id, prop ) return fetchFromWikidata( id, prop, { tabla = true } ) end local function getStringProp( id, prop ) -- directo, para cadenas return fetchFromWikidata( id, prop, {list = false} ) end local function getYearProp( id, prop ) local dateStr = fetchFromWikidata( id, prop ) if dateStr then local year = string.match(dateStr, "%d%d%d%d") return year or dateStr end end local function getCreatorList( id, prop ) local creators = {} local strings_table = getPropTable( id, prop) or {} local ids_table = getPropIds(id, prop) or {} for i, v in ipairs(ids_table) do v = v:match('Q%d+') and v or nil table.insert(creators, { id = v, text = strings_table[i], wsPage = getLocalSiteLink(v), label = (v and mw.wikibase.getLabel(v)) or strings_table[i] }) end if prop == p.local_map.mainAuthor.p then -- P2093 = cadena de autor local string_authors = fetchFromWikidata( id, 'P2093', { tabla = true } ) if string_authors then for _, name in ipairs( string_authors ) do table.insert( creators, {text = name, label = name} ) end end end return #creators > 0 and creators or nil end local function getEditionList( id, prop ) local editions = getPropIds( id, prop ) if not editions then return end local list = {} for _, v in pairs( editions ) do local edition = p.newWork( v ) table.insert( list, edition ) end return list end --[=[ Get the 'type' of the work Options are: edition, articles (as in journal articles), or works ]=] local function getWorkType( id ) local isVals = getPropIds( id, p.local_map.isA.p ) if valueIn( isVals, ENTITIES.edition ) then return p.TYPES.EDITION elseif valueIn( isVals, ENTITIES.scholarlyArticle ) then return p.TYPES.ARTICLE elseif valueIn( isVals, ENTITIES.movie ) then return p.TYPES.MOVIE elseif valueIn( isVals, ENTITIES.literaryWork ) then return p.TYPES.WORK end return p.TYPES.OTHER end --[=[ The main entry point (Modificado para aceptar fuentes de Wikisource) ]=] function p.newWork( titleOrQid, header_args, index_args ) local obj = {} -- Asegurar que las fuentes locales existan como tablas vacías si no se pasan header_args = header_args or {} index_args = index_args or {} local item = getEntity( titleOrQid ) if not item then -- error( 'Failed to look up item: ' .. titleOrQid ) -- obras no conectadas a Wikidata... categoría?? item = {} end local index if type(titleOrQid) == 'string' and (string.find( titleOrQid, '%.pdf' ) or string.find( titleOrQid, '%.djvu' )) then index = titleOrQid end local m_qid = index_args['Wikidata'] or header_args['index_wikidata'] local qid = item.id local qid_fallback = (m_qid and m_qid ~= "" and m_qid) or qid -- Almacén interno de datos y estado de carga local data = { item = item, index = index, qid = qid, m_qid = m_qid } return setmetatable( obj, { __eq = item.equals, __lt = item.__lt, __tostring = function ( _ ) return item.prefixedText end, __index = function ( _, k ) -- Caché interna if data[k] ~= nil then return data[k] end -- Resolver propiedades sin P if k == 'type' then data.type = getWorkType( qid ) return data.type end if k == 'wsPage' then data.wsPage = getLocalSiteLink( qid ) return data.wsPage end if k == 'progress' then local progress = header_args[p.local_map.progress.header] or index_args[p.local_map.progress.index] data.progress = getProgressLevel(qid, progress) return data.progress end -- Campos modificables (en el índice o encabezado) local mapping = p.local_map[k] if mapping then -- Prioridades en orden: local P = mapping.p local val_header = header_args[mapping.header] -- Comportamiento especial para el título y autor (sección, sección-autor) -- Si se pide título (por defecto, sección) y no hay: if not val_header or val_header == "" then if k == 'title' then val_header = header_args[p.local_map.mainTitle.header] elseif k == 'author' then val_header = header_args[p.local_map.mainAuthor.header] end end -- Prioridad 4: Campos ingresados manualmente en {{Encabezado}} if val_header and val_header ~= "" then data[k] = val_header return data[k] end -- Prioridad 3: Wikidata de la Sección/Capítulo -- Solo buscamos aquí si el qid de la sección difiere del qid de la madre (Índice) if qid ~= qid_fallback then local val_wd = nil if k == 'title' then val_wd = getStringProp( qid, P ) elseif k == 'author' then val_wd = getCreatorList( qid, P ) -- El resto de las propiedades menores se pueden interceptar aquí redundantemente si es necesario end if val_wd then data[k] = val_wd return data[k] end end -- Prioridad 2: Campos ingresados manualmente en el Índice (Espacio de nombres Índice) local val_index = index_args[mapping.index] if val_index and val_index ~= "" then data[k] = val_index return data[k] end -- Prioridad 1: Wikidata de la Edición Madre -- Fuentes más locales no tenían el dato. if k == 'title' or k == 'subtitle' or k == 'mainTitle' then data[k] = getStringProp( qid_fallback, P ) return data[k] end if k == 'language' or k == 'place' then data[k] = getPropLabels( qid_fallback, P ) return data[k] end if k == 'series' or k == 'publisher' or k == 'printer' then data[k] = getPropTable( qid_fallback, P ) return data[k] end if k == 'pubYear' then local theDate if data.type == p.TYPES.WORK then theDate = getYearProp( qid_fallback, p.local_map.inception.p ) end if not theDate then theDate = getYearProp( qid_fallback, p.local_map.pubYear.p ) end data[k] = theDate return data[k] end if k == 'author' or k == 'illustrator' or k == 'editor' or k == 'mainAuthor' or k == 'translator' or k == 'introducer' then data[k] = getCreatorList( qid_fallback, P ) return data[k] end if k == 'parentWork' or k == 'editions' or k == 'derivedWorks' or k == 'basedOn' then data[k] = getEditionList(qid_fallback, P) return data[k] end if k == 'commonsFile' then if data.index == nil then data[k] = getPropLabels( qid_fallback, P ) else data[k] = {data.index} end return data[k] end end return nil end, __newindex = function ( _, k, _ ) error( "index '" .. k .. "' is read only", 2 ) end } ) end return p fn548vuebl95vooqdmbnyvp19wejdt9 828 352583 1664850 1651216 2026-06-17T22:23:00Z Ignacio Rodríguez 3603 nueva versión (algunas plantillas podrían fallar temporalmente) 1664850 Scribunto text/plain --[=[ Experimental, tomado desde https://en.wikisource.org/w/index.php?title=Template:Work_link&oldid=11502860 ]=] local p = {} local getArgs = require( 'Módulo:Arguments' ).getArgs local transdic = { title = 'wsPage', display = 'title', year = 'pubYear', authors = 'author', editors = 'editor', translators = 'translator', illustrators = 'illustrator', introducers = 'introducer', commonsFile = 'commonsFile', parentWork = 'parentWork', QID = 'qid' } -- bibliographic data from WD local Work = require( 'Módulo:Obra' ) -- formatting of {{book links}} local BookLink = require( 'Módulo:Enlace libro' ) local function valueIn( t, v ) for _, tv in pairs( t ) do if tv == v then return true end end return false end function p.objectToLink(workObject, suptable) suptable = suptable or {} if workObject == nil then local cat = "[" .. "[Categoría:Enlaces a obras sin elemento en Wikidata]]" return "<span class='error'>No se pudo cargar el elemento de Wikidata.</span>" .. cat end if workObject.type == Work.TYPES.EDITION then -- edition -> FRBR edition -- Translate "pure" Work data into the arguments to a BookLink local args = { classes = { 'wst-worklink-frbr-edition' }, item = workObject.item } -- evitar cargar parámetros que después no se mostrarán para bajar la carga de memoria for k, v in pairs(transdic) do if valueIn(suptable, k) then args[k] = nil else args[k] = workObject[v] end end local res = BookLink.renderLink(args) :attr( 'data-wikidata-id', workObject.item.id ) return tostring(res) elseif workObject.type == Work.TYPES.ARTICLE then return 'article' -- some kind of paper or article else -- we just assume this is some kind of generic work -- edition -> FRBR work -- Translate "pure" Work data into the arguments to a BookLink local args = { classes = { 'wst-worklink-frbr-work' }, QID = workObject.item.id, item = workObject.item } -- evitar cargar parámetros que después no se mostrarán para bajar la carga de memoria for k, v in pairs(transdic) do if not valueIn(suptable, k) then args[k] = workObject[v] end end local res = BookLink.renderLink(args) :attr( 'data-wikidata-id', workObject.item.id ) return tostring(res).. "<span style='color:red' title='Enlace a edición no FRBR'>*</span>[" .. "[Categoría:Enlaces a edición no FRBR]]" end end function p.link(frame) local args = getArgs(frame) local suptable = args.ignorar or '' suptable = mw.text.split( suptable, ',%s*') local qidOrTitle = args[1] local workObject = Work.newWork( qidOrTitle ) return p.objectToLink(workObject, suptable) end return p h5e7ugle3599umk786n73x40cuw7thi 1664857 1664850 2026-06-18T00:14:19Z Ignacio Rodríguez 3603 no mostrar dos veces QID en obras parte de obras 1664857 Scribunto text/plain --[=[ Experimental, tomado desde https://en.wikisource.org/w/index.php?title=Template:Work_link&oldid=11502860 ]=] local p = {} local getArgs = require( 'Módulo:Arguments' ).getArgs local transdic = { title = 'wsPage', display = 'title', year = 'pubYear', authors = 'author', editors = 'editor', translators = 'translator', illustrators = 'illustrator', introducers = 'introducer', commonsFile = 'commonsFile', parentWork = 'parentWork', QID = 'qid' } -- bibliographic data from WD local Work = require( 'Módulo:Obra' ) -- formatting of {{book links}} local BookLink = require( 'Módulo:Enlace libro' ) local function valueIn( t, v ) for _, tv in pairs( t ) do if tv == v then return true end end return false end function p.objectToLink(workObject, suptable) suptable = suptable or {} if workObject == nil then local cat = "[" .. "[Categoría:Enlaces a obras sin elemento en Wikidata]]" return "<span class='error'>No se pudo cargar el elemento de Wikidata.</span>" .. cat end if workObject.type == Work.TYPES.EDITION then -- edition -> FRBR edition -- Translate "pure" Work data into the arguments to a BookLink local args = { classes = { 'wst-worklink-frbr-edition' }, item = workObject.item } -- evitar cargar parámetros que después no se mostrarán para bajar la carga de memoria for k, v in pairs(transdic) do if valueIn(suptable, k) then args[k] = nil else args[k] = workObject[v] end end local res = BookLink.renderLink(args) :attr( 'data-wikidata-id', workObject.item.id ) return tostring(res) elseif workObject.type == Work.TYPES.ARTICLE then return 'article' -- some kind of paper or article else -- we just assume this is some kind of generic work -- edition -> FRBR work -- Translate "pure" Work data into the arguments to a BookLink local args = { classes = { 'wst-worklink-frbr-work' }, item = workObject.item } -- evitar cargar parámetros que después no se mostrarán para bajar la carga de memoria for k, v in pairs(transdic) do if not valueIn(suptable, k) then args[k] = workObject[v] end end local res = BookLink.renderLink(args) :attr( 'data-wikidata-id', workObject.item.id ) return tostring(res).. "<span style='color:red' title='Enlace a edición no FRBR'>*</span>[" .. "[Categoría:Enlaces a edición no FRBR]]" end end function p.link(frame) local args = getArgs(frame) local suptable = args.ignorar or '' suptable = mw.text.split( suptable, ',%s*') local qidOrTitle = args[1] local workObject = Work.newWork( qidOrTitle ) return p.objectToLink(workObject, suptable) end return p omvxpm06qmt5ib8pthhgpf8jtm821jo 828 352584 1664849 1651217 2026-06-17T22:22:58Z Ignacio Rodríguez 3603 nueva versión (algunas plantillas podrían fallar temporalmente) 1664849 Scribunto text/plain --[=[ Module description ]=] local p = {} --p stands for package local getArgs = require('Module:Arguments').getArgs local function formatLink(target, display) if not target and not display then return '' end if not target then return display end if not display then display = target end return '[' .. '[' .. target .. '|' .. display .. ']]' end local function imageLink(target, display) if not display then display = target end return '[[File:OOjs_UI_icon_article-rtl.svg|15px|link='..target..'|alt=' .. display .. '|'..display..']]' end local function wikidataLink(qid) if not qid then return '' end return "[[File:Wikidata-logo.svg|20px|link=d:" .. qid .. "|"..qid.."]]" end --[=[ Construct a textual list of authors from a table of Creator objects Returns mw.html tag ]=] function p.renderAuthorLinks( authorList, class ) local links = {} for _, creator in pairs( authorList ) do local linkTarget local display = creator.label -- no WS sitelink? guess the link target and make a red link -- todo: category? if not creator.wsPage then if creator.id then linkTarget = 'd:Special:EntityPage/'..creator.id display = '<span style="color:#5f9cbb;">' .. display .. '</span>' else linkTarget = 'Autor:' .. creator.label end else linkTarget = creator.wsPage end local innerTag = mw.html.create( 'span' ) :addClass( 'wst-worklink-creator' ) :wikitext( formatLink( linkTarget, display ) ) -- omite enlaces al autor en la página propia del autor if mw.title.getCurrentTitle().fullText ~= linkTarget then table.insert( links, tostring( innerTag ) ) end end if #links > 0 then local outerTag = mw.html.create( 'span' ) :addClass( class ) :wikitext( mw.text.listToText( links ) ) return outerTag end return '' end local function indexLink(file, text) local index = mw.ext.proofreadPage.newIndex( file ) if not index.title.exists then if text == 'transcripción' then text = 'digitalización' end return ' '.. imageLink( 'Archivo:'..file, text) end local progreso = mw.text.trim(index.fields.Progreso or '') if progreso ~= '' then local badge = require('Módulo:Wikidata').badge{ws=progreso} return ' '.. imageLink( 'Índice:'..file, text) .. ' '..badge end return ' '.. imageLink( 'Índice:'..file, text) end -- Enlaces a proyectos de trasncripción local function renderFileLinks( fileList ) if #fileList == 1 then local file = fileList[1] return indexLink(file, 'transcripción') end local links = {} for n, file in pairs( fileList ) do local nlink = indexLink(file, 'número '..n) if nlink == '' then else local innerTag = mw.html.create( 'span' ) :wikitext( nlink ) table.insert( links, tostring( innerTag ) ) end end local outerTag = mw.html.create( 'span' ) :wikitext(' ') :wikitext( mw.text.listToText( links ) ) return outerTag end function p.renderLink(args) local out = mw.html.create( 'span' ) :addClass( 'wst-worklink' ) if args.classes then out:addClass( table.concat( args.classes, ' ' ) ) end if args.chapter or args.chapterDisplay then local chapterPageTitle = args.title .. '/' .. args.chapter local chapter = formatLink( chapterPageTitle, args.chapterDisplay or args.chapter ) out:tag( 'span' ) :addClass( 'wst-worklink-chapter' ) :wikitext( '"' .. chapter .. '"' ) out:wikitext(' en ') end local title if args.no_link then title = args.title or args.display else title = formatLink( args.title, args.display ) end if title == '' then title = (args.item:getLabel() or '')..'<span style="color:red" title="Sin título en Wikidata">*</span>' title = title .. '['..'[Categoría:Enlaces a obras sin título]]' end out:tag( 'span' ) :addClass( 'wst-worklink-title' ) :wikitext( title ) if args.parentWork then out:wikitext(', en ') out:tag('span') :addClass('wst-worklink-parentWork') :wikitext(require('Module:Enlace obra').objectToLink(args.parentWork[1], {'QID'})) return out:wikitext(' '..wikidataLink(args.QID)) end local comma = false if args.authors and #args.authors then local authorList = tostring(p.renderAuthorLinks( args.authors, 'wst-worklink-authors' )) if #authorList > 0 then out:wikitext( ' de ' .. authorList) comma = true end end if args.editors and #args.editors then if comma then out:wikitext( ',' ) end out:wikitext( ' ed. ' .. tostring( p.renderAuthorLinks( args.editors, 'wst-worklink-editors' ) ) ) comma = true end if args.translators and #args.translators then if comma then out:wikitext( ',' ) end out:wikitext( ' tr. ' .. tostring( p.renderAuthorLinks( args.translators, 'wst-worklink-translators' ) ) ) comma = true end if args.illustrators and #args.illustrators then if comma then out:wikitext( ',' ) end out:wikitext( ' ilus. ' .. tostring( p.renderAuthorLinks( args.illustrators, 'wst-worklink-illustrators' ) ) ) comma = true end if args.introducers and #args.introducers then if comma then out:wikitext( ',' ) end out:wikitext( ' pról. ' .. tostring( p.renderAuthorLinks( args.introducers, 'wst-worklink-introducers' ) ) ) end if args.year then out:wikitext( ' (' ) out:tag( 'span' ) :addClass( 'wst-worklink-date' ) :wikitext( args.year ) out:wikitext( ')' ) end if args.commonsFile and #args.commonsFile then out:wikitext( '<small>' .. tostring( renderFileLinks(args.commonsFile)) .. '</small>') end if args.QID and args.QID ~= '' then out:wikitext(' '..wikidataLink(args.QID)) end return out end --[=[ Combine all arguments with a given prefix into a table of author links ]=] local function combineAuthors(args, prefix) local l = {} local i = 1 while true do local argname = prefix local dispargname = prefix .. "_display" if i > 1 then argname = argname .. i dispargname = dispargname .. i end -- ran out of arguments if not args[argname] then break end local target = args[argname] if string.find( target, 'Portal:', 1, true ) ~= 1 then target = 'Autor:' .. target end local display = args[dispargname] or args[argname] -- strip namespaces display = display:gsub( '^%w-:', '' ) table.insert( l, { link = target, label = display } ) i = i + 1 end return l end --[=[ Function docs ]=] function p.book_link(frame) local args = getArgs(frame) if args.author then args.authors = combineAuthors(args, 'author') end return tostring(p.renderLink(args)) end return p lcf9im7gdcyqyyqsfp1mejbkegxg9y9 1664853 1664849 2026-06-17T22:33:56Z Ignacio Rodríguez 3603 anónimo 1664853 Scribunto text/plain --[=[ Module description ]=] local p = {} --p stands for package local getArgs = require('Module:Arguments').getArgs local function formatLink(target, display) if not target and not display then return '' end if not target then return display end if not display then display = target end return '[' .. '[' .. target .. '|' .. display .. ']]' end local function imageLink(target, display) if not display then display = target end return '[[File:OOjs_UI_icon_article-rtl.svg|15px|link='..target..'|alt=' .. display .. '|'..display..']]' end local function wikidataLink(qid) if not qid then return '' end return "[[File:Wikidata-logo.svg|20px|link=d:" .. qid .. "|"..qid.."]]" end --[=[ Construct a textual list of authors from a table of Creator objects Returns mw.html tag ]=] function p.renderAuthorLinks( authorList, class ) local links = {} for _, creator in pairs( authorList ) do local linkTarget local display = creator.label if display == 'valor desconocido' then display = 'Anónimo' creator.wsPage = 'Portal:Anónimo' end -- no WS sitelink? guess the link target and make a red link -- todo: category? if not creator.wsPage then if creator.id then linkTarget = 'd:Special:EntityPage/'..creator.id display = '<span style="color:#5f9cbb;">' .. display .. '</span>' else linkTarget = 'Autor:' .. creator.label end else linkTarget = creator.wsPage end local innerTag = mw.html.create( 'span' ) :addClass( 'wst-worklink-creator' ) :wikitext( formatLink( linkTarget, display ) ) -- omite enlaces al autor en la página propia del autor if mw.title.getCurrentTitle().fullText ~= linkTarget then table.insert( links, tostring( innerTag ) ) end end if #links > 0 then local outerTag = mw.html.create( 'span' ) :addClass( class ) :wikitext( mw.text.listToText( links ) ) return outerTag end return '' end local function indexLink(file, text) local index = mw.ext.proofreadPage.newIndex( file ) if not index.title.exists then if text == 'transcripción' then text = 'digitalización' end return ' '.. imageLink( 'Archivo:'..file, text) end local progreso = mw.text.trim(index.fields.Progreso or '') if progreso ~= '' then local badge = require('Módulo:Wikidata').badge{ws=progreso} return ' '.. imageLink( 'Índice:'..file, text) .. ' '..badge end return ' '.. imageLink( 'Índice:'..file, text) end -- Enlaces a proyectos de trasncripción local function renderFileLinks( fileList ) if #fileList == 1 then local file = fileList[1] return indexLink(file, 'transcripción') end local links = {} for n, file in pairs( fileList ) do local nlink = indexLink(file, 'número '..n) if nlink == '' then else local innerTag = mw.html.create( 'span' ) :wikitext( nlink ) table.insert( links, tostring( innerTag ) ) end end local outerTag = mw.html.create( 'span' ) :wikitext(' ') :wikitext( mw.text.listToText( links ) ) return outerTag end function p.renderLink(args) local out = mw.html.create( 'span' ) :addClass( 'wst-worklink' ) if args.classes then out:addClass( table.concat( args.classes, ' ' ) ) end if args.chapter or args.chapterDisplay then local chapterPageTitle = args.title .. '/' .. args.chapter local chapter = formatLink( chapterPageTitle, args.chapterDisplay or args.chapter ) out:tag( 'span' ) :addClass( 'wst-worklink-chapter' ) :wikitext( '"' .. chapter .. '"' ) out:wikitext(' en ') end local title if args.no_link then title = args.title or args.display else title = formatLink( args.title, args.display ) end if title == '' then title = (args.item:getLabel() or '')..'<span style="color:red" title="Sin título en Wikidata">*</span>' title = title .. '['..'[Categoría:Enlaces a obras sin título]]' end out:tag( 'span' ) :addClass( 'wst-worklink-title' ) :wikitext( title ) if args.parentWork then out:wikitext(', en ') out:tag('span') :addClass('wst-worklink-parentWork') :wikitext(require('Module:Enlace obra').objectToLink(args.parentWork[1], {'QID'})) return out:wikitext(' '..wikidataLink(args.QID)) end local comma = false if args.authors and #args.authors then local authorList = tostring(p.renderAuthorLinks( args.authors, 'wst-worklink-authors' )) if #authorList > 0 then out:wikitext( ' de ' .. authorList) comma = true end end if args.editors and #args.editors then if comma then out:wikitext( ',' ) end out:wikitext( ' ed. ' .. tostring( p.renderAuthorLinks( args.editors, 'wst-worklink-editors' ) ) ) comma = true end if args.translators and #args.translators then if comma then out:wikitext( ',' ) end out:wikitext( ' tr. ' .. tostring( p.renderAuthorLinks( args.translators, 'wst-worklink-translators' ) ) ) comma = true end if args.illustrators and #args.illustrators then if comma then out:wikitext( ',' ) end out:wikitext( ' ilus. ' .. tostring( p.renderAuthorLinks( args.illustrators, 'wst-worklink-illustrators' ) ) ) comma = true end if args.introducers and #args.introducers then if comma then out:wikitext( ',' ) end out:wikitext( ' pról. ' .. tostring( p.renderAuthorLinks( args.introducers, 'wst-worklink-introducers' ) ) ) end if args.year then out:wikitext( ' (' ) out:tag( 'span' ) :addClass( 'wst-worklink-date' ) :wikitext( args.year ) out:wikitext( ')' ) end if args.commonsFile and #args.commonsFile then out:wikitext( '<small>' .. tostring( renderFileLinks(args.commonsFile)) .. '</small>') end if args.QID and args.QID ~= '' then out:wikitext(' '..wikidataLink(args.QID)) end return out end --[=[ Combine all arguments with a given prefix into a table of author links ]=] local function combineAuthors(args, prefix) local l = {} local i = 1 while true do local argname = prefix local dispargname = prefix .. "_display" if i > 1 then argname = argname .. i dispargname = dispargname .. i end -- ran out of arguments if not args[argname] then break end local target = args[argname] if string.find( target, 'Portal:', 1, true ) ~= 1 then target = 'Autor:' .. target end local display = args[dispargname] or args[argname] -- strip namespaces display = display:gsub( '^%w-:', '' ) table.insert( l, { link = target, label = display } ) i = i + 1 end return l end --[=[ Function docs ]=] function p.book_link(frame) local args = getArgs(frame) if args.author then args.authors = combineAuthors(args, 'author') end return tostring(p.renderLink(args)) end return p asqexutyz6na7bhngzhw955csewlkf5 828 358608 1664847 1653828 2026-06-17T22:22:53Z Ignacio Rodríguez 3603 nueva versión (algunas plantillas podrían fallar temporalmente) 1664847 Scribunto text/plain --[[ Genera galerías a partir de una lista de Índices ]] require('strict') local p = {} local getArgs = require('Módulo:Arguments').getArgs local Obra = require('Módulo:Obra') local roleString = function(Role) if type(Role) == 'string' then return Role end local list = {} for i, creator in ipairs(Role) do if creator.text == 'valor desconocido' then creator.text = '[[Portal:Anónimo|Anónimo]]' end list[i] = creator.text end return mw.text.listToText(list, ', ', ' y ') end local titleString = function(title, wsPage) -- ya formateado con enlace if type(title) == 'string' and string.find( title, '%[%[' ) and string.find( title, '%]%]' ) then return title end if wsPage and wsPage ~= "" then return "[[" .. wsPage .. "|" .. title .. "]]" end return "[["..title.."]]" end function p.galeria(frame) local args = getArgs(frame) local content = {} if args[1] == nil then return '' end for file in mw.text.gsplit(args[1], '\n') do if file =='' then -- pass else if mw.ustring.match(file, 'Índice:') then file = mw.ustring.sub(file, 8) end local index = mw.ext.proofreadPage.newIndex( file ) if not index.title.exists then -- pass else local fields = index.fields local work = Obra.newWork(file, nil, fields) -- fields = loadWikidata(fields, work) local archivo = 'Archivo:' .. file local page = fields.Imagen local titulo = work.title local wsPage = work.wsPage local title = titleString(titulo, wsPage) local anyo = work.pubYear local roles = '' local coma = false for i, role in ipairs{'author', 'translator', 'illustrator', 'introducer'} do local Role = work[role] if Role and Role ~= '' then Role = roleString(Role) if coma then roles = roles..', <br>' end coma = true if role == 'author' then roles = roles..'por ' .. Role elseif role == 'translator' then roles = roles..'traducido por ' .. Role elseif role == 'illustrator' then roles = roles..'ilustrado por ' .. Role elseif role == 'introducer' then roles = roles..'prólogo por ' .. Role end end end local str = archivo .. '|page='..page..'|link=Índice:'..file..'|' str = str .. "'''"..title.."''' (".. anyo..")" if roles ~= '' then str = str.."<br/> <span style=\"font-size: 83%;\">" str = str..roles str = str..'</span>' end -- TODO: parámetro para no mostrar links de descarga local dlink = frame:expandTemplate{ title = 'descarga2', args={titulo} } str= str..'<br/>'..dlink table.insert(content, str) end end end local all = table.concat(content, '\n') local tag = frame:extensionTag( 'gallery', all, { heights = 200, widths = 200, mode="packed" } ) return tag end return p hbtv9ruv19dptwwil7fg68uzermqwa5 828 365161 1664878 1502902 2026-06-18T01:30:15Z Ignacio Rodríguez 3603 1664878 Scribunto text/plain local p = {} local Args = require('Módulo:Arguments') function p.box( frame, content ) local html = mw.html.create() local argus = Args.getArgs(frame) content = content or {} local divgrande = html:tag('div'):addClass('noprint ws-noexport main-div'):cssText('text-align: center;padding: 1em; background:#F4F0E5; border-top: 1px solid #A0A0A0;border-bottom: 1px solid #A0A0A0;margin: 10px auto;display:grid;grid-template-columns: 1fr 10fr 1fr;') -- div principal que contiene al resto local anterior = divgrande:tag('div'):attr('id','headerprevious'):cssText('grid-column: 1; grid-row: 1/3; align-self: center;') if content.anterior and content.anterior ~= '' then local anteriorspan = anterior:tag('span'):addClass('prev-span'):cssText('float: left; display: block; font-size:smaller') anteriorspan:tag('span'):addClass('prev-span-arrow'):cssText('margin-right: 0.5em; position: relative; top: 1.5px'):wikitext('← ') anteriorspan:wikitext(content.anterior) if content.nolinks then anteriorspan:cssText('display:none') end end local medio = divgrande:tag('div'):addClass('middle-div'):cssText('grid-column: 2; vertical-align:middle;') medio:wikitext(content.principal) local proximo = divgrande:tag('div'):attr('id','headernext'):cssText('grid-column: 3; grid-row: 1/3; align-self: center;') if content.siguiente and content.siguiente ~= '' then local proximospan = proximo:tag('span'):addClass('next-span'):cssText('float: right; display: block;font-size:smaller') :wikitext(' '..content.siguiente) proximospan:tag('span'):addClass('next-span-arrow'):cssText('margin-left: 0.5em; position: relative; top: 1.5px'):wikitext(' →') if content.nolinks then proximospan:cssText('display:none') end end if content.enlaces then local inferior = medio:tag('div'):addClass('plainlinks lower-div'):cssText('clear: both; padding: 0.5em; text-align: center; margin:0 auto; font-size: 80%') inferior:wikitext(content.enlaces) end if content.notas then html:tag('div'):addClass('notes'):cssText('font-size:90%;width:95%;margin:auto'):wikitext("'''Nota:''' "..content.notas):tag('hr') end return tostring(html) end function p.testBox(frame) return p.box(frame, { principal = 'A', anterior = 'anterior', siguiente = 'siguiente', enlaces = 'enlaces', notas = 'notas', }) .. p.box(frame, {principal = 'A', nolinks = true, anterior = 'oculto'}) end return p fk1r2p5qcm2ldojsvzvw4li868tn0rr 0 388178 1664854 1562533 2026-06-18T00:09:26Z Ignacio Rodríguez 3603 1664854 wikitext text/x-wiki {{ediciones}} * ''[[Fábulas de Esopo, filósofo moral, y de otros famosos autores/La mosca|La mosca]]'', en {{eo|Fábulas de Esopo, filósofo moral, y de otros famosos autores - bdh0000084751.pdf}} [[Categoría:Fábulas de Esopo]] 6gi0zffks7m07fuvra4mr2oaacroe44 0 388179 1664855 1562587 2026-06-18T00:10:19Z Ignacio Rodríguez 3603 1664855 wikitext text/x-wiki {{ediciones}} {{lista de ediciones}} [[Categoría:Fábulas de Esopo]] 6zcvssn8d2vht3v3xpg8zi1j66cdozs 0 388183 1664856 1562591 2026-06-18T00:10:37Z Ignacio Rodríguez 3603 1664856 wikitext text/x-wiki {{ediciones}} {{lista de ediciones}} [[Categoría:Fábulas de Esopo]] 6zcvssn8d2vht3v3xpg8zi1j66cdozs 0 388190 1664858 1562614 2026-06-18T00:14:41Z Ignacio Rodríguez 3603 1664858 wikitext text/x-wiki {{ediciones}} {{lista de ediciones}} [[Categoría:Fábulas de Esopo]] 6zcvssn8d2vht3v3xpg8zi1j66cdozs 0 388193 1664859 1562599 2026-06-18T00:15:46Z Ignacio Rodríguez 3603 1664859 wikitext text/x-wiki {{ediciones}} {{lista de ediciones}} [[Categoría:Fábulas de Esopo]] 6zcvssn8d2vht3v3xpg8zi1j66cdozs 0 388194 1664861 1562601 2026-06-18T00:16:32Z Ignacio Rodríguez 3603 1664861 wikitext text/x-wiki {{ediciones}} {{lista de ediciones}} [[Categoría:Fábulas de Esopo]] 6zcvssn8d2vht3v3xpg8zi1j66cdozs 0 388195 1664860 1562604 2026-06-18T00:16:10Z Ignacio Rodríguez 3603 1664860 wikitext text/x-wiki {{ediciones}} {{lista de ediciones}} [[Categoría:Fábulas de Esopo]] 7la532reyxwbsxyneymncffw4ahu2cl 0 388197 1664863 1563039 2026-06-18T00:19:34Z Ignacio Rodríguez 3603 1664863 wikitext text/x-wiki {{ediciones}} {{lista de ediciones}} [[Categoría:Fábulas de Esopo]] 6zcvssn8d2vht3v3xpg8zi1j66cdozs 0 388198 1664864 1562044 2026-06-18T00:20:07Z Ignacio Rodríguez 3603 1664864 wikitext text/x-wiki {{ediciones}} {{lista de ediciones}} [[Categoría:Fábulas de Esopo]] 6zcvssn8d2vht3v3xpg8zi1j66cdozs 0 388201 1664865 1562588 2026-06-18T00:20:18Z Ignacio Rodríguez 3603 1664865 wikitext text/x-wiki {{ediciones}} {{lista de ediciones}} [[Categoría:Fábulas de Esopo]] 6zcvssn8d2vht3v3xpg8zi1j66cdozs 0 388202 1664866 1562590 2026-06-18T00:23:06Z Ignacio Rodríguez 3603 1664866 wikitext text/x-wiki {{ediciones}} {{lista de ediciones}} [[Categoría:Fábulas de Esopo]] 6zcvssn8d2vht3v3xpg8zi1j66cdozs 1664867 1664866 2026-06-18T00:28:48Z Ignacio Rodríguez 3603 Ignacio Rodríguez trasladó la página [[El perro y el reflejo en el río]] a [[El perro y el trozo de carne]] 1664866 wikitext text/x-wiki {{ediciones}} {{lista de ediciones}} [[Categoría:Fábulas de Esopo]] 6zcvssn8d2vht3v3xpg8zi1j66cdozs 0 388204 1664869 1562640 2026-06-18T00:29:08Z Ignacio Rodríguez 3603 1664869 wikitext text/x-wiki {{ediciones}} {{lista de ediciones}} [[Categoría:Fábulas de Esopo]] 6zcvssn8d2vht3v3xpg8zi1j66cdozs 0 388206 1664870 1562641 2026-06-18T00:29:31Z Ignacio Rodríguez 3603 1664870 wikitext text/x-wiki {{ediciones}} {{lista de ediciones}} [[Categoría:Fábulas de Esopo]] 6zcvssn8d2vht3v3xpg8zi1j66cdozs 0 388208 1664871 1560333 2026-06-18T00:31:50Z Ignacio Rodríguez 3603 Se cambió el destino de la redirección de [[Androcles y el león (ed. desconocida)]] a [[El león y el pastor]] 1664871 wikitext text/x-wiki #REDIRECCIÓN [[El león y el pastor]] arjismrx9mwpu3r1e36jkuner54l2c7 0 388209 1664872 1562628 2026-06-18T00:32:38Z Ignacio Rodríguez 3603 1664872 wikitext text/x-wiki {{ediciones}} {{lista de ediciones}} [[Categoría:Fábulas de Esopo]] 6zcvssn8d2vht3v3xpg8zi1j66cdozs 0 388216 1664874 1562649 2026-06-18T00:35:53Z Ignacio Rodríguez 3603 1664874 wikitext text/x-wiki {{ediciones}} {{lista de ediciones}} [[Categoría:Fábulas de Esopo]] 6zcvssn8d2vht3v3xpg8zi1j66cdozs 0 388217 1664875 1562651 2026-06-18T00:36:12Z Ignacio Rodríguez 3603 1664875 wikitext text/x-wiki {{ediciones}} {{lista de ediciones}} [[Categoría:Fábulas de Esopo]] 6zcvssn8d2vht3v3xpg8zi1j66cdozs 0 389031 1664876 1562625 2026-06-18T00:55:22Z Ignacio Rodríguez 3603 1664876 wikitext text/x-wiki {{ediciones}} {{lista de ediciones}} [[Categoría:Fábulas de Esopo]] 7la532reyxwbsxyneymncffw4ahu2cl 106 398765 1664835 1582045 2026-06-17T19:00:30Z ~2026-35539-25 96549 /* */ 1664835 wikitext text/x-wiki {{Biocitas |ordenar=Cerrar Ed |obras = none |documentos = {{PAGENAME}}}} == Documentos == * [[Carta del presbítero Nicolás Aguilar al vicario general de Guatemala Bernardo Pavón el 2 de marzo de 1814]] == Documentos sobre Nicolás Aguilar== * [[Relación histórica del primer movimiento independentista en San Salvador de 1811]] * [[Carta del presbítero Manuel Aguilar al vicario general de Guatemala Bernardo Pavón el 9 de febrero de 1814]] * [[Informe del capitán general de Guatemala José de Bustamante sobre los sucesos de 1814]] * [[Carta del comandante de las milicias de la Intendencia de San Salvador José Méndez de Quiroga al arzobispo de Guatemala el 23 de julio de 1814]] * [[Oficio del arzobispo de Guatemala prohibiendo la entrada a San Salvador al presbítero Nicolás Aguilar por su implicación en el segundo movimiento independentista de 1814]] * [[Dictamen de la Real Audiencia de Guatemala fijando la residencia de los reos salvadoreños]] [[Categoría:Autores salvadoreños]] [[Categoría:Próceres de El Salvador]] 3429senfcx95nl6fx78m7c5jzlafdnq 1664844 1664835 2026-06-17T21:56:33Z Ignacio Rodríguez 3603 Revertido el cambio de [[Special:Contributions/~2026-35539-25|~2026-35539-25]] ([[User talk:~2026-35539-25|disc.]]) a la última edición de [[User:Juan Miguel|Juan Miguel]] 1582045 wikitext text/x-wiki {{Biocitas |ordenar=A |obras = none |documentos = {{PAGENAME}}}} == Documentos == * [[Carta del presbítero Nicolás Aguilar al vicario general de Guatemala Bernardo Pavón el 2 de marzo de 1814]] == Documentos sobre Nicolás Aguilar== * [[Relación histórica del primer movimiento independentista en San Salvador de 1811]] * [[Carta del presbítero Manuel Aguilar al vicario general de Guatemala Bernardo Pavón el 9 de febrero de 1814]] * [[Informe del capitán general de Guatemala José de Bustamante sobre los sucesos de 1814]] * [[Carta del comandante de las milicias de la Intendencia de San Salvador José Méndez de Quiroga al arzobispo de Guatemala el 23 de julio de 1814]] * [[Oficio del arzobispo de Guatemala prohibiendo la entrada a San Salvador al presbítero Nicolás Aguilar por su implicación en el segundo movimiento independentista de 1814]] * [[Dictamen de la Real Audiencia de Guatemala fijando la residencia de los reos salvadoreños]] [[Categoría:Autores salvadoreños]] [[Categoría:Próceres de El Salvador]] 26l60mv56jaxfvag59ja650svmbrfuy 1664845 1664844 2026-06-17T21:57:05Z Ignacio Rodríguez 3603 auto 1664845 wikitext text/x-wiki {{Biocitas |obras = none |documentos = {{PAGENAME}}}} == Documentos == * [[Carta del presbítero Nicolás Aguilar al vicario general de Guatemala Bernardo Pavón el 2 de marzo de 1814]] == Documentos sobre Nicolás Aguilar== * [[Relación histórica del primer movimiento independentista en San Salvador de 1811]] * [[Carta del presbítero Manuel Aguilar al vicario general de Guatemala Bernardo Pavón el 9 de febrero de 1814]] * [[Informe del capitán general de Guatemala José de Bustamante sobre los sucesos de 1814]] * [[Carta del comandante de las milicias de la Intendencia de San Salvador José Méndez de Quiroga al arzobispo de Guatemala el 23 de julio de 1814]] * [[Oficio del arzobispo de Guatemala prohibiendo la entrada a San Salvador al presbítero Nicolás Aguilar por su implicación en el segundo movimiento independentista de 1814]] * [[Dictamen de la Real Audiencia de Guatemala fijando la residencia de los reos salvadoreños]] [[Categoría:Próceres de El Salvador]] 4pgzjrp4r4nbtyiimwhwwgdj3gw27yp 828 415719 1664848 1664239 2026-06-17T22:22:56Z Ignacio Rodríguez 3603 1664848 Scribunto text/plain --[=[ Experimental, tomado desde https://en.wikisource.org/w/index.php?title=Template:Work_link&oldid=11502860 ]=] local p = {} local getArgs = require( 'Módulo:Arguments' ).getArgs local transdic = { title = 'wsPage', display = 'title', year = 'pubYear', authors = 'author', editors = 'editor', translators = 'translator', illustrators = 'illustrator', introducers = 'introducer', commonsFile = 'commonsFile', parentWork = 'parentWork', QID = 'qid' } -- bibliographic data from WD local Work = require( 'Módulo:Obra' ) -- formatting of {{book links}} local BookLink = require( 'Módulo:Enlace libro' ) local function valueIn( t, v ) for _, tv in pairs( t ) do if tv == v then return true end end return false end function p.objectToLink(workObject, suptable) suptable = suptable or {} if workObject == nil then local cat = "[" .. "[Categoría:Enlaces a obras sin elemento en Wikidata]]" return "<span class='error'>No se pudo cargar el elemento de Wikidata.</span>" .. cat end if workObject.type == Work.TYPES.EDITION then -- edition -> FRBR edition -- Translate "pure" Work data into the arguments to a BookLink local args = { classes = { 'wst-worklink-frbr-edition' }, item = workObject.item } -- evitar cargar parámetros que después no se mostrarán para bajar la carga de memoria for k, v in pairs(transdic) do if valueIn(suptable, k) then args[k] = nil else args[k] = workObject[v] end end mw.log(workObject.title) mw.logObject(suptable) local res = BookLink.renderLink(args) :attr( 'data-wikidata-id', workObject.item.id ) return tostring(res) elseif workObject.type == Work.TYPES.ARTICLE then return 'article' -- some kind of paper or article else -- we just assume this is some kind of generic work -- edition -> FRBR work -- Translate "pure" Work data into the arguments to a BookLink local args = { classes = { 'wst-worklink-frbr-work' }, QID = workObject.item.id, item = workObject.item } -- evitar cargar parámetros que después no se mostrarán para bajar la carga de memoria for k, v in pairs(transdic) do if not valueIn(suptable, k) then args[k] = workObject[v] end end local res = BookLink.renderLink(args) :attr( 'data-wikidata-id', workObject.item.id ) return tostring(res).. "<span style='color:red' title='Enlace a edición no FRBR'>*</span>[" .. "[Categoría:Enlaces a edición no FRBR]]" end end function p.link(frame) local args = getArgs(frame) local suptable = args.ignorar or '' suptable = mw.text.split( suptable, ',%s*') local qidOrTitle = args[1] local workObject = Work.newWork( qidOrTitle ) return p.objectToLink(workObject, suptable) end return p 1nwjobjmyfrlt4tosyo6pbjsugrl7si 0 418984 1664829 1664808 2026-06-17T16:53:10Z Janitoalevic 45005 1664829 wikitext text/x-wiki {{Encabezado |título= Circular N° 1 de la Junta de Gobierno sobre normas de conducta en procedimientos de las Fuerzas Armadas y Carabineros |autor= Augusto Pinochet |año= 7 de enero de 1974 |nota= Documento O. S. 3 distribuido a los mandos castrenses y policiales tras el 11 de septiembre de 1973, fijando directrices doctrinarias sobre la aplicación de la justicia militar en tiempo de guerra y el concepto de "mano justa". }}{{ma}} Santiago, 7 de enero de 1974. Nuestra etapa en el gobierno de la Nación no puede ni debe caracterizarse por actos inhumanos que tengan que ocultarse a la ciudadanía y que sólo engendran una reacción de violencia, de odios y de venganza. (...) 6.a.- La actitud de las FF. AA. y Carabineros para cualquier chileno o extranjero que sea sorprendido empuñando las armas, en actos criminales contra las tropas y población civil o sabotajes que afecten a nuestras fuerzas o a la población civil, debe estar orientada al aniquilamiento en combate de estos extremistas o violentistas o, por medio del procedimiento judicial más rápido, si se han rendido. 6.b.- Aquellos que sean sorprendidos promoviendo la subversión, deben ser sometidos a juicio y sancionados de acuerdo con los procedimientos rápidos que otorgan los tribunales militares en tiempo de guerra. 6.g.- El concepto de ‘mano dura’ no autoriza el empleo de procedimientos desterrados de la civilización; la mano dura es más bien una ‘mano justa’, para interpretar mejor el espíritu de la Junta de Gobierno en la conducción del país (...) 8.- La presente Circular deberá ser difundida, leída y comentada a todos los mandos de las FF. AA., Carabineros e Investigaciones, debiendo establecerse las responsabilidades, sanciones y penas correspondientes ante cualquier incumplimiento de las disposiciones que ella contiene. Fdo. AUGUSTO PINOCHET UGARTE, General de Ejército, Presidente de la Junta de Gobierno”. [[Categoría:DH-C]] [[Categoría:D1974]] [[Categoría:Historia de Chile]] [[Categoría:Documentos de Augusto Pinochet]] [[Categoría:Leyes de Chile]] fkhwvjccochco6i2i8vvn6sgp2g3jk1 0 418986 1664827 1664810 2026-06-17T16:52:23Z Janitoalevic 45005 1664827 wikitext text/x-wiki {{Encabezado |título= Circular Confidencial N° 22 del Ministerio del Interior sobre procedimientos de detención de personas |autor= Oscar Bonilla |año= 25 de enero de 1974 |nota= Documento distribuido el 1° de febrero de 1974. Fija la exclusividad de la Junta de Gobierno y el Ministerio del Interior para detener personas bajo las facultades de Estado de Sitio, ordenando el sometimiento de los Servicios de Inteligencia al control legal. }}{{ma}} A) Antecedentes: (…) Decreto ley N° 228 de 24 de diciembre de 1973, publicado en el Diario Oficial de 3 de enero de 1974, artículo 1°, que establece que todas las atribuciones conferidas por el artículo 72, N° 17, inciso tercero, de la Constitución Política del Estado al Presidente de la República por la declaración de Estado de Sitio, serán ejercidas por la Junta de Gobierno por medio de Decretos Supremos firmados por el Ministro del Interior, con la fórmula “Por orden de la Junta”. (…) En consecuencia, este ministerio dispone: 1. La detención de personas en uso de facultades del Estado de Sitio es única y exclusivamente privativa de la Junta Militar de Gobierno y se ejercerá a través de Decretos del Ministerio del Interior. 2. La detención de personas por la Justicia Militar sólo podrá llevarse a efecto en virtud de una orden emanada de un Tribunal competente y de acuerdo a las normas legales vigentes. 3. Ninguna autoridad está autorizada para practicar detenciones al margen de las presentes disposiciones; lo mismo se aplica a los Servicios de Inteligencia Militar de cualquier institución, que también deberán someterse obligatoriamente a tales normas. Lo expresado es sin perjuicio del cumplimiento de órdenes dispuestas por la autoridad competente y en los casos en que la Ley Penal autorice la detención respecto de personas sorprendidas in fraganti. (…) 4. El Ministerio de Defensa dispondrá que todos los C.A.J.S.I. (nota del autor: Comandantes de Áreas de Justicia y Seguridad Interior) envíen una lista completa de las personas que se encuentren detenidas a la fecha, conforme a esta facultad constitucional, indicando la fecha en que fueron detenidas. Esta lista deberán enviarla al Ministerio de Defensa Nacional en el plazo de diez días después de recibidas las instrucciones que ese Ministerio disponga, las que se harán llegar por intermedio de la Secretaría Ejecutiva Nacional de Detenidos (SENDET) al Ministerio del Interior. (…) 5. El Ministerio de Defensa Nacional dará las órdenes pertinentes para el inmediato cumplimiento de estas instrucciones. Saluda atentamente a US. (Fdo.) Oscar Bonilla Bradanovic, General de División, Ministro del Interior. [[Categoría:DH-C]] [[Categoría:D1974]] [[Categoría:Historia de Chile]] [[Categoría:Documentos del Ministerio del Interior de Chile]] [[Categoría:Dictadura Militar (Chile)]] [[Categoría:Derecho Procesal Penal]] 54qsozovufbiubw7t38yofo1vt556fz 1664828 1664827 2026-06-17T16:52:51Z Janitoalevic 45005 1664828 wikitext text/x-wiki {{Encabezado |título= Circular Confidencial N° 22 del Ministerio del Interior sobre procedimientos de detención de personas |autor= Oscar Bonilla |año= 25 de enero de 1974 |nota= Documento distribuido el 1° de febrero de 1974. Fija la exclusividad de la Junta de Gobierno y el Ministerio del Interior para detener personas bajo las facultades de Estado de Sitio, ordenando el sometimiento de los Servicios de Inteligencia al control legal. }}{{ma}} A) Antecedentes: (…) Decreto ley N° 228 de 24 de diciembre de 1973, publicado en el Diario Oficial de 3 de enero de 1974, artículo 1°, que establece que todas las atribuciones conferidas por el artículo 72, N° 17, inciso tercero, de la Constitución Política del Estado al Presidente de la República por la declaración de Estado de Sitio, serán ejercidas por la Junta de Gobierno por medio de Decretos Supremos firmados por el Ministro del Interior, con la fórmula “Por orden de la Junta”. (…) En consecuencia, este ministerio dispone: 1. La detención de personas en uso de facultades del Estado de Sitio es única y exclusivamente privativa de la Junta Militar de Gobierno y se ejercerá a través de Decretos del Ministerio del Interior. 2. La detención de personas por la Justicia Militar sólo podrá llevarse a efecto en virtud de una orden emanada de un Tribunal competente y de acuerdo a las normas legales vigentes. 3. Ninguna autoridad está autorizada para practicar detenciones al margen de las presentes disposiciones; lo mismo se aplica a los Servicios de Inteligencia Militar de cualquier institución, que también deberán someterse obligatoriamente a tales normas. Lo expresado es sin perjuicio del cumplimiento de órdenes dispuestas por la autoridad competente y en los casos en que la Ley Penal autorice la detención respecto de personas sorprendidas in fraganti. (…) 4. El Ministerio de Defensa dispondrá que todos los C.A.J.S.I. (nota del autor: Comandantes de Áreas de Justicia y Seguridad Interior) envíen una lista completa de las personas que se encuentren detenidas a la fecha, conforme a esta facultad constitucional, indicando la fecha en que fueron detenidas. Esta lista deberán enviarla al Ministerio de Defensa Nacional en el plazo de diez días después de recibidas las instrucciones que ese Ministerio disponga, las que se harán llegar por intermedio de la Secretaría Ejecutiva Nacional de Detenidos (SENDET) al Ministerio del Interior. (…) 5. El Ministerio de Defensa Nacional dará las órdenes pertinentes para el inmediato cumplimiento de estas instrucciones. Saluda atentamente a US. (Fdo.) Oscar Bonilla Bradanovic, General de División, Ministro del Interior. [[Categoría:DH-C]] [[Categoría:D1974]] [[Categoría:Historia de Chile]] [[Categoría:Leyes de Chile]] cg0zavw11zmf4ou91ja2aww8ri830c8 102 418988 1664813 2026-06-17T15:24:12Z Elultimolicantropo 36540 /* Corregido */ 1664813 proofread-page text/x-wiki <noinclude><pagequality level="3" user="Elultimolicantropo" /></noinclude>cantidad, pero nunca menos de tres mil quinientos vivos; y por los que de este número pasasen debía pagar sobre los ciento quince mil ducados lo que correspondiese a la demasía. Cartagena y Veracruz fueron en este asiento los únicos puntos habilitados para su introducción, debiendo los esclavos que en los demás países de América se necesitasen ser enviados de allí en los términos que prescribiese el Consejo de Indias <ref>''Colec. de Tratados de Paz, etc'', por {{May|AbREU}}. </ref>. Luego que desembarcaban los negros en Cartagena y Veracruz, permanecían depositados hasta que bajaban los compradores de las provincias internas. La limitación del tráfico de negros a sólo los dos puertos mencionados, manifiesta la desconfianza con que el gobierno miraba aun a los extranjeros que con licencia suya pasaban a la América. Cerrados para la importación los demás puntos del continente, los esclavos que de allí se trasladaban a otras partes ocasionaban grandes gastos, y por lo mismo vendíanse a precios muy subidos. Resultaba de aquí o que América no se proveía de todos los brazos que había menester, o que para llenar sus necesidades tenía que acudir al contrabando, que era lo que casi siempre se practicaba. {{Anclaje+|p22|No en balde}} se habían importado negros en Cuba, porque ya comenzaban los ingenios a lucir. De una relación enviada a la corte por el gobernador de Santiago de Cuba, Juan García de Navia<noinclude></noinclude> hv0jigqxwjenbzvlw5i71fahmxcy0dr 1664814 1664813 2026-06-17T16:13:45Z Elultimolicantropo 36540 1664814 proofread-page text/x-wiki <noinclude><pagequality level="3" user="Elultimolicantropo" /></noinclude>cantidad, pero nunca menos de tres mil quinientos vivos; y por los que de este número pasasen debía pagar sobre los ciento quince mil ducados lo que correspondiese a la demasía. Cartagena y Veracruz fueron en este asiento los únicos puntos habilitados para su introducción, debiendo los esclavos que en los demás países de América se necesitasen ser enviados de allí en los términos que prescribiese el Consejo de Indias <ref>''Colec. de Tratados de Paz, etc'', por {{May|ABREU}}. </ref>. Luego que desembarcaban los negros en Cartagena y Veracruz, permanecían depositados hasta que bajaban los compradores de las provincias internas. La limitación del tráfico de negros a sólo los dos puertos mencionados, manifiesta la desconfianza con que el gobierno miraba aun a los extranjeros que con licencia suya pasaban a la América. Cerrados para la importación los demás puntos del continente, los esclavos que de allí se trasladaban a otras partes ocasionaban grandes gastos, y por lo mismo vendíanse a precios muy subidos. Resultaba de aquí o que América no se proveía de todos los brazos que había menester, o que para llenar sus necesidades tenía que acudir al contrabando, que era lo que casi siempre se practicaba. {{Anclaje+|p22|No en balde}} se habían importado negros en Cuba, porque ya comenzaban los ingenios a lucir. De una relación enviada a la corte por el gobernador de Santiago de Cuba, Juan García de Navia<noinclude></noinclude> af4rhogxkocfp36vtjrgms9608k1o36 1664815 1664814 2026-06-17T16:14:13Z Elultimolicantropo 36540 1664815 proofread-page text/x-wiki <noinclude><pagequality level="3" user="Elultimolicantropo" /></noinclude>cantidad, pero nunca menos de tres mil quinientos vivos; y por los que de este número pasasen debía pagar sobre los ciento quince mil ducados lo que correspondiese a la demasía. Cartagena y Veracruz fueron en este asiento los únicos puntos habilitados para su introducción, debiendo los esclavos que en los demás países de América se necesitasen ser enviados de allí en los términos que prescribiese el Consejo de Indias <ref>''Colec. de Tratados de Paz, etc'', por {{May|Abreu}}. </ref>. Luego que desembarcaban los negros en Cartagena y Veracruz, permanecían depositados hasta que bajaban los compradores de las provincias internas. La limitación del tráfico de negros a sólo los dos puertos mencionados, manifiesta la desconfianza con que el gobierno miraba aun a los extranjeros que con licencia suya pasaban a la América. Cerrados para la importación los demás puntos del continente, los esclavos que de allí se trasladaban a otras partes ocasionaban grandes gastos, y por lo mismo vendíanse a precios muy subidos. Resultaba de aquí o que América no se proveía de todos los brazos que había menester, o que para llenar sus necesidades tenía que acudir al contrabando, que era lo que casi siempre se practicaba. {{Anclaje+|p22|No en balde}} se habían importado negros en Cuba, porque ya comenzaban los ingenios a lucir. De una relación enviada a la corte por el gobernador de Santiago de Cuba, Juan García de Navia<noinclude></noinclude> ikm8qbioccop7v3k3coz0wp3dnexjd0 102 418989 1664816 2026-06-17T16:16:27Z Elultimolicantropo 36540 /* Corregido */ 1664816 proofread-page text/x-wiki <noinclude><pagequality level="3" user="Elultimolicantropo" /></noinclude>Castrillón en 18 de Junio de 1617, aparece que en la jurisdicción de Bayamo había once trapiches movidos por caballos, y dos de los vecinos tenían dos cada uno, pudiendo hacer algunos de los trapiches hasta ochocientas arrobas de azúcar. Santiago de Cuba contaba entonces veinte y seis, perteneciendo cinco de ellos al capitán Francisco de Moya, y había cinco vecinos más que tenían dos trapiches cada uno. Estos con los once de Bayamo producían más de veinte y ocho mil arrobas de azúcar y mucha miel, que se exportaba para Tierra Firme y España. {{Anclaje+|p23|Conociendo el mencionado gobernador}} que se carecía del número suficiente de negros para dar impulso a los ingenios, pidió que los armadores de ellos que iban a Cartagena y a Nueva España, en vez de tocar en Jamaica para refrescar víveres, lo hiciesen en Santiago de Cuba, donde podían comprarlos más baratos y en mayor número que en aquella isla, dejando en cambio de lo que gastasen algunos negros, con los cuales no sólo se fomentarían los ingenios sino también el comercio. Pidió también que se cumpliese el ofrecimiento hecho por el Rey de que para la construcción de una fortaleza a la entrada del puerto se empleasen veinte de sus negros esclavos que tenía en la Habana, cuyo gobernador los había enviado a Cartagena para la construcción de sus murallas. De sentir es, que Navia Castrillón hubiese omitido en su Relación el número de esclavos negros que había entonces en los treinta y siete<noinclude></noinclude> 1l6zw31dg9nd07cb07xudbmgs0ewbri 102 418990 1664817 2026-06-17T16:18:19Z Elultimolicantropo 36540 /* Corregido */ 1664817 proofread-page text/x-wiki <noinclude><pagequality level="3" user="Elultimolicantropo" /></noinclude>ingenios de Bayamo y Santiago de Cuba, cuando tan fácil le hubiera sido llenar semejante vacío. Ampliando Navia Castrillón sus noticias acerca del estado de aquella isla, dice que en el territorio del Gobierno de Santiago de Cuba había personas que poseían desde dos mil hasta seis mil cabezas de ganado vacuno herrado, sin contar el cimarrón; que de ese ganado se sacaban anualmente más de veinte mil cueros, que secos y bien acondicionados se vendían en el embarcadero del río Cauto a seis reales fuertes los de vaca y a trece reales los de toro. La carne de aquellos animales, por su bajo precio y la dificultad de conducirla al mercado, casi toda se perdía en el campo, particularmente en Bayamo y Puerto Príncipe. Del ganado muerto exportábase anualmente para la Habana y Cartagena más de seis mil arrobas de sebo que se empleaban en la carena de buques, consumiéndose otro tanto dentro del mismo Gobierno de Cuba para jabón y otros usos. Había en Bayamo y su comarca tanta abundancia de caballos, que un arriero sólo valía tres o cuatro pesos, uno de carga de ocho a diez pesos, uno muy bueno de silla de doscientos a cuatrocientos reales, y por esto hasta los esclavos tenían caballos y yeguas en que montar. Abundaban también las muías y exportábanse para la Habana en donde se empleaban en tirar de los trapiches que molían la caña. Había tantos cerdos, que un buen tocino sólo valía cuatro reales y lo mismo una arroba de tasajo, exportándose ambos artículos y la manteca para<noinclude></noinclude> 10w052sdaclqzjvdwj4ai26mmhtz531 102 418991 1664818 2026-06-17T16:23:13Z Elultimolicantropo 36540 /* Corregido */ 1664818 proofread-page text/x-wiki <noinclude><pagequality level="3" user="Elultimolicantropo" /></noinclude>Cartagena, Portobelo y Florida. Hablábase igualmente en la mencionada Relación de minas de oro en Bayamo, y de cobre y de hierro en varias partes del Gobierno de Santiago de Cuba, y pedíanse negros esclavos para su laboreo <ref> ''Relación original de las cosas más necesarias e importantes que hay en el Gobierno de Santiago de Cuba de que da noticia el capitán Juan García de Navia y Castrillón, Gobernador que fué del dicho Gobierno, etc,'' M. S. de cuatro fojas en folio firmadas por el autor. Museo Británico, papeles tocantes a las Indias Occidentales y Filipinas, flotas y galeones, etc. número 13992, página 529. </ref>. Fué Bayamo uno de los pueblos de Cuba que más progresaron a fines del siglo XVI y principios del XVII, pues además de los negros que recibió con los asientos ajustados en aquella época, obtúvolos también del lucrativo contrabando que hacía con los corsarios franceses, ingleses y holandeses con quienes muchos de los habitantes de aquella villa y otros puntos de la isla estaban en culpable y vergonzosa correspondencia. {{Anclaje+|p24|Bajaban por el río Cauto}} carabelas y fragatas cargadas de azúcar, cacao, añil, jengibre y corambres que conducían a la Península. Pero este comercio desapareció repentinamente cerrándose la única importante vía de comunicación que constituía su prosperidad. Una espantosa avenida de aquel río acaecida en 1616 formó en su boca una barra de fango que desde entonces hasta hoy embaraza su navegación. Esta catástrofe que tan perniciosa influencia tuvo en la suerte de aquel pueblo, merece que aquí se describa. {{np}}<noinclude></noinclude> g83grf778gd13r3hlw32745xiashj4d 102 418992 1664819 2026-06-17T16:25:11Z Elultimolicantropo 36540 /* Corregido */ 1664819 proofread-page text/x-wiki <noinclude><pagequality level="3" user="Elultimolicantropo" /></noinclude>"Esa barra, dice el distinguido doctor Bayamés don Manuel José de Estrada, se formó el año 1616, y según lo refiere un acuerdo del ayuntamiento de aquel año, tuvo su origen de esta manera. Habia establecidos dos astilleros en el hato del Cauto Abajo: el uno se llamaba del Rey, el otro del capitán Alvaro Pérez de Nava, dueño de la hacienda. Concurrían á los trabajos de ambos un número crecido de operarios; y estos, para proporcionarse con más facilidad y presteza las vituallas necesarias á su subsistencia, desmontaron de una y otra banda del rio frondosos y corpulentos árboles que también labraban para su objeto. Aconteció una asombrosa avenida de aquel caudaloso rio, y como faltase la trabazón de las raíces de los palos tumbados, arrancó las tierras de su antiguo lecho y en inmensas porciones corrieron á la boca, donde encontrando la resistencia de las olas del mar formaron el bajo que no permite la entrada á embarcaciones mayores, y que negó la salida á treinta y tres que estaban á la carga en aquel embarcadero. "En dicho cabildo se acordó suplicar á S. M. se sirviese dolerse de los dueños de las expresadas embarcaciones y de sus cargadores, extendiendo su brazo poderoso en remedio de tanta ruina. No sabemos que por la Córte se hubiese tomado providencia alguna, ni tampoco por nuestros vecinos, sólo sí que el año siguiente de 1617 se otorgaron treinta y tres poderes de familias que pasaron á la Habana donde florecía mucho más el comercio. {{np}}<noinclude></noinclude> 0j9ovk9t1td9olk34881832499gqwj2 102 418993 1664820 2026-06-17T16:28:22Z Elultimolicantropo 36540 /* Corregido */ 1664820 proofread-page text/x-wiki <noinclude><pagequality level="3" user="Elultimolicantropo" /></noinclude>"La emigración continuó en los años subsecuentes. En el archivo del cabildo existen innumerables credenciales de los registros que se despachaban, y aun cuando saqué el extracto de todos, se conservan inventarios de ingenios de azúcar con crecido número de negros é indios asalariados, lo mismo de haciendas de cacao y demás ramos. De la parte allá del rio de esta villa aun se conservan las albercas y menesteres para sacar añil que mantenía doña María Agramonte con ochenta negros, según sus inventarios. Después de aquella época desgraciada decayó tanto el comercio, que los ramos de él llegaron á extinguirse; y aunque la habilitación del puerto de Manzanillo les dió esperanzas vitales, sólo ha logrado conseguirse una sombra de lo que fué en otro tiempo <ref>Extracto de la ''Memoria escrita por el Dr. D. Manuel José de Estrada de orden del Exento. Señor D. Francisco Dionisio Vives''. Memorias de la Sociedad Económica de la Habana, tom. 10, pág. 343. </ref>." A consecuencia de la formación de la barra quedó tan baja la boca del Cauto por algunas partes, que en 1617 sólo medía cinco palmos de agua, y los buques de cierto porte tenían que alijar casi toda la carga para poder entrar. No experimentaron la Habana y otros pueblos de Cuba la desgracia que afligió a Bayamo. Siguiéronse pues fomentando los ingenios de la jurisdicción de aquella ciudad, y su ayuntamiento con madura previsión trató de impedir bajo de<noinclude></noinclude> 8iqsadsu3a9cbaj8qrdf6uxpon4f5ad 102 418994 1664821 2026-06-17T16:32:00Z Elultimolicantropo 36540 /* Corregido */ 1664821 proofread-page text/x-wiki <noinclude><pagequality level="3" user="Elultimolicantropo" /></noinclude>ciertas penas la tala de los montes de aquella comarca, pues deseaba la conservación de maderas, no sólo para las necesidades de aquella ciudad sino para la fabricación de los ingenios <ref>Acuerdo del Cabildo de la Habana de 11 de Marzo de 1616, publicado en las Memorias de la Real Sociedad Económica de aquella ciudad, tom. 19, año de 1844. </ref>. Pero éstos, con infracción de tan saludable medida, devoraron al fin todos los bosques de la parte occidental de Cuba. {{Anclaje+|p25|Si la antigua Roma honró}} la dignidad consular permitiendo al primer Cónsul que llevase un esclavo de Helor cuando a las calles salía, el gobierno español, deseando dar lustre a las Universidades que había fundado en México y en Lima, ordenó en 24 de Abril de 1618 que facultaba a los Rectores de aquellas Universidades para que por el tiempo que lo fuesen pudiera cada uno llevar dos negros lacayos con espadas<ref>''Recop. de Leyes de Indias'', lib. 1, tit. 22, ley 8. </ref>. Si con una mano protegía el Gobierno la entrada de negros esclavos en América, con otra procuraba reprimir y castigar sumariamente las demasías que cometieran. Llevado de este deseo ordenó Felipe III en Lisboa a 14 de Septiembre de 1619, que en casos de motines, sediciones y rebeldías, con actos de salteamientos y de famosos ladrones que sucedían en las Indias con negros cimarrones, no se hiciese proceso ordinario criminal y se castigase a los jefes ejemplarmente,<noinclude></noinclude> 87lptkl13j3n1986myk9a0wbns0z4is 102 418995 1664822 2026-06-17T16:34:32Z Elultimolicantropo 36540 /* Corregido */ 1664822 proofread-page text/x-wiki <noinclude><pagequality level="3" user="Elultimolicantropo" /></noinclude>reduciendo los demás a esclavitud, pues esclavos eran los fugitivos de sus amos <ref>''Recop. de Leyes de Indias''. lib. 7, tit. 5, ley 26.</ref>. Volviendo la vista a Cuba, observamos con dolor que su población por ese tiempo era todavía sumamente escasa; y para comprobar esta verdad, nos serviremos de las noticias que Fray Alonso Enriquez de Almendares, Obispo de Cuba, nos dejó en su Relación espiritual y temporal de aquel Obispado, escrita en 1620. Santiago de Cuba tenía entonces unas doscientas cincuenta almas entre españoles, negros e indios, de los cuales había doce mezclados y connaturalizados con los primeros. Contaba el Cobre como doscientas cincuenta personas, siendo libres unas cien, y quince o diez y seis soldados para la custodia de los esclavos negros del Rey que trabajaban en las minas de aquel metal, cuyo número ascendía a unos ciento treinta y seis. Entre españoles, indios, negros y mulatos, todos mezclados, existían en Bayamo mil quinientas almas, debiendo advertirse que en este número no entraba la gente del campo. A sólo trescientos llegaban los españoles, negros y mulatos de Puerto Príncipe, en donde no había sino media docena de indios. El Cayo apenas contaba cincuenta, siendo casi todos mulatos, mestizos y portugueses. En Sancti Spíritus había doscientas personas de todas clases; en Trinidad ciento cincuenta; en<noinclude></noinclude> kk3ldww4jdhkq8i6pllckl7phzo5t89 1664824 1664822 2026-06-17T16:46:43Z Elultimolicantropo 36540 1664824 proofread-page text/x-wiki <noinclude><pagequality level="3" user="Elultimolicantropo" /></noinclude>reduciendo los demás a esclavitud, pues esclavos eran los fugitivos de sus amos <ref>''Recop. de Leyes de Indias''. lib. 7, tit. 5, ley 26.</ref>. {{Anclaje+|p26|Volviendo la vista a Cuba}}, observamos con dolor que su población por ese tiempo era todavía sumamente escasa; y para comprobar esta verdad, nos serviremos de las noticias que Fray Alonso Enriquez de Almendares, Obispo de Cuba, nos dejó en su Relación espiritual y temporal de aquel Obispado, escrita en 1620. Santiago de Cuba tenía entonces unas doscientas cincuenta almas entre españoles, negros e indios, de los cuales había doce mezclados y connaturalizados con los primeros. Contaba el Cobre como doscientas cincuenta personas, siendo libres unas cien, y quince o diez y seis soldados para la custodia de los esclavos negros del Rey que trabajaban en las minas de aquel metal, cuyo número ascendía a unos ciento treinta y seis. Entre españoles, indios, negros y mulatos, todos mezclados, existían en Bayamo mil quinientas almas, debiendo advertirse que en este número no entraba la gente del campo. A sólo trescientos llegaban los españoles, negros y mulatos de Puerto Príncipe, en donde no había sino media docena de indios. El Cayo apenas contaba cincuenta, siendo casi todos mulatos, mestizos y portugueses. En Sancti Spíritus había doscientas personas de todas clases; en Trinidad ciento cincuenta; en<noinclude></noinclude> hys3d05t6ie0o7r8ml2nkumb7t5cw76 102 418996 1664823 2026-06-17T16:46:11Z Elultimolicantropo 36540 /* Corregido */ 1664823 proofread-page text/x-wiki <noinclude><pagequality level="3" user="Elultimolicantropo" /></noinclude>Guanabacoa ciento sesenta; en la Habana cuatro mil ochenta y dos, y en Baracoa treinta. El total de la población que aquí aparece, es seis mil novecientas setenta y dos almas; pero la relación del Obispo Almendares adolece de los mismos defectos que la de su antecesor Fray Diego Sarmiento en el siglo XVI, pues ni contiene todo el número de habitantes de la Isla, ni especifica siempre el número de individuos que contiene cada una de las clases mencionadas. A pesar de estas imperfecciones, dicese en aquella Relación que los indios, ya mezclados con los españoles, no eran tan maltratados como antes; lo que no acontecía con "los de Guanabacoa, que era donde más habia, pues ''padecían muchísimo'', porque los vecinos de la Habana les quitaron sus tierras, sin dejarles donde sembrar <ref>Relación de lo espiritual y temporal de Obispado de Cuba, vida y costumbres de todos sus eclesiásticos, escrita de orden del Rey D. Felipe III por Fray Alonso Enriquez de Almendares, Obispo de Cuba, en la Habana, a doce de Agosto de 1620.</ref>". {{Anclaje+|p27|La prohibición de traficar}} en esclavos entre Filipinas y Nueva España, habíase moderado en gran manera; y como de aquellas islas solían llevarse muchos al puerto de Acapulco, que consumían los bastimentos de las naves, mandó Felipe III en 1620 que ningún pasajero ni marinero pudiese traer más de un esclavo, y las personas de calidad un número limitado. Ordenó también que todos los derechos que se cobraban en Aca-<noinclude></noinclude> 4texeil90c8k3wa5bys7njj4cidz4cb 102 418997 1664825 2026-06-17T16:49:05Z Elultimolicantropo 36540 /* Corregido */ 1664825 proofread-page text/x-wiki <noinclude><pagequality level="3" user="Elultimolicantropo" /></noinclude>pulco de los allí vendidos por la incomodidad de pagarlos en Manila, continuasen percibiéndose como antes en aquel puerto <ref>''Recop. de Leyes de Indias'', lib. 9, tit. 45, ley 55. </ref>. {{Anclaje+|p28|Hemos visto que según el asiento}} ajustado con Antonio Rodríguez Deivas, los negros que se llevaban a América solamente podían introducirse por los puertos de Veracruz y Cartagena. Cosa a la verdad extraña, porque aquella misma Cartagena era cabalmente uno de los países del Nuevo Mundo en donde los negros inspiraban más graves temores al Gobierno español. Testimonio irrefragrable es la ley hecha por Felipe IV en Madrid a 8 de Agosto de 1621, y que íntegra transcribo : "En la Ciudad de Cartagena hay muchos Negros y Mulatos, por cuyas inquietudes han sucedido muertes, robos, delitos y daños, causados de haberles consentido las Justicias traer armas y cuchillos, por favorecidos, ó esclavos de Ministros de la Inquisición, Gobernadores, Justicias, Estado Eclesiástico y profesión militar, con cuyo amparo hacen muchas libertades en perjuicio de la paz pública: Mandamos que ningún esclavo traiga armas, ni chuchillo, aunque sea acompañando á su amo, sin particular licencia nuestra, y que por ningún caso se tolere ni disimule, estando adavertidos los Gobernadores, que se les hará cargo en sus residencias, y castigará severamente cualquier descuido ú omisión: y en cuanto á lo<noinclude></noinclude> n9psjtwvrdg79ce3kfrtooduube48xb 102 418998 1664826 2026-06-17T16:51:33Z Elultimolicantropo 36540 /* Corregido */ 1664826 proofread-page text/x-wiki <noinclude><pagequality level="3" user="Elultimolicantropo" /></noinclude>Negros de Inquisidores se guarde la Concordia. <ref>''Recop. de Leyes de Indias'', lib. 8, tit. 5, ley 17.</ref>." {{Anclaje+|p29|Bajo el reinado de Felipe III hízose una innovación}}, que si hubiera continuado, habría entorpecido el tráfico de negros, y elevado por consiguiente el precio de ellos con grave perjuicio de sus compradores en América. Después de varias juntas y consultas ordenóse que los buques negreros, en vez de salir como antes directamente de Africa para las Indias con sus cargamentos, tornasen a Sevilla para ser allí registrados y partir después para ellas. Contra esta innovación representaron los portugueses Mendo de Mota y el Conde de Villanova, tratantes de negros en Africa; y si bien la representación que a mis manos ha llegado no tiene fecha, seguramente no fué anterior al 1615, porque en ella se hace mención del asiento que en este año se ajustó con Antonio Rodríguez Deivas, ni posterior al 1621, porque este fué el año en que murió Felipe III a quien ella fué dirigida. En tres motivos fundóse aquella nueva orden que Mendo de Mota y Villanova se empeñaron en impugnar. El primero es haberse dicho que en las naves que conducían los esclavos iban portugueses cristianos nuevos, los cuales se quedaban en América con riesgo de la religión y de pervertir a los indios; pero este motivo, en concepto de los exponentes, parece que se tomó más con la idea de alarmar el catolicismo del monarca, que por<noinclude></noinclude> ednolejlywy8vbgabbwvz8r1g0eg3fy 102 418999 1664830 2026-06-17T16:53:44Z Elultimolicantropo 36540 /* Corregido */ 1664830 proofread-page text/x-wiki <noinclude><pagequality level="3" user="Elultimolicantropo" /></noinclude>haber algún fundamento en lo que se alegaba. Dicen, que aunque los mercaderes que intervenían en el tráfico solían ser cristianos nuevos, así ellos como los pilotos y marineros que de ordinario eran cristianos viejos, todos daban fianzas de no quedarse en las Indias, y de presentarse en España dentro de cierto tiempo; y que si algunos se quedaban allá sería por malicia, o por descuido de los ministros a cuyo cargo estaba ejecutar las fianzas y hacer guardar las órdenes del Rey. Añadían, que toda la gente empleada en el tráfico iba a tratar de sus ganancias temporales y no de comunicación espiritual: que la Inquisición no permitiría la menor novedad ni atrevimiento alguno en lo tocante a la religión; y que si los ministros del monarca eran tan descuidados que les permitían quedarse en América no obstante las fianzas que habían dado, ¿cómo se podría entonces remediar que no fuesen cuantos quisieran, por otras vías, a provincias tan anchas y abiertas por todas partes? Y agregaban: "Prohibir la entrada en las Indias á personas particulares de cualquier nación, es imposible: la expulsión es muy fácil habiendo la debida fidelidad en los ministros; y que vayan los navios de los esclavos en derechura, ó vengan por Sevilla, los mismos mercaderes son los que por una y otra parte han de tratar en ellos, y no hay otra suerte de gente que se ocupe de ordinario en este trato, y así por ninguna via puede ser de consideración alguna el dicho motivo." {{np}}<noinclude></noinclude> nv99av7pgp3bk3b9jw47rubb3o92rni 102 419000 1664831 2026-06-17T16:58:26Z Elultimolicantropo 36540 /* Corregido */ 1664831 proofread-page text/x-wiki <noinclude><pagequality level="3" user="Elultimolicantropo" /></noinclude>El segundo fué decir que había muchos esclavos en las Indias, y que convenía no fuesen tantos a ellas. A esto contestaron los exponentes, que menguada considerablemente la población indígena y no queriendo trabajar los españoles, era indispensable la introducción de negros en América para todos los servicios, que su númro no comprometía la suerte del Estado, porque los alzamientos que habían acaecidos eran ocasionados por el mal trato que se les daba; y que si se juzgaba indispensable restringir su número, esto se podría hacer consultando al Consejo de Indias, sin imposibilitar su comercio con tantos daños. El tercer motivo consistía en creer que las naves que conducían los esclavos llevaban mercancías que perjudicaban al despacho de las que se embarcaban en las flotas. Los exponentes contestaron: que en los artículos que se llevaban a Angola para el rescate de los esclavos se ganaba un ciento por ciento y aun más, mientras que la utilidad que de ellos se sacaba en América no excedía de treinta y cuarenta por ciento. ¿Cuál pues sería el mercader que prefiriese la segunda ganancia a la primera? Además, los buques que ordinariamente llevaban doscientos o trescientos esclavos no tenían capacidad para recibir tales mercancías, las que en caso de embarcarse se corromperían con el rigor del clima, ques que habrían de permanecer a bordo año y medio y aun dos años. Y dado caso que fuesen algunas, sería por culpa de los ministros encargados de impedirlo;<noinclude></noinclude> khulk95qi5q1pv7amq9zh4csxq5vm2v 102 419001 1664832 2026-06-17T16:59:54Z Elultimolicantropo 36540 /* Corregido */ 1664832 proofread-page text/x-wiki <noinclude><pagequality level="3" user="Elultimolicantropo" /></noinclude>y si ellos eran tan negligentes o tan malos que lo disimulaban, del mismo modo dejarían entrar los esclavos sin registro, y a vuelta de ellos todas las mercancías como se estaba haciendo. "La verdad es, según dicen los exponentes, que las que tenían hecho daño en las Indias, son las que van en los navios de las Canarias y en los mismos galeones de Sevilla, y las que llevan los naturales de Buenos Ayres con la permisión que se les dió como V. M. lo tiene declarado en sus Reales Cédulas; y el mismo Francisco Duarte en la última carta que ha escrito sobre esta materia y se vió en la Junta, dice que el hábito de las Indias procede de las muchas mercaderías que con la paz universal acudieron á Sevilla, y bien se puede dar lugar á la presunción que hay de algunas personas poderosas de aquella Ciudad que acostumbraban á enviarlas escondidas en los galeones, procuraron dar á entender por medios suppuestos que nascia el daño de las muchas mercaderías que hay en las Indias de los navios en que van los esclavos, para que no se echasen de ver que nascian de los galeones que iban cargados dellas." "Y como quiera que ello fuese, pues el tiempo ha mostrado que se siguió el efecto contrario á lo que se pretendía por la dicha órden, y que yendo los navios sin registro se siguen los mismos daños y otros maiores: y si se fuere envejeciendo el abuso de llevarlos sin pagar, se yran acostumbrando<noinclude></noinclude> 1guhudq2tj0clqbcsfcvl9lx5ftobk0 102 419002 1664833 2026-06-17T17:19:49Z Elultimolicantropo 36540 /* Corregido */ 1664833 proofread-page text/x-wiki <noinclude><pagequality level="3" user="Elultimolicantropo" /></noinclude>y facilitando á ello los hombres de modo que venga á ser después más dificultoso el remedio: combiene acudir con brevedad ordenando V. M. que se concedan los registros en la forma que se daban antes de dicha nueva órden, y que se guarde lo que siempre se ha usado en tiempo del Rey que está en el cielo, y en el de V. M. con parecer y aprobación de tantos ministros y consejeros pasados y presentes." No se limitaron Mendo de Mota y Villanova a impugnar los motivos en que se fundó la nueva orden: que también expusieron los enormes daños que ésta había de ocasionar a la Real Hacienda de las Coronas de Castilla y Portugal, de las que Felipe III era Rey. Decían que tales daños serían tanto mayores cuanto más se dilatase el remedio: que los tratos de Angola, Cabo Verde y Santhomé de la Corona de Portugal, que principalmente consistían en las licencias para sacar negros, producían anualmente, antes de la nueva orden, más de cien mil cruzados, mientras que las licencias de la Corona de Castilla estaban contratadas en ciento veinte mil ducados al año, es decir, que en los referidos tres años, esta Corona había perdido trescientos sesenta mil ducados, y la de Portugal más de trescientos mil cruzados, o sea un total de seiscientos noventa y seis mil cruzados: que negándose a los mercaderes las licencias de {{corr|Castills|Castilla}} para que llevasen los esclavos en derechura a {{corr|laa|las}} Indias, como antes se hacía, y sabiendo que de na-<noinclude></noinclude> l5bsialljhb7v4c6ujq4054y91ki9w0 102 419003 1664834 2026-06-17T17:21:30Z Elultimolicantropo 36540 /* Corregido */ 1664834 proofread-page text/x-wiki <noinclude><pagequality level="3" user="Elultimolicantropo" /></noinclude>vegarlos a Sevilla les resultaba una pérdida irremediable, habíanse dado al contrabando, e introducido clandestinamente en los mencionados tres años muchos negros en diversas partes de América y principalmente en el Río de la Plata y Buenos Aires, como era notorio al mismo Consejo de Indias, según los avisos que de aquellos países había recibido: que en este contrabando habían de continuar los mercaderes portugueses por sus ganancias, arrostrando todo riesgo los subditos de las Indias por la necesidad en que estaban de negros para sus trabajos, y los empleados del gobierno por el provecho que sacaban dejándose sobornar; de modo que el único que venía a quedar perjudicado era el monarca, careciendo de los derechos que antes percibía con la introducción de los negros; y en prueba de que así pasaban las cosas en Indias, había quien ofreciese dar más de cien mil ducados por los derechos de los esclavos que habían entrado en ellas con perjuicio de la Real Hacienda: que habiendo faltado la renta de las licencias en Congo, Angola, Santhomé y Cabo Verde, ya no había con qué pagar los gastos de los Gobernadores, Ministros y Presidios que el Rey allí tenía para defensa de aquellas tierras; ni tampoco de los Obispos y clero, ni en Sevilla los juros que estaban situados en aquella renta, de los cuales había muchos de gran cargo de conciencia: que era imposible continuar el tráfico en la forma que se había mandado, porque se empleaban año y medio y dos<noinclude></noinclude> ti7ifk4i916ohhfjwji88zmnjceemtk 102 419004 1664836 2026-06-17T21:05:32Z Elultimolicantropo 36540 /* Corregido */ 1664836 proofread-page text/x-wiki <noinclude><pagequality level="3" user="Elultimolicantropo" /></noinclude>años en hacer una armazón de esclavos, y se metían doscientos y trescientos en un buque, desnudos, presos y encadenados, con la comida y bebida tan tasada, que moría gran parte de ellos, y los más llegaban flacos, debilitados y enfermos; de manera que si llegando a Sevilla después de una larga navegación tenían que emprender otra todavía más larga, morirían todos o la mayor parte, además de los gastos necesarios para comprar nuevos víveres para su alimento; todo lo cual haría tan excesivo el costo de los que arribasen vivos a la América, que se perderían los armadores, como ya había sucedido con dos o tres que en los últimos años lo habían intentado. Este precio de los esclavos, intolerable para los moradores de las Indias, abriría muchísima puerta de contrabando. Si llegaban a Sevilla después de haber partido la flota en que habían de ser conducidos, sería menester que esperasen otra; y desembarcados en San Lúcar o en otro puerto de Andalucía, no sólo ocasionarían mayor gasto con la demora, sino que puestos en comunicación por algún tiempo con la gente de tierra se harían ladinos, quebrantándose así la prohibición que de tales esclavos se importasen en América. Por último decían que tal novedad nunca había existido para las armazones de negros sacados de Africa bajo los reinados anteriores; que si esto aconteció cuando Portugal era nación independiente ¿por qué ahora que ella y España estaban sometidas a un mismo cetro se quería establecer una medida tan perjudicial a los inte-<noinclude></noinclude> 6mfx7howpnc2964cwjjb6ozjeeor0x3 102 419005 1664837 2026-06-17T21:10:26Z Elultimolicantropo 36540 /* Corregido */ 1664837 proofread-page text/x-wiki <noinclude><pagequality level="3" user="Elultimolicantropo" /></noinclude>reses del gobierno como a sus posesiones en América? <ref>''Informe al rey Felipe III por Mendo de Mota, y e Conde Villanova sobre el modo de navegar los esclavos negros por Sevilla, o si es más conveniente llevarlos en derechura de Africa a las Indias.'' M.S. original de !a época, sin firmas ni fecha, de 7 fojas en folio, en {{May|Muñoz}}, ''Colec'', tom. 34.</ref> Esta representación o informe y otras consideraciones hijas de la experiencia, modificaron la nueva orden, y el tráfico de esclavos siguió su curso anterior acompañado de los abusos que le eran inseparables. Los asentistas, luego que desembarcaban las armazones de esclavos negros en los puertos de las Indias, no querían venderlos para entrar con ellos tierra adentro, defraudando los derechos de alcabala que debían pagar. Para enfrenar estas demasías, mandó Felipe IV el 8 de Agosto de 1621, que el Gobernador de Cartagena y de los demás puertos de América no dejasen pasar de ellos a los portugueses y otros extranjeros, por ningún caso ni motivo<ref>''Recop. de Leyes de Indias'', lib. 9, tit. 27, </ref>. {{Anclaje+|p30|No obstante que los asentistas}} importaban negros en el Perú, este carecía del número suficiente para sus trabajos. Fué de aquí, que la ciudad y provincia de Charcas pidieron al Rey desde 1610 que se dejasen introducir en cantidad más considerable. En consecuencia mandó el monarca que el Virey y la Audiencia de Charcas informasen, si serían útiles para los ingenios, labranzas y minas; si convendría introducirlos por Buenos Aires o<noinclude></noinclude> 69a50muv9r2chy7wlj4frgqbx3l0vu1 1664838 1664837 2026-06-17T21:12:57Z Elultimolicantropo 36540 1664838 proofread-page text/x-wiki <noinclude><pagequality level="3" user="Elultimolicantropo" /></noinclude>reses del gobierno como a sus posesiones en América? <ref>''Informe al rey Felipe III por Mendo de Mota, y e Conde Villanova sobre el modo de navegar los esclavos negros por Sevilla, o si es más conveniente llevarlos en derechura de Africa a las Indias.'' M.S. original de la época, sin firmas ni fecha, de 7 fojas en folio, en {{May|Muñoz}}, ''Colec'', tom. 34.</ref> Esta representación o informe y otras consideraciones hijas de la experiencia, modificaron la nueva orden, y el tráfico de esclavos siguió su curso anterior acompañado de los abusos que le eran inseparables. Los asentistas, luego que desembarcaban las armazones de esclavos negros en los puertos de las Indias, no querían venderlos para entrar con ellos tierra adentro, defraudando los derechos de alcabala que debían pagar. Para enfrenar estas demasías, mandó Felipe IV el 8 de Agosto de 1621, que el Gobernador de Cartagena y de los demás puertos de América no dejasen pasar de ellos a los portugueses y otros extranjeros, por ningún caso ni motivo<ref>''Recop. de Leyes de Indias'', lib. 9, tit. 27, </ref>. {{Anclaje+|p30|No obstante que los asentistas}} importaban negros en el Perú, este carecía del número suficiente para sus trabajos. Fué de aquí, que la ciudad y provincia de Charcas pidieron al Rey desde 1610 que se dejasen introducir en cantidad más considerable. En consecuencia mandó el monarca que el Virey y la Audiencia de Charcas informasen, si serían útiles para los ingenios, labranzas y minas; si convendría introducirlos por Buenos Aires o<noinclude></noinclude> oftpuvn1g3nj2rn1dzzjs7q7l8mnedo 102 419006 1664839 2026-06-17T21:19:07Z Elultimolicantropo 36540 /* Corregido */ 1664839 proofread-page text/x-wiki <noinclude><pagequality level="3" user="Elultimolicantropo" /></noinclude>por otra parte, y a qué precio debían venderse. Pocos años después, el licenciado Juan de Ibarra pidió también negros al Rey, encareciendo la necesidad que de ellos había en el Perú para todos los trabajos; bien que en su opinión los indios eran los más a propósito para el laboreo de las minas del Potosí. El asiento de Rodríguez Deivas que debía prolongarse hasta 1623, cesó por su muerte acaecida en 1622; y en todo el tiempo de su duración introdujéronse en América veinte y nueve mil quinientos setenta y cuatro negros según consta de los libros de la Casa de Contratación de Sevilla<ref>{{May|Veytia}}, ''Norte de Contratación'', lib. 1, cap. 35, número 14.</ref>. {{Anclaje+|p31|Esta, fenecido que hubo aquel}}, volvió a encargarse de la provisión de negros, y los contratos que hizo con algunos negociantes para que los llevasen a Indias llamáronse ''avenzas'', abreviación de la palabra ''avenencias''. Cuando el precio de los permisos concedidos se había de pagar en Sevilla, fijóse en treinta ducados por cabeza, y en veinte reales el derecho que se llamaba de aduanilla. pero si el pago se había de hacer en Indias, entonces los ducados eran cuarenta, y la ''aduanilla'' treinta reales. Además debía pagarse por separado un derecho en América y otro para Portugal en el caso que los esclavos se sacasen de los dominios de esta nación <ref>{{May|Veytia}}, ''Norte de Contratación'', lib. 1, cap. 35, pág. 8.</ref>. {{np}}<noinclude></noinclude> p9uahx0m3yn00x45l6iteiq1jpj919t 102 419007 1664840 2026-06-17T21:21:29Z Elultimolicantropo 36540 /* Corregido */ 1664840 proofread-page text/x-wiki <noinclude><pagequality level="3" user="Elultimolicantropo" /></noinclude>{{Anclaje+|p32|Por Real Cédula de 13 de Octubre de 1622, permitióse que de Lisboa pudieran exportarse negros para las Indias, con tal que fuesen registrados en Sevilla; pero esto hubo de ser de corta duración, porque en Agosto de 1623 celebróse nuevo asiento por ciento veinte mil ducados al año con el portugués Manuel Rodríguez Lamego. Las condiciones pactadas fueron semejantes a las de los otros, excepto que había de durar ocho años, cuyo plazo, por una retrotracción de tiempo que también se hizo en otros casos, empezaría a contarse desde 1°. de Mayo de 1622, terminando el 30 de Abril de 1630. Convínose también en que si las licencias que podía vender el asentista, no las pagaba en España sino en Indias, su precio en vez de treinta ducados, fuesen cuarenta, y los veinte reales de aduanilla treinta. Pero como la Casa de Contratación, antes de haberse ajustado asiento con Lamego en 1623, había vendido algunas licencias, púsose cláusula expresa para que estas fuesen recibidas si se habían despachado hasta 19 de Julio de 1622. {{Anclaje+|p32|La muchedumbre de negros esclavos}} introducidos en América y la facilidad con que se libertaban, ya por la generosidad de sus amos, ya por la protección de las leyes, fueron causa de que hubisese muchos libres de color que vivían sin oficios y en completa ociosidad. Para evitar tan graves males, había Felipe III mandado desde 1602, que los holgazanes trabajasen en las minas por un salario, en las que también se emplearían los conde-<noinclude></noinclude> mp2b4775vmuqwrs2ywlgxxq9hg8261m 1664841 1664840 2026-06-17T21:22:49Z Elultimolicantropo 36540 1664841 proofread-page text/x-wiki <noinclude><pagequality level="3" user="Elultimolicantropo" /></noinclude>{{Anclaje+|p32|Por Real Cédula de 13 de Octubre de 1622}}, permitióse que de Lisboa pudieran exportarse negros para las Indias, con tal que fuesen registrados en Sevilla; pero esto hubo de ser de corta duración, porque en Agosto de 1623 celebróse nuevo asiento por ciento veinte mil ducados al año con el portugués Manuel Rodríguez Lamego. Las condiciones pactadas fueron semejantes a las de los otros, excepto que había de durar ocho años, cuyo plazo, por una retrotracción de tiempo que también se hizo en otros casos, empezaría a contarse desde 1°. de Mayo de 1622, terminando el 30 de Abril de 1630. Convínose también en que si las licencias que podía vender el asentista, no las pagaba en España sino en Indias, su precio en vez de treinta ducados, fuesen cuarenta, y los veinte reales de aduanilla treinta. Pero como la Casa de Contratación, antes de haberse ajustado asiento con Lamego en 1623, había vendido algunas licencias, púsose cláusula expresa para que estas fuesen recibidas si se habían despachado hasta 19 de Julio de 1622. {{Anclaje+|p33|La muchedumbre de negros esclavos}} introducidos en América y la facilidad con que se libertaban, ya por la generosidad de sus amos, ya por la protección de las leyes, fueron causa de que hubisese muchos libres de color que vivían sin oficios y en completa ociosidad. Para evitar tan graves males, había Felipe III mandado desde 1602, que los holgazanes trabajasen en las minas por un salario, en las que también se emplearían los conde-<noinclude></noinclude> 74bjeilpz8e9r16bp6ptsmyibznl5dv 102 419008 1664842 2026-06-17T21:26:26Z Elultimolicantropo 36540 /* Corregido */ 1664842 proofread-page text/x-wiki <noinclude><pagequality level="3" user="Elultimolicantropo" /></noinclude>nados por delitos a prestar algún servicio: y fuera de la comida y vestido, lo que diesen los mineros por el trabajo de los así condenados se aplicase a la Real Hacienda<ref>''Recop. de Leyes de Indias'', lib. 7, tit. 5, ley 4.</ref>. Pero si la ley no dejó impunes a los malos negros y mulatos libres, justa y benévola fué con los buenos, pues recomendó a los gobernadores en 1.623, que mirasen por su buen tratamiento, y que a los empleados en la milicia les hiciesen guardar sus preeminencias <ref>Id., lib. 7, tit. 5, leyes 10 y 11.</ref> Movido Felipe IV de iguales deseos, ordenó en 21 de Julio del mismo año del mismo año que se reprimiesen las demasías e insolencias de los rancheros y que se cumpliese la ley que transcribo : 'Los rancheadores nombrados por las Justicias para ranchear Negros cimarrones, entran con ese título en las casas de los Morenos horros de la Isla de Cuba y otras partes, así en Cuidades como en estancias, donde hacen sus labranzas quietos y pacíficos, y sin poderlos resistir les hacen muchas extorciones, y molestias, con grande libertad, de dia y noche, llevándose los caballos, bestias de servicio, y otras cosas necesrarias á sus labranzas: Mandamos á los Gobernadores, que provean de remedio conveniente á los daños referidos, y hagan justicia á los morenos, para que no reciban ninguna molestia ni vexación de los rancheadores <ref>''Recop. de Leyes de Indias'', lib. 7, tit. 5, ley 19.</ref>". {{np}}<noinclude></noinclude> 5rcv6xxwoe1oi7yhga5kueort07hrp1 102 419009 1664843 2026-06-17T21:33:16Z Sucdemagrana 49771 /* Corregido */ 1664843 proofread-page text/x-wiki <noinclude><pagequality level="3" user="Sucdemagrana" />{{cp|52|{{may|{{Corr|pfrimera|primera}} parte}}|}}</noinclude>tos del microscopio de tal suerte que, un cuadro del micrómetro ocular cuadriculado, venga á tener rigurosamente un quinto del milímetro de extensión, es decir, 20 centésimas. Esta operación se efectuará fácilmente con ayuda del micrómetro objetivo, alargando ó acortando el tubo del microscopio hasta lograr la equivalencia deseada. Si afocamos ahora la célula y la miramos á través del micrómetro cuadriculado, tendremos en realidad la proyección de un cubo de un quinto de milímetro de lado. Con estos antecedentes, la operación de la numeración es ya sencillísima. Llena la célula de sangre diluida, cubierta de una laminilla bien plana, no resta sino contar, los glóbulos contenidos en el cuadrado del micrómetro ocular, con lo cual, dicho se está, que los habremos contado en un cubo de <math display="inline">\frac{1}{5}</math> de milímetro cúbico, se multiplicará el número de hematíes por 125 (relación entre un cubo de milímetro de lado y el quinto de un milímetro), y el producto por el título de la mezcla. El capilar de Malasez ha sido sustituído últimamente por este autor por una cámara ó célula análoga á la de Hayem, pero con algunas mejoras: 1.ª El cubre-objetos descansa sobre el extremo de unos tornillos que atraviesan el porta-objetos, pudiéndose apartar ó aproximar en cantidades rigurosamente conocidas. 2.ª La parte central del porta-objetos, que es de cristal, lleva un retículum ó micrómetro cuadriculado cuyos espacios tienen un valor conocido. 3.ª El cubre-objetos apoyado sobre los extremos de los tornillos está sujeto mediante un compresor. Ordinariamente, se dá al espesor de la célula la extensión de <math display="inline">\frac{1}{5}</math> de milímetro, lo mismo que á la anchura del retículo del porta-objetos con lo que las operaciones de numeración se verificarán exactamente lo mismo que con la célula de Hayem. No hay que advertir que llevando la misma célula el micrómetro, no hará falta el micrómetro ocular cuadriculado. 3.—'''Hematímetro de Hayem y Nachet'''. Consiste en la sustitución de la célula ordinaria de Hayem por una que lleva en su parte inferior un sistema de lentes que proyectan sobre el cubre-objetos una fotografía de un micrómetro cuadriculado, cuyos intervalos se nos<noinclude></noinclude> fsj2gqxz682lcvilrx5uedbqe7cp7y4 0 419010 1664868 2026-06-18T00:28:48Z Ignacio Rodríguez 3603 Ignacio Rodríguez trasladó la página [[El perro y el reflejo en el río]] a [[El perro y el trozo de carne]] 1664868 wikitext text/x-wiki #REDIRECCIÓN [[El perro y el trozo de carne]] gj1qqoetb2y6nytgbzleivfxi6ec4j8