note
	description: "A workitem that is revisioned in some form."
	author: "$Author$"
	date: "$Date$"
	revision: "$Revision$"

deferred class
	WI_REVISIONED

	inherit
		WI_WORKITEM

--	make (a_project_id: INTEGER;
--		  a_user_id: INTEGER; a_workitem_reference: STRING; a_title: STRING;
--		  a_revision: INTEGER; a_diff: STRING)
--		do
--			-- Precursor
--			make_wi (a_project_id, a_user_id, a_workitem_reference, a_title)

--			revision := a_revision
--			diff := a_diff
--		end

feature --Access

	revision: STRING
		-- The current revision
	diff: STRING
		-- UNIX diff between the current and the last but revision.

end