Mercurial > hg > ltpda
diff m-toolbox/classes/@repogui2/cb_mainfigClose.m @ 0:f0afece42f48
Import.
author | Daniele Nicolodi <nicolodi@science.unitn.it> |
---|---|
date | Wed, 23 Nov 2011 19:22:13 +0100 |
parents | |
children |
line wrap: on
line diff
--- /dev/null Thu Jan 01 00:00:00 1970 +0000 +++ b/m-toolbox/classes/@repogui2/cb_mainfigClose.m Wed Nov 23 19:22:13 2011 +0100 @@ -0,0 +1,26 @@ +% 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 + +