fix for recursive cleaning

- make sure projected fixed points are passed to preserve fixed points in the smoothing operation
- avoid repeating cleaning in an infinite loop by not calling when the triangulation is unchanged

@msh/msh.m

@@ -1197,18 +1197,22 @@ function plotter(cmap,round_dec,yylabel,apply_pivot)
             qual = [mq_m,mq_l3sig,mq_l];
             LTn = size(obj.t,1);
 
-            if mq_l < opt.mqa && (opt.ds || LT ~= LTn)
+            if mq_l < opt.mqa && LT ~= LTn
                 % Need to clean it again
                 disp('Poor or overlapping elements, cleaning again')
                 disp(['(Min Qual = ' num2str(mq_l) ')'])
                 % repeat without projecting (already projected)
-                ii = find(strcmp(varargino,'proj'));
+                ii = find(strcmp(varargino,'proj'), 1);
                 if ~isempty(ii)
                     varargino{ii+1} = 0;
                 else
                     varargino{end+1} = 'proj';
                     varargino{end+1} = 0;
                 end
+                ii = find(strcmp(varargino,'pfix'), 1);
+                if ~isempty(ii)
+                    varargino{ii+1} = pfixV;
+                end
                 obj = clean(obj,varargino(:));
             elseif opt.nscreen
                 disp(['number of nodes is ' num2str(length(obj.p))])