From 0617a4891374ae37b2382635f2a86670c282ac76 Mon Sep 17 00:00:00 2001
From: Olivier Sauter <olivier.sauter@epfl.ch>
Date: Wed, 5 Jun 2019 08:08:22 +0000
Subject: [PATCH] fix machine in params to be lower case

git-svn-id: https://spcsvn.epfl.ch/repos/TCV/gdat/trunk@11976 d63d8f72-b253-0410-a779-e742ad2e26cf
---
 crpptbx/gdat.m | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/crpptbx/gdat.m b/crpptbx/gdat.m
index 15c07947..dfb5baf3 100644
--- a/crpptbx/gdat.m
+++ b/crpptbx/gdat.m
@@ -188,6 +188,10 @@ try
     args = [{shot,data_request},varargin_eff];
   end
   [gdat_data,gdat_params,error_status,varargout] = feval(['gdat_' lower(machine_eff)],args{:});
+  % because data request can be an actual detailed tree related signal, upper and lower case need to be kept, but other places remain with lower case when case insensitive
+  % needed since some substructure have machine name like mapping_for
+  gdat_data.gdat_params.machine = lower(gdat_data.gdat_params.machine);
+
 catch ME_gdat
   warning(['problems calling gdat_' lower(machine_eff)]);
   if ~exist('gdat_data','var'); gdat_data.data = []; end
-- 
GitLab