diffing dir...
Sat Jan 5 02:07:55 GMT 2013 Hamish Mackenzie <ham...@go...>
* Add scrolledWindowMinContentWidth/Height
Ignore-this: 586322739d30f6e05630ec503afa07ef
hunk ./gtk/Graphics/UI/Gtk/Scrolling/ScrolledWindow.chs 98
+#if GTK_MAJOR_VERSION >= 3
+ scrolledWindowSetMinContentWidth,
+ scrolledWindowGetMinContentWidth,
+ scrolledWindowSetMinContentHeight,
+ scrolledWindowGetMinContentHeight,
+#endif
hunk ./gtk/Graphics/UI/Gtk/Scrolling/ScrolledWindow.chs 118
+#if GTK_MAJOR_VERSION >= 3
+ scrolledWindowMinContentWidth,
+ scrolledWindowMinContentHeight,
+#endif
hunk ./gtk/Graphics/UI/Gtk/Scrolling/ScrolledWindow.chs 272
+#if GTK_MAJOR_VERSION >= 3
+-- | Sets the minimum width that @scrolledWindow@ should keep visible.
+-- Note that this can and (usually will) be smaller than the minimum size of the content.
+--
+scrolledWindowSetMinContentWidth :: ScrolledWindowClass self => self -> Int -> IO ()
+scrolledWindowSetMinContentWidth self width =
+ {# call gtk_scrolled_window_set_min_content_width #}
+ (toScrolledWindow self)
+ (fromIntegral width)
+
+-- | Gets the minimum content width of @scrolledWindow@, or -1 if not set.
+--
+scrolledWindowGetMinContentWidth :: ScrolledWindowClass self => self -> IO Int
+scrolledWindowGetMinContentWidth self =
+ liftM fromIntegral $
+ {# call unsafe scrolled_window_get_min_content_width #}
+ (toScrolledWindow self)
+
+-- | Sets the minimum height that @scrolledWindow@ should keep visible.
+-- Note that this can and (usually will) be smaller than the minimum size of the content.
+--
+scrolledWindowSetMinContentHeight :: ScrolledWindowClass self => self -> Int -> IO ()
+scrolledWindowSetMinContentHeight self height =
+ {# call gtk_scrolled_window_set_min_content_height #}
+ (toScrolledWindow self)
+ (fromIntegral height)
+
+-- | Gets the minimum content height of @scrolledWindow@, or -1 if not set.
+--
+scrolledWindowGetMinContentHeight :: ScrolledWindowClass self => self -> IO Int
+scrolledWindowGetMinContentHeight self =
+ liftM fromIntegral $
+ {# call unsafe scrolled_window_get_min_content_height #}
+ (toScrolledWindow self)
+#endif
+
hunk ./gtk/Graphics/UI/Gtk/Scrolling/ScrolledWindow.chs 404
+#if GTK_MAJOR_VERSION >= 3
+-- | Minimum width that @scrolledWindow@ should keep visible.
+--
+-- Default value: -1
+--
+scrolledWindowMinContentWidth :: ScrolledWindowClass self => Attr self Int
+scrolledWindowMinContentWidth = newAttr
+ scrolledWindowGetMinContentWidth
+ scrolledWindowSetMinContentWidth
+
+-- | Minimum height that @scrolledWindow@ should keep visible.
+--
+-- Default value: -1
+--
+scrolledWindowMinContentHeight :: ScrolledWindowClass self => Attr self Int
+scrolledWindowMinContentHeight = newAttr
+ scrolledWindowGetMinContentHeight
+ scrolledWindowSetMinContentHeight
+#endif
+
|
