tmp->primero = NULL;
if (filename != NULL) {
+ PERR("Voy a cargar de un XML");
document = xmlReadFile(filename, "ISO-8859-1",0);
if (document == NULL) {
free(tmp);
xmlFreeDoc(document);
xmlCleanupParser();
} else {
+ PERR("Voy a recuperar desde un archivo");
tmp->fp = emufs_abrir("facturas");
+ if (tmp->fp == NULL) {
+ PERR("No se pudo cargar archivo de facturas!");
+ free(tmp);
+ lst_facturas = NULL;
+ return NULL;
+ }
tmp->fp_texto = emufs_abrir("notas");
+ if (tmp->fp_texto == NULL) {
+ PERR("No se pudo cargar archivo de notas!");
+ emufs_destruir(tmp->fp);
+ free(tmp);
+ lst_facturas = NULL;
+ return NULL;
+ }
/* Ahora trato de recuperar la info */
indices = emufs_idx_get(tmp->fp, &indices_cant);