src/bin/test_tooltip.c

   1 #include <Elementary.h>
   2 #ifdef HAVE_CONFIG_H
   3 # include "elementary_config.h"
   4 #endif
   5 #ifndef ELM_LIB_QUICKLAUNCH
   6
   7 typedef struct _Testitem
   8 {
   9    Elm_Gengrid_Item *item;
  10    const char       *path;
  11    int               mode;
  12    int               onoff;
  13 } Testitem;
  14
  15 static Elm_Gengrid_Item_Class gic;
  16
  17 char *
  18 grdt_lbl_get(void            *data,
  19              Evas_Object *obj __UNUSED__,
  20              const char *part __UNUSED__)
  21 {
  22    const Testitem *ti = data;
  23    char buf[256];
  24    snprintf(buf, sizeof(buf), "Photo %s", ti->path);
  25    return strdup(buf);
  26 }
  27
  28 Evas_Object *
  29 grdt_icon_get(void        *data,
  30               Evas_Object *obj,
  31               const char  *part)
  32 {
  33    const Testitem *ti = data;
  34    if (!strcmp(part, "elm.swallow.icon"))
  35      {
  36         Evas_Object *icon = elm_bg_add(obj);
  37         elm_bg_file_set(icon, ti->path, NULL);
  38         evas_object_size_hint_aspect_set(icon,
  39                                          EVAS_ASPECT_CONTROL_VERTICAL,
  40                                          1, 1);
  41         evas_object_show(icon);
  42         return icon;
  43      }
  44    return NULL;
  45 }
  46
  47 static Elm_Genlist_Item_Class itct;
  48
  49 static void
  50 gltt_exp(void *data       __UNUSED__,
  51          Evas_Object *obj __UNUSED__,
  52          void            *event_info)
  53 {
  54    Elm_Genlist_Item *it = event_info;
  55    Evas_Object *gl = elm_genlist_item_genlist_get(it);
  56    int val = (int)(long)elm_genlist_item_data_get(it);
  57    Elm_Genlist_Item *it1, *it2, *it3;
  58
  59    val *= 10;
  60    it1 = elm_genlist_item_append(gl, &itct, (void *)(long)(val + 1), it,
  61                                  ELM_GENLIST_ITEM_NONE, NULL, NULL);
  62    it2 = elm_genlist_item_append(gl, &itct, (void *)(long)(val + 2), it,
  63                                  ELM_GENLIST_ITEM_NONE, NULL, NULL);
  64    it3 = elm_genlist_item_append(gl, &itct, (void *)(long)(val + 3), it,
  65                                  ELM_GENLIST_ITEM_SUBITEMS, NULL, NULL);
  66
  67    elm_genlist_item_tooltip_text_set(it1, "Testing A");
  68    elm_genlist_item_tooltip_text_set(it2, "Testing B");
  69    elm_genlist_item_tooltip_text_set(it3, "Testing C");
  70 }
  71
  72 static void
  73 gltt_con(void *data       __UNUSED__,
  74          Evas_Object *obj __UNUSED__,
  75          void            *event_info)
  76 {
  77    Elm_Genlist_Item *it = event_info;
  78    elm_genlist_item_subitems_clear(it);
  79 }
  80
  81 static void
  82 gltt_exp_req(void *data       __UNUSED__,
  83              Evas_Object *obj __UNUSED__,
  84              void            *event_info)
  85 {
  86    Elm_Genlist_Item *it = event_info;
  87    elm_genlist_item_expanded_set(it, 1);
  88 }
  89
  90 static void
  91 gltt_con_req(void *data       __UNUSED__,
  92              Evas_Object *obj __UNUSED__,
  93              void            *event_info)
  94 {
  95    Elm_Genlist_Item *it = event_info;
  96    elm_genlist_item_expanded_set(it, 0);
  97 }
  98
  99 char *
 100 gltt_label_get(void            *data,
 101                Evas_Object *obj __UNUSED__,
 102                const char *part __UNUSED__)
 103 {
 104    char buf[256];
 105    snprintf(buf, sizeof(buf), "Item mode %i", (int)(long)data);
 106    return strdup(buf);
 107 }
 108
 109 static Evas_Object *
 110 _tt_item_icon(void *data   __UNUSED__,
 111               Evas_Object *obj __UNUSED__,
 112               Evas_Object *tt,
 113               void *item   __UNUSED__)
 114 {
 115    Evas_Object *ic = elm_icon_add(tt);
 116    char buf[PATH_MAX];
 117    snprintf(buf, sizeof(buf), "%s/images/logo_small.png",
 118             PACKAGE_DATA_DIR);
 119    elm_icon_file_set(ic, buf, NULL);
 120    elm_icon_scale_set(ic, 0, 0);
 121    evas_object_resize(ic, 64, 64);
 122    return ic;
 123 }
 124
 125 static Evas_Object *
 126 _tt_item_icon2(void *data   __UNUSED__,
 127               Evas_Object *obj __UNUSED__,
 128               Evas_Object *tt,
 129               void *item   __UNUSED__)
 130 {
 131    Evas_Object *ic = elm_icon_add(tt);
 132    char buf[PATH_MAX];
 133    snprintf(buf, sizeof(buf), "%s/images/logo.png", PACKAGE_DATA_DIR);
 134    elm_icon_file_set(ic, buf, NULL);
 135    elm_icon_scale_set(ic, 0, 0);
 136    return ic;
 137 }
 138
 139 static Evas_Object *
 140 _tt_item_icon3(void *data   __UNUSED__,
 141               Evas_Object *obj __UNUSED__,
 142               Evas_Object *tt,
 143               void *item   __UNUSED__)
 144 {
 145    Evas_Object *ic = elm_icon_add(tt);
 146    char buf[PATH_MAX];
 147    snprintf(buf, sizeof(buf), "%s/images/insanely_huge_test_image.jpg", PACKAGE_DATA_DIR);
 148    elm_icon_file_set(ic, buf, NULL);
 149    elm_icon_scale_set(ic, 0, 0);
 150    return ic;
 151 }
 152
 153 static void
 154 _tt_item_icon_del(void            *data,
 155                   Evas_Object *obj __UNUSED__,
 156                   void            *event_info)
 157 {
 158    // test to check for del_cb behavior!
 159    printf("_tt_icon_del: data=%ld (== 456?), event_info=%p\n",
 160           (long)data, event_info);
 161 }
 162
 163 static void
 164 _tt_text_replace(void *data       __UNUSED__,
 165                  Evas_Object     *obj,
 166                  void *event_info __UNUSED__)
 167 {
 168    static int count = 0;
 169    char buf[64];
 170    snprintf(buf, sizeof(buf), "count=%d", count);
 171    count++;
 172    elm_object_tooltip_text_set(obj, buf);
 173 }
 174
 175 static void
 176 _tt_timer_del(void *data       __UNUSED__,
 177               Evas *e          __UNUSED__,
 178               Evas_Object     *obj,
 179               void *event_info __UNUSED__)
 180 {
 181    Ecore_Timer *timer = evas_object_data_del(obj, "test-timer");
 182    if (!timer) return;
 183    ecore_timer_del(timer);
 184 }
 185
 186 static Eina_Bool
 187 _tt_text_replace_timer_cb(void *data)
 188 {
 189    _tt_text_replace(NULL, data, NULL);
 190    return EINA_TRUE;
 191 }
 192
 193 static void
 194 _tt_text_replace_timed(void *data       __UNUSED__,
 195                        Evas_Object     *obj,
 196                        void *event_info __UNUSED__)
 197 {
 198    Ecore_Timer *timer = evas_object_data_get(obj, "test-timer");
 199    if (timer)
 200      {
 201         ecore_timer_del(timer);
 202         evas_object_data_del(obj, "test-timer");
 203         elm_object_text_set(obj, "Simple text tooltip, click to start"
 204                                   " changed timed");
 205         return;
 206      }
 207
 208    timer = ecore_timer_add(1.5, _tt_text_replace_timer_cb, obj);
 209    evas_object_data_set(obj, "test-timer", timer);
 210    elm_object_text_set(obj, "Simple text tooltip, click to stop changed"
 211                              " timed");
 212 }
 213
 214 static Evas_Object *
 215 _tt_icon(void *data   __UNUSED__,
 216          Evas_Object *obj __UNUSED__,
 217          Evas_Object *tt)
 218 {
 219    Evas_Object *ic = elm_icon_add(tt);
 220    char buf[PATH_MAX];
 221    snprintf(buf, sizeof(buf), "%s/images/logo_small.png",
 222             PACKAGE_DATA_DIR);
 223    elm_icon_file_set(ic, buf, NULL);
 224    elm_icon_scale_set(ic, 0, 0);
 225    evas_object_resize(ic, 64, 64);
 226    return ic;
 227 }
 228
 229 static Evas_Object *
 230 _tt_icon2(void *data   __UNUSED__,
 231           Evas_Object *obj __UNUSED__,
 232           Evas_Object *tt)
 233 {
 234    Evas_Object *ic = elm_icon_add(tt);
 235    char buf[PATH_MAX];
 236    snprintf(buf, sizeof(buf), "%s/images/icon_00.png", PACKAGE_DATA_DIR);
 237    elm_icon_file_set(ic, buf, NULL);
 238    elm_icon_scale_set(ic, 0, 0);
 239    evas_object_resize(ic, 64, 64);
 240    return ic;
 241 }
 242
 243 static void
 244 _tt_icon_del(void            *data,
 245              Evas_Object *obj __UNUSED__,
 246              void            *event_info)
 247 {
 248    // test to check for del_cb behavior!
 249    printf("_tt_icon_del: data=%ld (== 123?), event_info=%p\n",
 250           (long)data, event_info);
 251 }
 252
 253 static Eina_Bool
 254 _tt_icon_replace_timer_cb(void *data)
 255 {
 256    static int current = 0;
 257
 258    elm_object_tooltip_content_cb_set
 259      (data, current ? _tt_icon2 : _tt_icon, NULL, NULL);
 260
 261    current = !current;
 262    return EINA_TRUE;
 263 }
 264
 265 static void
 266 _tt_icon_replace_timed(void *data       __UNUSED__,
 267                        Evas_Object     *obj,
 268                        void *event_info __UNUSED__)
 269 {
 270    Ecore_Timer *timer = evas_object_data_get(obj, "test-timer");
 271    if (timer)
 272      {
 273         ecore_timer_del(timer);
 274         evas_object_data_del(obj, "test-timer");
 275         elm_object_text_set(obj, "Icon tooltip, click to start changed"
 276                                   " timed");
 277         return;
 278      }
 279
 280    timer = ecore_timer_add(1.5, _tt_icon_replace_timer_cb, obj);
 281    evas_object_data_set(obj, "test-timer", timer);
 282    elm_object_text_set(obj, "Icon tooltip, click to stop changed timed");
 283 }
 284
 285 static Eina_Bool
 286 _tt_style_replace_timer_cb(void *data)
 287 {
 288    static int current = 0;
 289    elm_object_tooltip_style_set(data, current ? NULL : "transparent");
 290    current = !current;
 291    return EINA_TRUE;
 292 }
 293
 294 static void
 295 _tt_style_replace_timed(void *data       __UNUSED__,
 296                         Evas_Object     *obj,
 297                         void *event_info __UNUSED__)
 298 {
 299    Ecore_Timer *timer = evas_object_data_get(obj, "test-timer");
 300    if (timer)
 301      {
 302         ecore_timer_del(timer);
 303         evas_object_data_del(obj, "test-timer");
 304         elm_object_text_set(obj, "Icon tooltip style, click to start"
 305                                   " changed timed");
 306         return;
 307      }
 308
 309    timer = ecore_timer_add(1.5, _tt_style_replace_timer_cb, obj);
 310    evas_object_data_set(obj, "test-timer", timer);
 311    elm_object_text_set(obj, "Icon tooltip style, click to stop changed"
 312                              " timed");
 313 }
 314
 315 static void
 316 _tt_visible_lock_toggle(void *data       __UNUSED__,
 317                         Evas_Object     *obj,
 318                         void *event_info __UNUSED__)
 319 {
 320    static int locked = 0;
 321
 322    locked = !locked;
 323    if (locked)
 324      {
 325         elm_object_text_set(obj, "Locked tooltip visibility");
 326         elm_object_tooltip_text_set(obj, "This tooltip is locked"
 327                                          " visible,<br> click the button"
 328                                          " to unlock!");
 329         elm_object_tooltip_show(obj);
 330      }
 331    else
 332      {
 333         elm_object_text_set(obj, "Unlocked tooltip visibility");
 334         elm_object_tooltip_text_set(obj, "This tooltip is unlocked"
 335                                          " visible,<br> click the button"
 336                                          " to lock!");
 337         elm_object_tooltip_hide(obj);
 338      }
 339 }
 340
 341 void
 342 test_tooltip(void *data       __UNUSED__,
 343              Evas_Object *obj __UNUSED__,
 344              void *event_info __UNUSED__)
 345 {
 346    Evas_Object *win, *bg, *bx, *tb, *bt, *se, *lst;
 347    Elm_Toolbar_Item *ti;
 348    Elm_List_Item *li;
 349
 350    win = elm_win_add(NULL, "tooltip", ELM_WIN_BASIC);
 351    elm_win_title_set(win, "Tooltip");
 352    elm_win_autodel_set(win, EINA_TRUE);
 353
 354    bg = elm_bg_add(win);
 355    elm_win_resize_object_add(win, bg);
 356    evas_object_size_hint_weight_set(bg, EVAS_HINT_EXPAND,
 357                                     EVAS_HINT_EXPAND);
 358    evas_object_show(bg);
 359
 360    bx = elm_box_add(win);
 361    evas_object_size_hint_weight_set(bx, EVAS_HINT_EXPAND,
 362                                     EVAS_HINT_EXPAND);
 363    elm_win_resize_object_add(win, bx);
 364    evas_object_show(bx);
 365
 366    tb = elm_toolbar_add(win);
 367    elm_toolbar_homogeneous_set(tb, 0);
 368    evas_object_size_hint_weight_set(tb, EVAS_HINT_EXPAND, 0.0);
 369    evas_object_size_hint_align_set(tb, EVAS_HINT_FILL, 0.0);
 370    elm_box_pack_end(bx, tb);
 371    evas_object_show(tb);
 372
 373    ti = elm_toolbar_item_append(tb, NULL, "Open", NULL, NULL);
 374    elm_toolbar_item_tooltip_text_set(ti, "Opens a file");
 375
 376    ti = elm_toolbar_item_append(tb, NULL, "Icon", NULL, NULL);
 377    elm_toolbar_item_tooltip_content_cb_set
 378      (ti, _tt_item_icon, (void *)456L, _tt_item_icon_del);
 379    elm_toolbar_item_tooltip_style_set(ti, "transparent");
 380
 381    bt = elm_button_add(win);
 382    elm_object_text_set(bt, "Simple text tooltip");
 383    elm_object_tooltip_text_set(bt, "Simple text tooltip");
 384    elm_box_pack_end(bx, bt);
 385    evas_object_show(bt);
 386
 387    bt = elm_button_add(win);
 388    elm_object_text_set(bt, "Simple text tooltip, click to change");
 389    elm_object_tooltip_text_set(bt, "Initial");
 390    evas_object_smart_callback_add(bt, "clicked", _tt_text_replace, NULL);
 391    elm_box_pack_end(bx, bt);
 392    evas_object_show(bt);
 393
 394    bt = elm_button_add(win);
 395    elm_object_text_set(bt, "Simple text tooltip, click to start"
 396                             " changed timed");
 397    elm_object_tooltip_text_set(bt, "Initial");
 398    evas_object_smart_callback_add(bt, "clicked", _tt_text_replace_timed,
 399                                   NULL);
 400    elm_box_pack_end(bx, bt);
 401    evas_object_show(bt);
 402    evas_object_event_callback_add(bt, EVAS_CALLBACK_DEL, _tt_timer_del,
 403                                   NULL);
 404
 405    bt = elm_button_add(win);
 406    elm_object_text_set(bt, "Icon tooltip");
 407    elm_object_tooltip_content_cb_set(bt, _tt_icon, (void *)123L,
 408                                      _tt_icon_del);
 409    elm_box_pack_end(bx, bt);
 410    evas_object_show(bt);
 411
 412    bt = elm_button_add(win);
 413    elm_object_text_set(bt, "Icon tooltip, click to start changed timed");
 414    elm_object_tooltip_content_cb_set(bt, _tt_icon, NULL, NULL);
 415    evas_object_smart_callback_add(bt, "clicked", _tt_icon_replace_timed,
 416                                   NULL);
 417    elm_box_pack_end(bx, bt);
 418    evas_object_show(bt);
 419    evas_object_event_callback_add(bt, EVAS_CALLBACK_DEL, _tt_timer_del,
 420                                   NULL);
 421
 422    bt = elm_button_add(win);
 423    elm_object_text_set(bt, "Transparent Icon tooltip");
 424    elm_object_tooltip_content_cb_set(bt, _tt_icon, NULL, NULL);
 425    elm_object_tooltip_style_set(bt, "transparent");
 426    elm_box_pack_end(bx, bt);
 427    evas_object_show(bt);
 428
 429    bt = elm_button_add(win);
 430    elm_object_text_set(bt, "Icon tooltip style, click to start changed"
 431                             " timed");
 432    elm_object_tooltip_content_cb_set(bt, _tt_icon, NULL, NULL);
 433    evas_object_smart_callback_add(bt, "clicked", _tt_style_replace_timed,
 434                                   NULL);
 435    elm_box_pack_end(bx, bt);
 436    evas_object_show(bt);
 437    evas_object_event_callback_add(bt, EVAS_CALLBACK_DEL, _tt_timer_del,
 438                                   NULL);
 439
 440    bt = elm_button_add(win);
 441    elm_object_text_set(bt, "Unlocked tooltip visibility");
 442    elm_object_tooltip_text_set(bt, "This tooltip is unlocked visible,<br>"
 443                                    " click the button to lock!");
 444    evas_object_smart_callback_add(bt, "clicked", _tt_visible_lock_toggle,
 445                                   NULL);
 446    elm_box_pack_end(bx, bt);
 447    evas_object_show(bt);
 448
 449    se = elm_entry_add(win);
 450    elm_entry_scrollable_set(se, EINA_TRUE);
 451    evas_object_size_hint_weight_set(se, EVAS_HINT_EXPAND, 0.0);
 452    evas_object_size_hint_align_set(se, EVAS_HINT_FILL, 0.5);
 453    elm_entry_scrollbar_policy_set(se, ELM_SCROLLER_POLICY_OFF,
 454                                            ELM_SCROLLER_POLICY_OFF);
 455    elm_entry_entry_set(se, "Hello, some scrolled entry here!");
 456    elm_object_tooltip_text_set(se, "Type something here!");
 457    elm_entry_single_line_set(se, 1);
 458    elm_box_pack_end(bx, se);
 459    evas_object_show(se);
 460
 461    lst = elm_list_add(win);
 462    li = elm_list_item_append(lst, "Hello", NULL, NULL, NULL, NULL);
 463    elm_list_item_tooltip_text_set(li, "Something useful here?");
 464    li = elm_list_item_append(lst, "Icon Tooltip", NULL, NULL, NULL, NULL);
 465    elm_list_item_tooltip_content_cb_set(li, _tt_item_icon, NULL, NULL);
 466    li = elm_list_item_append(lst, "Big Icon Tooltip", NULL, NULL, NULL, NULL);
 467    elm_list_item_tooltip_content_cb_set(li, _tt_item_icon2, NULL, NULL);
 468    elm_list_item_tooltip_style_set(li, "transparent");
 469    elm_list_item_tooltip_size_restrict_disable(li, EINA_TRUE);
 470    li = elm_list_item_append(lst, "Insanely Big Icon Tooltip", NULL, NULL, NULL, NULL);
 471    elm_list_item_tooltip_content_cb_set(li, _tt_item_icon3, NULL, NULL);
 472    elm_list_item_tooltip_style_set(li, "transparent");
 473    elm_list_item_tooltip_size_restrict_disable(li, EINA_TRUE);
 474    evas_object_size_hint_weight_set(lst, EVAS_HINT_EXPAND,
 475                                     EVAS_HINT_EXPAND);
 476    evas_object_size_hint_align_set(lst, EVAS_HINT_FILL, EVAS_HINT_FILL);
 477    evas_object_size_hint_min_set(lst, 100, 100);
 478    elm_list_go(lst);
 479    elm_box_pack_end(bx, lst);
 480    evas_object_show(lst);
 481
 482    evas_object_resize(win, 320, 580);
 483    evas_object_show(win);
 484 }
 485
 486 void
 487 test_tooltip2(void *data       __UNUSED__,
 488               Evas_Object *obj __UNUSED__,
 489               void *event_info __UNUSED__)
 490 {
 491    Evas_Object *win, *bg, *bx, *grid, *gl;
 492    Elm_Genlist_Item *it1, *it2, *it3;
 493    static Testitem ti[144];
 494    int i, n;
 495    char buf[PATH_MAX];
 496    const char *img[9] =
 497    {
 498       "panel_01.jpg",
 499       "plant_01.jpg",
 500       "rock_01.jpg",
 501       "rock_02.jpg",
 502       "sky_01.jpg",
 503       "sky_02.jpg",
 504       "sky_03.jpg",
 505       "sky_04.jpg",
 506       "wood_01.jpg",
 507    };
 508
 509    win = elm_win_add(NULL, "tooltip2", ELM_WIN_BASIC);
 510    elm_win_title_set(win, "Tooltip 2");
 511    elm_win_autodel_set(win, EINA_TRUE);
 512
 513    bg = elm_bg_add(win);
 514    evas_object_size_hint_weight_set(bg, EVAS_HINT_EXPAND,
 515                                     EVAS_HINT_EXPAND);
 516    elm_win_resize_object_add(win, bg);
 517    evas_object_show(bg);
 518
 519    bx = elm_box_add(win);
 520    evas_object_size_hint_weight_set(bx, EVAS_HINT_EXPAND,
 521                                     EVAS_HINT_EXPAND);
 522    elm_win_resize_object_add(win, bx);
 523    evas_object_show(bx);
 524
 525    grid = elm_gengrid_add(win);
 526    elm_gengrid_item_size_set(grid, 100, 100);
 527    elm_gengrid_horizontal_set(grid, EINA_FALSE);
 528    elm_gengrid_multi_select_set(grid, EINA_TRUE);
 529    evas_object_size_hint_align_set(grid, EVAS_HINT_FILL, EVAS_HINT_FILL);
 530    evas_object_size_hint_weight_set(grid, EVAS_HINT_EXPAND,
 531                                     EVAS_HINT_EXPAND);
 532
 533    gic.item_style = "default";
 534    gic.func.label_get = grdt_lbl_get;
 535    gic.func.icon_get = grdt_icon_get;
 536
 537    n = 0;
 538    for (i = 0; i < 9; i++)
 539      {
 540         snprintf(buf, sizeof(buf), "%s/images/%s", PACKAGE_DATA_DIR,
 541                  img[n]);
 542         n++;
 543         ti[i].mode = i;
 544         ti[i].path = eina_stringshare_add(buf);
 545         ti[i].item = elm_gengrid_item_append(grid, &gic, &(ti[i]), NULL,
 546                                              NULL);
 547         if (n % 2)
 548           elm_gengrid_item_tooltip_text_set(ti[i].item, "Testing X");
 549         else
 550           elm_gengrid_item_tooltip_text_set(ti[i].item, "Testing Y");
 551         if (!(i % 5))
 552           elm_gengrid_item_selected_set(ti[i].item, EINA_TRUE);
 553      }
 554
 555    elm_box_pack_end(bx, grid);
 556    evas_object_show(grid);
 557
 558    gl = elm_genlist_add(win);
 559    evas_object_size_hint_align_set(gl, EVAS_HINT_FILL, EVAS_HINT_FILL);
 560    evas_object_size_hint_weight_set(gl, EVAS_HINT_EXPAND,
 561                                     EVAS_HINT_EXPAND);
 562
 563    itct.item_style = "default";
 564    itct.func.label_get = gltt_label_get;
 565
 566    it1 = elm_genlist_item_append(gl, &itct, (void *)1, NULL,
 567                                  ELM_GENLIST_ITEM_SUBITEMS, NULL, NULL);
 568    it2 = elm_genlist_item_append(gl, &itct, (void *)2, NULL,
 569                                  ELM_GENLIST_ITEM_SUBITEMS, NULL, NULL);
 570    it3 = elm_genlist_item_append(gl, &itct, (void *)3, NULL,
 571                                  ELM_GENLIST_ITEM_NONE, NULL, NULL);
 572
 573    elm_genlist_item_tooltip_text_set(it1, "Testing 1");
 574    elm_genlist_item_tooltip_text_set(it2, "Testing 2");
 575    elm_genlist_item_tooltip_text_set(it3, "Testing 3");
 576
 577    evas_object_smart_callback_add(gl, "expand,request", gltt_exp_req, gl);
 578    evas_object_smart_callback_add(gl, "contract,request", gltt_con_req,
 579                                   gl);
 580    evas_object_smart_callback_add(gl, "expanded", gltt_exp, gl);
 581    evas_object_smart_callback_add(gl, "contracted", gltt_con, gl);
 582
 583    elm_box_pack_end(bx, gl);
 584    evas_object_show(gl);
 585
 586    evas_object_resize(win, 320, 480);
 587    evas_object_show(win);
 588 }
 589
 590 #endif