indexing
	description: "[
					This simple class represents clickable closeup options.
					See super classes for more functionality.

					This class is part of the XAE Extended Adventure Engine Project.
				  ]"
				  
	author: "Adrian Rabenseifner, radrian@student.ethz.ch"
	date: "$Date$"
	revision: "$Revision$"
	
class
	OPTION
inherit
	TRIGGER
create
	make

feature {NONE} -- Initialization

	make(ptext: STRING) is
			-- Initialize `Current'.
		do
			text := ptext
			init_action_list
		end

feature -- Access

	text: STRING

feature {NONE} -- Implementation

end -- class OPTION