Testsuite: Only use hostname output up to first period "."

git-svn-id: https://svn.dealii.org/trunk@31995 0785d39b-7218-0410-832d-ea1e28bc413d

diff --git a/deal.II/cmake/scripts/run_testsuite.cmake b/deal.II/cmake/scripts/run_testsuite.cmake
index ffa6253e5bfb01dbca250b12405fe05d5973d0f0..12d259100faf6da4c2f25d8fa02d454a49e9ba80 100644 (file)
--- a/deal.II/cmake/scripts/run_testsuite.cmake
+++ b/deal.II/cmake/scripts/run_testsuite.cmake
@@ -235,6 +235,7 @@ MESSAGE("-- CTEST_CMAKE_GENERATOR:  ${CTEST_CMAKE_GENERATOR}")
 FIND_PROGRAM(HOSTNAME_COMMAND NAMES hostname)
 IF(NOT "${HOSTNAME_COMMAND}" MATCHES "-NOTFOUND")
   EXEC_PROGRAM(${HOSTNAME_COMMAND} OUTPUT_VARIABLE _hostname)
+  STRING(REGEX REPLACE "\\..*$" "" _hostname ${_hostname})
   SET(CTEST_SITE "${_hostname}")
 ELSE()
   # Well, no hostname available. What about: