From: Daniel W. <dm...@lu...> - 2012-11-24 03:13:01
|
diffing dir... Fri Jun 10 00:55:56 BST 2011 Daniel Wagner <da...@wa...> * bind to the gtk_entry_new_with_buffer function Ignore-this: 371643b493db38d100f89399874da2b hunk ./gtk/Graphics/UI/Gtk/Entry/Entry.chs 55 + entryNewWithBuffer, hunk ./gtk/Graphics/UI/Gtk/Entry/Entry.chs 192 +-- | Creates a new 'Entry' widget backed by a particular 'EntryBuffer'. One +-- buffer can be shared among many widgets. +-- +entryNewWithBuffer :: EntryBufferClass buffer => buffer -> IO Entry +entryNewWithBuffer buffer = + makeNewObject mkEntry $ + liftM (castPtr :: Ptr Widget -> Ptr Entry) $ + {# call unsafe entry_new_with_buffer #} + (toEntryBuffer buffer) + |