--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/m-toolbox/test/gui/gltpda_init.m	Wed Nov 23 19:22:13 2011 +0100
@@ -0,0 +1,33 @@
+function handlesout = glptda_init(handles)
+% GLTPDA_INIT Setup of various things at startup.
+% 
+% M Hewitson 15-02-07
+% 
+% $Id: gltpda_init.m,v 1.1 2007/03/12 13:00:31 hewitson Exp $
+
+
+settings = getappdata(handles.main, 'settings');
+
+
+%% Setup the analysis objects structure
+
+aos.objs    = [];
+aos.nobjs   = 0;
+aos.counter = 0;
+setappdata(handles.main, 'aos', aos);
+
+%% Set function list
+
+fcnlist = [];
+for j=1:length(settings.functions)
+  fcnlist = [fcnlist cellstr(settings.functions(j).call)];
+end
+
+set(handles.analysisList, 'String', fcnlist);
+
+
+%% Return new handles
+
+handlesout = handles;
+
+% END
\ No newline at end of file