Index: /trunk/src/series.m
===================================================================
--- /trunk/src/series.m	(revision 1104)
+++ /trunk/src/series.m	(revision 1105)
@@ -1713,6 +1713,11 @@
             set(handles.OutputPath,'String',PathOut);
         end
-        %PathExpOut=fullfile(PathOut,get(handles.Experiment,'String'));
+        if get(handles.Replicate,'Value')
         PathExpOut=fileparts(ListPath{iexp});
+        PathExpDeviceOut=ListPath{iexp};
+        else
+            PathExpOut=fullfile(PathOut,get(handles.Experiment,'String'));
+            PathExpDeviceOut=fullfile(PathExpOut,get(handles.Device,'String'))
+        end
         if ~exist(PathExpOut,'dir')
             [tild,msg1]=mkdir(PathExpOut);
@@ -1722,6 +1727,4 @@
             end
         end
-        %PathExpDeviceOut=fullfile(PathExpOut,get(handles.Device,'String'));
-        PathExpDeviceOut=ListPath{iexp};
         if ~exist(PathExpDeviceOut,'dir')
             [tild,msg1]=mkdir(PathExpDeviceOut);