Some infrastructure for scrolling. Based on epiphany extension.

1 files changed, 32 insertions, 0 deletions

diff --git a/lib/python/_sugar.defs b/lib/python/_sugar.defs
index 2829f2a..570d68b 100644
--- a/lib/python/_sugar.defs
+++ b/lib/python/_sugar.defs
@@ -28,6 +28,13 @@
   (gtype-id "SUGAR_TYPE_TRAY_MANAGER")
 )
 
+(define-object PushScroller
+  (in-module "Sugar")
+  (parent "GObject")
+  (c-name "SugarPushScroller")
+  (gtype-id "SUGAR_TYPE_PUSH_SCROLLER")
+)
+
 ;; Enumerations and flags ...
 
 
@@ -130,4 +137,29 @@
   (return-type "GtkOrientation")
 )
 
+;; From sugar-push-scroller.h
+
+(define-function push_scroller_get_type
+  (c-name "sugar_push_scroller_get_type")
+  (return-type "GType")
+)
+
+(define-method start
+  (of-object "SugarPushScroller")
+  (c-name "sugar_push_scroller_start")
+  (return-type "none")
+  (parameters
+    '("SugarBrowser*" "browser")
+    '("int" "x")
+    '("int" "y")
+  )
+)
 
+(define-method stop
+  (of-object "SugarPushScroller")
+  (c-name "sugar_push_scroller_stop")
+  (return-type "none")
+  (parameters
+    '("guint32" "timestamp")
+  )
+)