Usuario:BotWikisource/Asistente/códigos/Traslados de títulos y catg

De Wikisource, la biblioteca libre.

beta

#  -*- coding: utf-8  -*-
#traslada títulos de los capítuloa,categoría y versión para imprimir
import wikipedia,re,Ayudante
es_site=(wikipedia.Site("es","wikisource"))
log=u"[[Usuario:BotWikisource/Asistente|Asistente]]:Trasladando Catg y Documentos"
cat=u'Misterio'
new=u'Misterio (Bazán)'



'''

ap=wikipedia.Page(es_site, Documento)

texto=ap.get()

cat=u'Category:%s'%cat
cat=catlib.Category(es_site,cat)
m= cat.articles()
'''
m=Ayudante.ArticulosCat(es_site,cat)

indice=[]
for i in m:
    a=u'%s'%i.title()
    if re.search(u":",a):
        
#---abro página original
        ap=wikipedia.Page(es_site, a)
        texto=ap.get()
    
#---cambio catg por la actual
        salida=Ayudante.CambioCatg(texto,cat,new)
        
#---grabo nueva página
        NuevaPagina=u'%s:%s'%(new,a.split(u":")[1])
        indice.append(NuevaPagina)
        apnew=wikipedia.Page(es_site, NuevaPagina)
        apnew.put(salida,log)
        print u"Ha creado la [[%s]]" %NuevaPagina
        
#---cuelgo cartel de borrado en la antigua
        salida=u'{{Destruir|trasladada a un nuevo título}}'
        ap.put(salida,log)


################################################    
#---crear nueva versión para imprimir
salida=u"{{versión para imprimir|%s}}" %new
PagImprimir=u'%s (Versión para imprimir)'% (new)
for u in indice:
    salida+=u'{{%s}}\n'%u
ap=wikipedia.Page(es_site, PagImprimir)
ap.put(salida,log)
    #--elimino antigua versión
PagImprimir=u'%s (Versión para imprimir)\n'% (cat)
ap=wikipedia.Page(es_site, PagImprimir)
salida=u'{{Destruir|trasladada a un nuevo título}}'
ap.put(salida,log)