host_name string definition too short (for some people)

[Axel]

hi!

i just came across a case where the host_name array could not
hold the string returned by m_hostnm. this may help some people
that see mysterious crashes of cp2k right at startup.

i suggest the following workaround:

Index: src/environment.F
===================================================================
RCS file: /cvsroot/cp2k/cp2k/src/environment.F,v
retrieving revision 1.149
diff -u -u -r1.149 environment.F
--- src/environment.F   6 Sep 2007 14:36:53 -0000       1.149
+++ src/environment.F   13 Sep 2007 23:58:12 -0000
@@ -156,7 +156,7 @@
 !   *** Local variables ***

     CHARACTER(LEN=default_path_length) :: cwd
-    CHARACTER(LEN=30)                  :: host_name,string,user_name
+    CHARACTER(LEN=50)                  :: host_name,string,user_name
     CHARACTER(LEN=26)                  :: datx
     INTEGER                            ::
ipe,istat,l,my_output_unit,pid,&
                                           strstart,strend

cheers,
   axel.