Filter; is the geometry function meaningless? Return hex?

klutometis · Dec 1, 2011 · 6fc236e · 6fc236e
1 parent c8bd4ad
commit 6fc236e
Showing 1 changed file with 8 additions and 6 deletions.
diff --git a/src/shp_to_map/core.clj b/src/shp_to_map/core.clj
@@ -44,12 +44,14 @@ function itself."
                                   (.write writer
                                           (feature-geometry feature)))
                              name (feature-name feature)]
-                         (assoc name->geometries
-                           name
-                           (cons hex
-                                 (get name->geometries
-                                      name
-                                      '())))))
+                         (if (feature-filter feature)
+                           (assoc name->geometries
+                             name
+                             (cons hex
+                                   (get name->geometries
+                                        name
+                                        '())))
+                           name->geometries)))
                     name->geometries
                     (.toArray
                      (.getFeatures