genlist: add "scroll" smart call

@feature

diff --git a/src/lib/elm_genlist.c b/src/lib/elm_genlist.c
index c23f410..c4d45d5 100644 (file)
--- a/src/lib/elm_genlist.c
+++ b/src/lib/elm_genlist.c
@@ -59,6 +59,7 @@
     cmd(SIG_DRAG_STOP, "drag,stop", "") \
     cmd(SIG_DRAG, "drag", "") \
     cmd(SIG_LONGPRESSED, "longpressed", "") \
+    cmd(SIG_SCROLL, "scroll", "") \
     cmd(SIG_SCROLL_ANIM_START, "scroll,anim,start", "") \
     cmd(SIG_SCROLL_ANIM_STOP, "scroll,anim,stop", "") \
     cmd(SIG_SCROLL_DRAG_START, "scroll,drag,start", "") \
@@ -5223,6 +5224,13 @@ _scroll_drag_start_cb(Evas_Object *obj,
 }
 
 static void
+_scroll_cb(Evas_Object *obj,
+           void *data EINA_UNUSED)
+{
+   evas_object_smart_callback_call(obj, SIG_SCROLL, NULL);
+}
+
+static void
 _scroll_drag_stop_cb(Evas_Object *obj,
                      void *data EINA_UNUSED)
 {
@@ -5505,6 +5513,7 @@ _elm_genlist_evas_object_smart_add(Eo *obj, Elm_Genlist_Data *priv)
    eo_do(obj,
          elm_interface_scrollable_animate_start_cb_set(_scroll_animate_start_cb),
          elm_interface_scrollable_animate_stop_cb_set(_scroll_animate_stop_cb),
+         elm_interface_scrollable_scroll_cb_set(_scroll_cb),
          elm_interface_scrollable_drag_start_cb_set(_scroll_drag_start_cb),
          elm_interface_scrollable_drag_stop_cb_set(_scroll_drag_stop_cb),
          elm_interface_scrollable_edge_left_cb_set(_edge_left_cb),

diff --git a/src/lib/elm_genlist.h b/src/lib/elm_genlist.h
index 2e4b82f..1ab477b 100644 (file)
--- a/src/lib/elm_genlist.h
+++ b/src/lib/elm_genlist.h
@@ -323,6 +323,7 @@
  * - @c "longpressed" - This is called when the item is pressed for a certain
  *   amount of time. By default it's 1 second. The event_info parameter is the
  *   longpressed genlist item.
+ * - @c "scroll" - the content has been scrolled (moved) (since 1.13)
  * - @c "scroll,anim,start" - This is called when scrolling animation has
  *   started.
  * - @c "scroll,anim,stop" - This is called when scrolling animation has