Index: /issm/trunk/src/m/classes/public/plot/plot_tensor.m
===================================================================
--- /issm/trunk/src/m/classes/public/plot/plot_tensor.m	(revision 741)
+++ /issm/trunk/src/m/classes/public/plot/plot_tensor.m	(revision 742)
@@ -15,9 +15,9 @@
 
 %Figure out tensor type:
-if strcmpi(type(1:6),'strain'),
+if strncmpi(type,'strain',6),
 	tensor=md.strainrate;
-elseif strcmpi(type(1:6),'stress'),
+elseif strncmpi(type,'stress',6),
 	tensor=md.stress;
-elseif strcmpi(type(1:16),'deviatoricstress'),
+elseif strncmpi(type,'deviatoricstress',16),
 	tensor=md.deviatoricstress;
 else
@@ -26,11 +26,11 @@
 
 %Figure out type of plot being requested
-if strcmpi(type(end-5:end),'tensor') | strcmpi(type,'strainrate') | strcmpi(type,'deviatoricstress') | strcmpi(type,'stress'),
+if strncmpi(fliplr(type),fliplr('tensor'),6) | strcmpi(type,'strainrate') | strcmpi(type,'deviatoricstress') | strcmpi(type,'stress'),
 	plot_tensor_components(md,options_structure,width,i,tensor,type,plot_options);
 	return;
-elseif strcmpi(type(end-8:end),'principal'),
+elseif strncmpi(fliplr(type),fliplr('principal'),9),
 	plot_tensor_principal(md,options_structure,width,i,tensor,type,plot_options);
 	return;
-elseif strcmpi(type(end-13:end-1),'principalaxis'),
+elseif strncmpi(fliplr(type(1:end-1)),fliplr('principalaxis'),13),
 	plot_tensor_principalaxis(md,options_structure,width,i,tensor,type,plot_options);
 	return;