Add check for properties in GeoJSON objects

Author: aoles

NEWS

@@ -5,6 +5,7 @@ BUG FIXES and IMPROVEMENTS
 * Fixed [rstudio/crosstalk#58](https://github.com/rstudio/crosstalk/issues/58), which caused Leaflet maps that used Crosstalk shared data in Shiny apps, to be redrawn at incorrect times.
 * Upgrade leaflet-provider to 1.4.0, enable more map variants such as CartoDB.Voyager (#567)
 * `sf` objects with `names` attributes in the `st_geometry` now visualise correctly (#595)
+* GeoJSON objects missing `properties` can now be displayed (#622)
 
 
 

inst/htmlwidgets/leaflet.js

@@ -1779,7 +1779,7 @@ methods.addGeoJSON = function (data, layerId, group, style) {
         featureId: feature.id,
         properties: feature.properties
       };
-      var popup = feature.properties.popup;
+      var popup = feature.properties ? feature.properties.popup : null;
       if (typeof popup !== "undefined" && popup !== null) layer.bindPopup(popup);
       layer.on("click", mouseHandler(self.id, layerId, group, "geojson_click", extraInfo), this);
       layer.on("mouseover", mouseHandler(self.id, layerId, group, "geojson_mouseover", extraInfo), this);

javascript/src/methods.js

@@ -591,7 +591,7 @@ methods.addGeoJSON = function(data, layerId, group, style) {
         featureId: feature.id,
         properties: feature.properties
       };
-      let popup = feature.properties.popup;
+      let popup = feature.properties ? feature.properties.popup : null;
       if (typeof popup !== "undefined" && popup !== null) layer.bindPopup(popup);
       layer.on("click", mouseHandler(self.id, layerId, group, "geojson_click", extraInfo), this);
       layer.on("mouseover", mouseHandler(self.id, layerId, group, "geojson_mouseover", extraInfo), this);