diff --git a/DESCRIPTION b/DESCRIPTION index b3c5958..2e4a788 100755 --- a/DESCRIPTION +++ b/DESCRIPTION @@ -1,7 +1,7 @@ Package: lingtypology Type: Package Title: Linguistic Typology and Mapping -Version: 1.1.15 +Version: 1.1.16 Depends: R (>= 3.5.0) Imports: leaflet, diff --git a/NEWS b/NEWS index 6a7d3ff..caa979a 100755 --- a/NEWS +++ b/NEWS @@ -1,3 +1,6 @@ +lingtypology 1.1.16 +- fix not empty popup display whith minicharts + lingtypology 1.1.14 - update glottolog to v. 4.8 diff --git a/R/map.feature.R b/R/map.feature.R index b5e69f2..60e35bc 100644 --- a/R/map.feature.R +++ b/R/map.feature.R @@ -823,7 +823,9 @@ map.feature <- function(languages, tables <- do.call(paste, df_args) } - mapfeat.df$link <- paste0(mapfeat.df$link, tables) + if(popup == ""){ + mapfeat.df$link <- paste0(mapfeat.df$link, tables) + } m <- m |> leaflet::addCircleMarkers( lng = mapfeat.df$long,