فهرست منبع

libgis: trivial sync to trunk

git-svn-id: https://svn.osgeo.org/grass/grass/branches/releasebranch_7_0@63539 15284696-431f-4ddb-bdfa-cd5b030d7da7
Markus Neteler 10 سال پیش
والد
کامیت
d1ba7aa72c
1فایلهای تغییر یافته به همراه7 افزوده شده و 2 حذف شده
  1. 7 2
      lib/gis/progrm_nme.c

+ 7 - 2
lib/gis/progrm_nme.c

@@ -1,9 +1,9 @@
 /*!
- * \file gis/progrm_nme.c
+ * \file lib/gis/progrm_nme.c
  *
  * \brief GIS Library - Program name
  *
- * (C) 2001-2009 by the GRASS Development Team
+ * (C) 2001-2014 by the GRASS Development Team
  *
  * This program is free software under the GNU General Public License
  * (>=v2). Read the file COPYING that comes with GRASS for details.
@@ -51,9 +51,14 @@ void G_set_program_name(const char *s)
 	    break;
 	}
     }
+
+    /* strip extension from program name */
     temp = G_store(s);
     G_basename(temp, "exe");
     G_basename(temp, "py");
     name = G_store(temp);
+
+    G_debug(1, "G_set_program_name(): %s", name);
+    
     G_free(temp);
 }