--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/m-toolbox/m/gui/ltpdv/callbacks/ltpdv_server_get_times.m	Wed Nov 23 19:22:13 2011 +0100
@@ -0,0 +1,43 @@
+function tss = ltpdv_server_get_times(mainfig)
+
+
+% Do we have a list?
+lh = findobj(mainfig, 'Tag', 'LTPDVtimesList');
+tlist = getappdata(mainfig, 'TimesList');
+
+if isempty(tlist)
+   
+   % Get a single time from the entry boxes
+   start = ltpdv_server_get_start_time(mainfig);
+   stop = ltpdv_server_get_stop_time(mainfig);
+   
+   if start < 0 || stop < 0
+      error('### Please set a start and stop time or add some times to the list.');
+   end
+   
+   % Get comment
+   comm = ltpdv_server_get_comment(mainfig);
+   
+   % Make a timespan object
+   tss = timespan(plist('start', GPS2UTC(start), 'end', GPS2UTC(stop)));
+   if ~isempty(comm)
+      tss.setName(comm);
+   end
+   
+else
+  
+   % build a vector of timespan objects
+   tss = [];
+   for j=1:size(tlist,1)
+      t = tlist(j,:);
+      ts = timespan(plist('start', GPS2UTC(t{1}), 'end', GPS2UTC(t{2})));
+      if isempty(t{3})
+         ts.setName('None');
+      else
+         ts.setName(t{3});
+      end
+      tss = [tss ts];
+   end
+   
+   
+end