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
