Index: /issm/trunk-jpl/src/m/shp/shpwrite.m
===================================================================
--- /issm/trunk-jpl/src/m/shp/shpwrite.m	(revision 16717)
+++ /issm/trunk-jpl/src/m/shp/shpwrite.m	(revision 16718)
@@ -14,8 +14,11 @@
 count=0;
 
-
 contours=struct([]);
 for i=1:length(shp),
-	contours(i).Geometry='Polygon';
+	if strcmpi(shp(i).Geometry,'Point'),
+		contours(i).Geometry='Point';
+	else strcmpi(shp(i).Geometry,'Polygon'),
+		contours(i).Geometry='Polygon';
+	end
 	contours(i).id=i;
 	contours(i).X=shp(i).x;