sub on_click_richtext_preview_close {

	my($self,$event) = @_;

	$self->Destroy;

}