From 1a4dccad2ba993a17a70f228b2043ace9131742e Mon Sep 17 00:00:00 2001
From: Olivier Sauter <olivier.sauter@epfl.ch>
Date: Thu, 3 Nov 2016 16:50:34 +0000
Subject: [PATCH] take env hostname to have rzg and check better default
machine
git-svn-id: https://spcsvn.epfl.ch/repos/TCV/gdat/trunk@6702 d63d8f72-b253-0410-a779-e742ad2e26cf
---
crpptbx/gdat.m | 3 +--
1 file changed, 1 insertion(+), 2 deletions(-)
diff --git a/crpptbx/gdat.m b/crpptbx/gdat.m
index 52ff9dfa..b80bb3eb 100644
--- a/crpptbx/gdat.m
+++ b/crpptbx/gdat.m
@@ -82,8 +82,7 @@ default_machine = 'tcv';
if ~isempty(fusion_machine_defaultname)
default_machine = lower(fusion_machine_defaultname);
else
- [s,hostname]=unix('hostname -a');
- if s || isempty(hostname), hostname=getenv('HOSTNAME');end
+ hostname=getenv('HOSTNAME');
if ~isempty(regexpi(hostname,'epfl'))
default_machine = 'tcv';
elseif ~isempty(regexpi(hostname,'rzg.mpg'))
--
GitLab