;+
; NAME:
;	qImage_cw_Save
; PURPOSE:
;	Handles saving of image in image file
; CATEGORY:
;	sat/idl/widget/qimage_cw
; CALLING SEQUENCE:
	PRO qImage_cw_Save, state, event
; INPUTS:
; OPTIONAL INPUT PARAMETERS:
; OUTPUTS:
; OPTIONAL OUTPUT PARAMETERS:
; INCLUDE:
	@compile_opt.pro		; On error, return to caller
; CALLS:
;	IsType
; PROCEDURE:
; MODIFICATION HISTORY:
;	JUL-2005, Paul Hick (UCSD/CASS; pphick@ucsd.edu)
;-

widget_control, state.wid_save, set_button=0

IF widget_info(state.wid_draw, /valid_id) THEN BEGIN
	filename = qImage_cw_property(state,/image_name)
	filename = GetFileSpec(GetFileSpec(filename,part='name'),part='name')

	widget_control, event.handler, sensitive=0
	qSave2File, group=event.handler, wid_save=state.wid_draw, filename=filename, /block, /is_window
	widget_control, event.handler, sensitive=1
ENDIF

RETURN  &  END