view m-toolbox/classes/@repogui2/cb_mainfigClose.m @ 1:2014ba5b353a database-connection-manager

Remove old code
author Daniele Nicolodi <nicolodi@science.unitn.it>
date Sat, 03 Dec 2011 18:13:55 +0100
parents f0afece42f48
children
line wrap: on
line source

% CB_MAINFIGCLOSE close callback for repogui2.
% 
% M Hewitson 22-09-08
% 
% $Id: cb_mainfigClose.m,v 1.3 2011/04/08 08:56:36 hewitson Exp $
% 

function cb_mainfigClose(varargin)
  
  mainfig = varargin{end};
  
  if ~isempty(mainfig) && isa(mainfig.connection, 'database')
    disp('* closing open database connection');
    close(mainfig.connection);
  end
  
  disp('* Goodbye from the LTPDA Repository Interface *')
  delete(mainfig.handle)
  delete(mainfig)
  
  % delete 'ans' variable associated with this repogui
  evalin('base', 'if exist(''ans'', ''var'') && isa(ans, ''repogui2''), clear(''ans''); end');
    
end