modifed startmachine, to overwrite existing APPHOME

startmachine.m

 function startmachine(rootpath)
-global APPHOME
+global APPHOME MACHFS
 
 restoredefaultpath; % cancel previous startmachine.
 
@@ -27,6 +27,8 @@ set(0,'DefaultFigurePaperType','A4',...
 % current folder is APPHOME.
 setenv('APPHOME',rootpath);
 
+APPHOME=getenv('APPHOME'); % to overwrite existing APPHOME (ESRF->EBS test))
+MACHFS = [APPHOME '/..']; % for test ESRF->EBS
 if isempty(APPHOME), APPHOME=getenv('APPHOME'); end
 
 function optpath(varargin)