remove comment in hMainFig = figure(... declaration for 'CloseRequestFcn', @QuitMenuCallback,...

add evalin('base','clear all') in quitProgram
clear base workspace just before quit, this is the only method
to clear NetCDF variables assign to base workspace with assignin

tsg_util/quitProgram.m

@@ -11,8 +11,8 @@ function quitProgram(DEFAULT_PATH_FILE, varargin)
 
 % $Id$
 
-% close windows
-% -------------
+% close all windows
+% -----------------
 for i=1:size(varargin,2)
   delete(varargin{i});
 end
@@ -31,4 +31,9 @@ rmpath( [DEFAULT_PATH_FILE filesep 'tsg_io'] );
 % --------------------------
 rehash;
 
+% clear base workspace just before quit, this is the only method
+% to clear NetCDF variables assign to base workspace with assignin
+% ----------------------------------------------------------------
+evalin('base','clear all');
+
 end
\ No newline at end of file

tsgqc.m

@@ -131,6 +131,7 @@ hMainFig = figure(...
    --------------------------------------
   'CloseRequestFcn', @QuitMenuCallback,...
   %}
+  'CloseRequestFcn', @QuitMenuCallback,...
   'HandleVisibility', handleVisibility,...
   'Visible','on',...
   'Tag','TAG_TSG-QC_GUI',...