Added summary and categories to recent change item.

modules/recent_changes/cms_recent_change_item.e

@@ -39,6 +39,12 @@ feature -- Access
 	source: READABLE_STRING_8
 			-- Source of Current event.
 
+	categories: detachable LIST [READABLE_STRING_GENERAL]
+			-- Optional categories (tags, terms) related to associated content.
+
+	summary: detachable READABLE_STRING_32
+			-- Optional summary related to associated content.		
+
 	information: detachable READABLE_STRING_8
 			-- Optional information related to Current event.
 			--| For instance: creation, trashed, modified, ...
@@ -60,12 +66,30 @@ feature -- Element change
 			end
 		end
 
+	set_summary (a_summary: like summary)
+			-- Set `summary' to `a_summary'.
+		do
+			summary := a_summary
+		end
+
 	set_information (a_info: like information)
 			-- Set `information' to `a_info'.
 		do
 			information := a_info
 		end
 
+	add_category (a_cat: READABLE_STRING_GENERAL)
+		local
+			cats: like categories
+		do
+			cats := categories
+			if cats = Void then
+				create {ARRAYED_LIST [READABLE_STRING_GENERAL]} cats.make (1)
+				categories := cats
+			end
+			cats.force (a_cat)
+		end
+
 feature -- Comparison
 
 	is_less alias "<" (other: like Current): BOOLEAN