[GRASS-SVN] r59597 - grass/branches/releasebranch_7_0/vector/v.to.db

[svn_grass at osgeo.org]

Author: mmetz
Date: 2014-04-06 01:21:03 -0700 (Sun, 06 Apr 2014)
New Revision: 59597

Modified:
   grass/branches/releasebranch_7_0/vector/v.to.db/areas.c
Log:
v.to.db: fix area perimeter

Modified: grass/branches/releasebranch_7_0/vector/v.to.db/areas.c
===================================================================
--- grass/branches/releasebranch_7_0/vector/v.to.db/areas.c	2014-04-06 08:20:34 UTC (rev 59596)
+++ grass/branches/releasebranch_7_0/vector/v.to.db/areas.c	2014-04-06 08:21:03 UTC (rev 59597)
@@ -40,7 +40,7 @@
 	if ((options.option == O_COMPACT) || (options.option == O_FD) ||
 	    (options.option == O_PERIMETER)) {
 	    Vect_get_area_points(Map, area_num, Ppoints);
-	    perimeter = Vect_line_geodesic_length(Ppoints);
+	    perimeter = Vect_get_area_perimeter(Map, area_num);
 	}
 
 	found = 0;