indexing
	description: "My password message"
	author: "Rafael Bischof <rafael@xanis.ch>"
	date: "$Date$"
	revision: "$Revision$"

class
	O_USER_MY_PASSWORD_MESSAGE

inherit
	O_USER_SESSION_MESSAGE
		redefine
			type
		end

create
	make

create {O_MESSAGE_FACTORY}
	make_from_generic

feature -- Access

	type: STRING is
			-- Type of the message.
		once
			Result := user_my_password_type
		end

end