note
	description: "Wrapper for NSFontPanel."
	author: "Daniel Furrer"
	date: "$Date$"
	revision: "$Revision$"

class
	NS_FONT_PANEL

inherit
	NS_PANEL

create
	shared_font_panel
create {NS_OBJECT}
	share_from_pointer

feature {NONE} -- Creation

	shared_font_panel
		do
			share_from_pointer (font_panel_shared_font_panel)
		end

feature -- Objective-C implementation

	frozen font_panel_shared_font_panel: POINTER
		external
			"C inline use <Cocoa/Cocoa.h>"
		alias
			"return [NSFontPanel sharedFontPanel];"
		end

end