PRO qRemoteView_Kill, state, event

;+
; NAME:
;	qRemoteView_Kill
; PURPOSE:
;	Template used to document IDL code
; CATEGORY:
;	Widgets: qRemoteView
; CALLING SEQUENCE:
;	qRemoteView_Kill, state, event
; INPUTS:
;	state		array[1]; type: structure
;					qRemoteView state structure
;	event			array[1]; type: structure
;						event structure from kill request
; OUTPUTS:
;	(none)
; INCLUDE:
	@compile_opt.pro		; On error, return to caller
; 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)
;-

CASE IsType(state, /structure) OF
0: message, /info, 'state structure unavailable'
1: BEGIN
	widget_control, state.wid_matrix, get_uvalue=ptrs
	IF IsType(ptrs, /defined) THEN ptr_free, ptrs

	widget_control, state.wid_calc, get_uvalue=ptrs
	IF IsType(ptrs, /defined) THEN ptr_free, ptrs
END
ENDCASE

widget_control, event.top, /destroy

RETURN  &  END