Mercurial > hg > ltpda
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 |