function g_WindlengthCallback(hObject,varargin)
   
   global params
   
   currParamID    = get(hObject,'UserData');
   selectedWind   = params.params(currParamID).val.type;
   currWindLength = str2double(get(hObject,'String'));
   
   
   if strcmp(selectedWind,'Kaiser')
      windobj = specwin(selectedWind,currWindLength, params.params(currParamID).val.psll);
   else
      windobj = specwin(selectedWind,currWindLength);
   end
   
   params=pset(params,params.params(currParamID).key,windobj);
   
   set(findobj('Tag','apply'),'Enable','on');
   set(findobj('Tag','undo'),'Enable','on');
   
end