Changeset 1138

Timestamp:

06/26/09 14:50:40 (16 years ago)

Author:

Mathieu Morlighem

Message:

minor

File:

• issm/trunk/src/m/classes/public/parameterize.m (modified) (2 diffs)

issm/trunk/src/m/classes/public/parameterize.m

@@ -40 +40 @@
         system('rm TemporaryParameterFile.m');
 
-        %remove last error misleading
+        %copy error message
         me2=struct('message',me.message,'stack',me.stack);
-        me2.stack(end)=[];
 
         %rename parameter file
-        for i=1:length(me2.stack)
+        for i=1:length(me2.stack)-1,
                 if (length(me2.stack(i).file)>=24 & strcmp(me2.stack(i).file(end-23:end),'TemporaryParameterFile.m'))
                         me2.stack(i).file=[me2.stack(i).file(1:end-24) parametername];
@@ -51 +50 @@
                 if strcmp(me2.stack(i).name,'TemporaryParameterFile'),
                         me2.stack(i).name=parametername;
+                end
+                if strcmp(me2.stack(i).name,'parameterize'),
+                        %remove parameterize.m error "TemporaryParameterFile" misleading
+                        me2.stack(i)=[];
                 end
         end