indexing
	cluster: "demangler"
	namespace: "candidate"
	description: "Edits a `SYNC_REPORT' objects."
	original_author: "Justin Finnerty"
	original_date: "Oct 2005"
	current_date: "$Date: 2005/10/31 07:19:34 $"
	current_author: "$Author: finnerty $"
	revision: "$Revision: 2.2 $"	
	-- $Log: 
	--

			-- Notes: [? ?] <=> [user_wants_action user_is_done]
			-- letters (A), (B) etc indicate choices for user. Choices 
			-- with * indicate "automatic" choices.
class REPORT_CONTROL
	-- Controls displaying a `SYNC_REPORT' object.

inherit
	KL_SHARED_STANDARD_FILES

	
feature {ANY}
	-- Procedure on object
	do_report (a_sync_report: SYNC_REPORT) is
			-- Display and perform all actions for this report
		require
			a_sync_report /= Void
		do
			a_sync_report.set_view (Current)
			a_sync_report.view.do_report
			a_sync_report.unset_view
		end
		
feature {SYNC_REPORT}
	-- Factory methods for creating viewer objects.
	
	get_general_viewer: REPORT_VIEW is
			-- Return the most general view object. These object may be
			-- reused.
		do
			-- TODO: Look at config to determine user interface...
			
			!TEXT_REPORT_VIEW!Result.make (70, std.output, std.input)
		end

	get_dirdup_viewer: REPORT_VIEW is
			-- Return the most general view object. These object may be
			-- reused.
		do
			-- TODO: Look at config to determine user interface...
			
			!TEXT_DIRDUP_VIEW!Result.make (70, std.output, std.input)
		end


end -- class REPORT_CONTROL
