summaryrefslogtreecommitdiff
path: root/src/Gtk/Widgets.dcl
diff options
context:
space:
mode:
Diffstat (limited to 'src/Gtk/Widgets.dcl')
-rw-r--r--src/Gtk/Widgets.dcl12
1 files changed, 11 insertions, 1 deletions
diff --git a/src/Gtk/Widgets.dcl b/src/Gtk/Widgets.dcl
index d604e9b..e33eb89 100644
--- a/src/Gtk/Widgets.dcl
+++ b/src/Gtk/Widgets.dcl
@@ -75,10 +75,14 @@ newMessageDialog :: !GtkWindow !GtkMessageType !GtkButtonsType !String -> GtkM G
getFileWithDialog :: !GtkWindow !GtkFileChooserAction !(Maybe String) -> GtkM (Maybe FilePath)
:: GtkEntry =: GtkEntry Pointer
+
+class gtkEntry a :: !a -> GtkEntry
+
instance gtkWidget GtkEntry
+instance gtkEntry GtkEntry
newEntry :: GtkM GtkEntry
-getText :: !GtkEntry -> GtkM String
+getText :: !e -> GtkM String | gtkEntry e
instance tune GtkEntry GtkText
@@ -172,6 +176,12 @@ newScrolledWindow :: GtkM GtkScrolledWindow
instance tune GtkScrolledWindow (GtkScrollbarPolicy, GtkScrollbarPolicy)
+:: GtkSearchEntry =: GtkSearchEntry Pointer
+instance gtkWidget GtkSearchEntry
+instance gtkEntry GtkSearchEntry
+
+newSearchEntry :: GtkM GtkSearchEntry
+
:: GtkSeparator =: GtkSeparator Pointer
instance gtkWidget GtkSeparator