[GRASS-SVN] r29455 - grass/trunk/raster/r.drain

[svn_grass at osgeo.org]

Author: hamish
Date: 2007-12-16 22:09:29 -0500 (Sun, 16 Dec 2007)
New Revision: 29455

Modified:
   grass/trunk/raster/r.drain/main.c
Log:
write G_command_history()


Modified: grass/trunk/raster/r.drain/main.c
===================================================================
--- grass/trunk/raster/r.drain/main.c	2007-12-16 23:58:25 UTC (rev 29454)
+++ grass/trunk/raster/r.drain/main.c	2007-12-17 03:09:29 UTC (rev 29455)
@@ -77,6 +77,7 @@
     char map_name[GNAME_MAX], *map_mapset, new_map_name[GNAME_MAX];
     char *tempfile1, *tempfile2;
     char *search_mapset;
+    struct History history;
 
     struct Cell_head window;
     struct Option *opt1, *opt2, *coordopt, *vpointopt;
@@ -433,6 +434,11 @@
 
     /* close files and free buffers */
     G_close_cell(new_id);
+
+    G_short_history(new_map_name, "raster", &history);
+    G_command_history(&history);
+    G_write_history(new_map_name, &history);
+
     close(fe);
     close(fd);