Changeset 66983

Timestamp:

Nov 29, 2015, 12:49:41 PM (9 years ago)

Author:

jachym

Message:

Adding more generic support for -g flag in r3.info

File:

• grass/trunk/raster3d/r3.info/main.c (modified) (2 diffs)

grass/trunk/raster3d/r3.info/main.c

@@ -459 +459 @@
         }
         if (hflag->answer) {
-            if (hist_ok) {
+            if (hist_ok && !gflag->answer) {
                 fprintf(out, "Title:\n");
                 fprintf(out, "   %s\n", Rast_get_history(&hist, HIST_TITLE));
@@ -473 +473 @@
                 }
             }
+            else if (hist_ok && gflag->answer) {
+                fprintf(out, "title=");
+                fprintf(out, "\"%s\"\n", Rast_get_history(&hist, HIST_TITLE));
+                fprintf(out, "source1=");
+                fprintf(out, "\"%s\"\n", Rast_get_history(&hist, HIST_DATSRC_1));
+                fprintf(out, "source2=");
+                fprintf(out, "\"%s\"\n", Rast_get_history(&hist, HIST_DATSRC_2));
+                fprintf(out, "description=");
+                fprintf(out, "\"%s\"\n", Rast_get_history(&hist, HIST_KEYWRD));
+                if (Rast_history_length(&hist)) {
+                    for (i = 0; i < Rast_history_length(&hist); i++)
+                        fprintf(out, "comments_%d=", i);
+                        fprintf(out, "\"%s\"\n", Rast_history_line(&hist, i));
+                }
+            }
             else {
                 G_fatal_error(_("Error while reading history file"));