Create subgroup directories

git-svn-id: https://svn.osgeo.org/grass/grass/trunk@31416 15284696-431f-4ddb-bdfa-cd5b030d7da7

lib/imagery/fopen.c

@@ -74,6 +74,10 @@ I_fopen_subgroup_file_new (
     FILE *fd;
     char element[GNAME_MAX*2];
 
+    /* create subgroup directory */
+    sprintf(element, "%s/subgroup/%s", group, subgroup);
+    G__make_mapset_element_misc("group", element);
+
     /* get subgroup element name */
     sprintf (element, "subgroup/%s/%s", subgroup, file);
 
@@ -95,6 +99,10 @@ I_fopen_subgroup_file_append (
     FILE *fd;
     char element[GNAME_MAX*2];
 
+    /* create subgroup directory */
+    sprintf(element, "%s/subgroup/%s", group, subgroup);
+    G__make_mapset_element_misc("group", element);
+
     /* get subgroup element name */
     sprintf (element, "subgroup/%s/%s", subgroup, file);