Jocelyn Fiat
e2c70e6d70
Renamed generator to follow *_FEED_GENERATOR naming. Renamed feed entry as feed item. Made FEED conforms to ITERABLE [FEED_ITEM] for convenience.
49 lines
733 B
Plaintext
49 lines
733 B
Plaintext
note
|
|
description: "[
|
|
Author of feed or feed entry.
|
|
- name and email information.
|
|
]"
|
|
date: "$Date$"
|
|
revision: "$Revision$"
|
|
|
|
class
|
|
FEED_AUTHOR
|
|
|
|
create
|
|
make
|
|
|
|
feature {NONE} -- Initialization
|
|
|
|
make (a_name: READABLE_STRING_GENERAL)
|
|
do
|
|
create name.make_from_string_general (a_name)
|
|
end
|
|
|
|
feature -- Access
|
|
|
|
name: IMMUTABLE_STRING_32
|
|
|
|
email: detachable READABLE_STRING_8
|
|
|
|
feature -- Element change
|
|
|
|
set_email (a_email: detachable READABLE_STRING_GENERAL)
|
|
do
|
|
if a_email = Void then
|
|
email := Void
|
|
elseif a_email.is_valid_as_string_8 then
|
|
email := a_email.as_string_8
|
|
else
|
|
email := Void
|
|
end
|
|
end
|
|
|
|
feature -- Visitor
|
|
|
|
accept (vis: FEED_VISITOR)
|
|
do
|
|
vis.visit_author (Current)
|
|
end
|
|
|
|
end
|