source: issm/oecreview/Archive/16133-16554/ISSM-16339-16340.diff@ 16556

../trunk-jpl/src/m/shp/shpread.m

@@ -28 +28 @@
 shp=shaperead(filename);
 
 Struct=struct([]);
+fields=fieldnames(shp);
 for i=1:length(shp),
         if strcmpi(shp(i).Geometry,'Polygon'),
                 x=shp(i).X'; y=shp(i).Y';
@@ -44 +45 @@
                 else
                         Struct(end).name='';
                 end
+                for j=1:length(fields),
+                        field=fields{j};
+                        if ~(strcmpi(field,'X') | strcmpi(field,'Y') | strcmpi(field,'id')),
+                                Struct(end).(field)=shp(i).(field);
+                        end
+                end
         end
 end