indexing

	description: "[

		black arrow cursor with a small square

	]"
	date: "$Date$"
	revision: "$Revision$"

class CLOSE_POLY_CURSOR

inherit

	MOUSE_CURSOR

create

	make

feature -- Initialization

	make is
			-- sets `image'
		do
			make_from_file ("./image/close.gif")
			offset_x := 3
			offset_y := 0
		end

	id: INTEGER is 7

end