pro qSkyImage_Kill, state, event
;+
; NAME:
;	qSkyImage_Kill
; PURPOSE:
;	Template used to document IDL code
; CATEGORY:
;	Widgets: qSkyImage
; CALLING SEQUENCE:
;	qSkyImage_Kill, state, event
; INPUTS:
;	state		array[1]; type: structure
;					qSkyImage state structure
;	event			array[1]; type: structure
;						event structure from kill request
; OUTPUTS:
;	(none)
; CALLS:
;	IsType
; SIDE EFFECTS:
;	Destroys the heap variables for all data cubes
; PROCEDURE:
;	The user value of state.wid_matrix contains an array of pointers to
;	all loaded data cubes.
; STATE INFO USED:
;	widget_control, state.wid_matrix, get_uvalue=ptrs
; MODIFICATION HISTORY:
;	MAY-2000, Paul Hick (UCSD/CASS; pphick@ucsd.edu)
;-
on_error, 2							; On error, return to caller

COMPILE_OPT hidden

if IsType(state, /structure) then begin
	widget_control, state.wid_matrix, get_uvalue=ptrs
	if n_elements(ptrs) ne 0 then ptr_free, ptrs

	widget_control, state.wid_calc, get_uvalue=ptrs
	if n_elements(ptrs) ne 0 then ptr_free, ptrs
endif else	$
	message, /info, 'state structure unavailable'

widget_control, event.top, /destroy

return  &  end