comparison m-toolbox/classes/@repogui/cb_mainfigClose.m @ 0:f0afece42f48

Import.
author Daniele Nicolodi <nicolodi@science.unitn.it>
date Wed, 23 Nov 2011 19:22:13 +0100
parents
children
comparison
equal deleted inserted replaced
-1:000000000000 0:f0afece42f48
1 % CB_MAINFIGCLOSE close callback for repogui.
2 %
3 % M Hewitson 22-09-08
4 %
5 % $Id: cb_mainfigClose.m,v 1.3 2011/04/08 08:56:26 hewitson Exp $
6 %
7
8 function cb_mainfigClose(varargin)
9
10 mainfig = varargin{end};
11
12 if ~isempty(mainfig) && isa(mainfig.connection, 'database')
13 disp('* closing open database connection');
14 close(mainfig.connection);
15 end
16
17 % disp('* Goodbye from the LTPDA Repository Interface *')
18 delete(mainfig.handle)
19 delete(mainfig)
20
21 % delete 'ans' variable associated with this repogui
22 evalin('base', 'if exist(''ans'', ''var'') && isa(ans, ''repogui''), clear(''ans''); end');
23
24 end
25
26