From c37864bfddce26216fd52b846f427433f55acf16 Mon Sep 17 00:00:00 2001
From: Diego H <diego.hernangomezherrero@gmail.com>
Date: Fri, 10 Jun 2022 09:15:36 +0200
Subject: [PATCH] Send to CRAN

---
 README.md     |  4 ++--
 codemeta.json |  2 +-
 inst/CITATION | 12 +++++++-----
 3 files changed, 10 insertions(+), 8 deletions(-)

diff --git a/README.md b/README.md
index af318c65..39758647 100644
--- a/README.md
+++ b/README.md
@@ -195,8 +195,8 @@ the parameters available.
 
 To cite the ‘nominatimlite’ package in publications use:
 
-Hernangomez D (2022). *nominatimlite: Interface with Nominatim API
-Service*. <https://doi.org/10.5281/zenodo.5113195>,
+Hernangomez D (2022). nominatimlite: Interface with Nominatim API
+Service. <https://doi.org/10.5281/zenodo.5113195>,
 <https://dieghernan.github.io/nominatimlite/>
 
 A BibTeX entry for LaTeX users is
diff --git a/codemeta.json b/codemeta.json
index 13795942..e33bf5f6 100644
--- a/codemeta.json
+++ b/codemeta.json
@@ -212,7 +212,7 @@
   },
   "applicationCategory": "cartography",
   "keywords": ["r", "geocoding", "openstreetmap", "address", "nominatim", "reverse-geocoding", "rstats", "shapefile", "r-package", "spatial", "cran", "api-wrapper", "api", "gis"],
-  "fileSize": "215.392KB",
+  "fileSize": "215.399KB",
   "citation": [
     {
       "@type": "SoftwareSourceCode",
diff --git a/inst/CITATION b/inst/CITATION
index 599aaf13..f0079bba 100644
--- a/inst/CITATION
+++ b/inst/CITATION
@@ -1,7 +1,7 @@
 year <- format(Sys.time(), "%Y")
 abs <- trimws(gsub("\\s+", " ", meta$Description))
 abs <- gsub("'", "", abs)
-
+doi <- "10.5281/zenodo.5113195"
 
 bibentry(
   "Manual",
@@ -11,10 +11,12 @@ bibentry(
   year = year,
   key = "R-nominatimlite",
   version = meta$Version,
-  doi = "10.5281/zenodo.5113195",
+  doi = doi,
   url = unlist(strsplit(meta$URL, ","))[1],
   abstract = abs,
-  textVersion = paste0("Hernangomez D (",year,"). _nominatimlite: ",
-    gsub("'", "", meta$Title),"_. <https://doi.org/10.5281/zenodo.5113195>, <",
-    unlist(strsplit(meta$URL, ","))[1],">")
+  textVersion = paste0(
+    "Hernangomez D (", year, "). nominatimlite: ",
+    gsub("'", "", meta$Title), ". <https://doi.org/", doi, ">, <",
+    unlist(strsplit(meta$URL, ","))[1], ">"
+  )
 )