fix compatibility issues (R2014b)

private/close_all.m

@@ -14,6 +14,9 @@ function close_all
 % $Revision$
 %
 % $Log$
+% Revision 4.8  2009/03/24 08:36:04  marwan
+% copyright address updated
+%
 % Revision 4.7  2004/11/10 07:04:28  marwan
 % initial import
 %
@@ -37,5 +40,5 @@ global  props
   end
   try, set(0,'UserData',root_ud,props.root), end
   
-  clear all
+  %clear all % does not work since MATLAB 2014
   disp('Thank you for using CRP toolbox.')

private/show_crp.m

@@ -14,6 +14,9 @@ function show_crp(X,Shuttle)
 % $Revision$
 %
 % $Log$
+% Revision 4.15  2014/10/06 07:18:41  marwan
+% bug in colorbar scaling fixed
+%
 % Revision 4.14  2009/03/24 08:36:04  marwan
 % copyright address updated
 %
@@ -118,7 +121,7 @@ NY=size(X,1);
   b2=get(h1,'position');
   b3=get(h1,'ticklength');
 
-  set(h1,'ticklength',[b3(1)/2 b3(2)])
+  %set(h1,'ticklength',[b3(1)/2 b3(2)]) % does not work since MATLAB 2014b
   titletext=sprintf('%s \n',[Shuttle.txt_cross,'Distance Matrix'],...
           ['Dimension: ', num2str(Shuttle.m), ',  Delay: ', num2str(Shuttle.t)]);
  

private/smart_close.m

@@ -14,6 +14,9 @@ function smart_close(hCRP,hCtrl)
 % $Revision$
 %
 % $Log$
+% Revision 4.8  2009/03/24 08:36:04  marwan
+% copyright address updated
+%
 % Revision 4.7  2004/11/10 07:04:29  marwan
 % initial import
 %
@@ -42,5 +45,5 @@ if ~isempty(h1)
   end
   try, set(0,'UserData',root_ud,props.root), end
   
-  clear all
+  %clear all % does not work since MATLAB 2014
 end