Pileus Git - ~andy/gtk/blob - tests/testiconview.c

   1 /* testiconview.c
   2  * Copyright (C) 2002  Anders Carlsson <andersca@gnu.org>
   3  *
   4  * This library is free software; you can redistribute it and/or
   5  * modify it under the terms of the GNU Library General Public
   6  * License as published by the Free Software Foundation; either
   7  * version 2 of the License, or (at your option) any later version.
   8  *
   9  * This library is distributed in the hope that it will be useful,
  10  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * Library General Public License for more details.
  13  *
  14  * You should have received a copy of the GNU Library General Public
  15  * License along with this library; if not, write to the
  16  * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
  17  * Boston, MA 02111-1307, USA.
  18  */
  19
  20 #include <gtk/gtk.h>
  21 #include <sys/types.h>
  22 #include <string.h>
  23 #include "prop-editor.h"
  24
  25 #define NUMBER_OF_ITEMS   10
  26 #define SOME_ITEMS       100
  27 #define MANY_ITEMS     10000
  28
  29 static void
  30 fill_model (GtkTreeModel *model)
  31 {
  32   GdkPixbuf *pixbuf;
  33   int i;
  34   char *str, *str2;
  35   GtkTreeIter iter;
  36   GtkListStore *store = GTK_LIST_STORE (model);
  37   gint32 size;
  38
  39   pixbuf = gdk_pixbuf_new_from_file ("gnome-textfile.png", NULL);
  40
  41   i = 0;
  42
  43   gtk_list_store_prepend (store, &iter);
  44
  45   gtk_list_store_set (store, &iter,
  46                       0, pixbuf,
  47                       1, "Really really\nreally really loooooooooong item name",
  48                       2, 0,
  49                       3, "This is a <b>Test</b> of <i>markup</i>",
  50                       4, TRUE,
  51                       -1);
  52
  53   while (i < NUMBER_OF_ITEMS - 1)
  54     {
  55       GdkPixbuf *pb;
  56       size = g_random_int_range (20, 70);
  57       pb = gdk_pixbuf_scale_simple (pixbuf, size, size, GDK_INTERP_NEAREST);
  58
  59       str = g_strdup_printf ("Icon %d", i);
  60       str2 = g_strdup_printf ("Icon <b>%d</b>", i);
  61       gtk_list_store_prepend (store, &iter);
  62       gtk_list_store_set (store, &iter,
  63                           0, pb,
  64                           1, str,
  65                           2, i,
  66                           3, str2,
  67                           4, TRUE,
  68                           -1);
  69       g_free (str);
  70       g_free (str2);
  71       i++;
  72     }
  73
  74   //  gtk_tree_sortable_set_sort_column_id (GTK_TREE_SORTABLE (store), 2, GTK_SORT_ASCENDING);
  75 }
  76
  77 static GtkTreeModel *
  78 create_model (void)
  79 {
  80   GtkListStore *store;
  81
  82   store = gtk_list_store_new (5, GDK_TYPE_PIXBUF, G_TYPE_STRING, G_TYPE_INT, G_TYPE_STRING, G_TYPE_BOOLEAN);
  83
  84   return GTK_TREE_MODEL (store);
  85 }
  86
  87
  88 static void
  89 foreach_selected_remove (GtkWidget *button, GtkIconView *icon_list)
  90 {
  91   GtkTreeIter iter;
  92   GtkTreeModel *model;
  93
  94   GList *list, *selected;
  95
  96   selected = gtk_icon_view_get_selected_items (icon_list);
  97   model = gtk_icon_view_get_model (icon_list);
  98
  99   for (list = selected; list; list = list->next)
 100     {
 101       GtkTreePath *path = list->data;
 102
 103       gtk_tree_model_get_iter (model, &iter, path);
 104       gtk_list_store_remove (GTK_LIST_STORE (model), &iter);
 105
 106       gtk_tree_path_free (path);
 107     }
 108
 109   g_list_free (selected);
 110 }
 111
 112
 113 static void
 114 swap_rows (GtkWidget *button, GtkIconView *icon_list)
 115 {
 116   GtkTreeIter iter, iter2;
 117   GtkTreeModel *model;
 118
 119   model = gtk_icon_view_get_model (icon_list);
 120   gtk_tree_sortable_set_sort_column_id (GTK_TREE_SORTABLE (model), -2, GTK_SORT_ASCENDING);
 121
 122   gtk_tree_model_get_iter_first (model, &iter);
 123   iter2 = iter;
 124   gtk_tree_model_iter_next (model, &iter2);
 125   gtk_list_store_swap (GTK_LIST_STORE (model), &iter, &iter2);
 126 }
 127
 128 static void
 129 add_n_items (GtkIconView *icon_list, gint n)
 130 {
 131   static gint count = NUMBER_OF_ITEMS;
 132
 133   GtkTreeIter iter;
 134   GtkListStore *store;
 135   GdkPixbuf *pixbuf;
 136   gchar *str, *str2;
 137   gint i;
 138
 139   store = GTK_LIST_STORE (gtk_icon_view_get_model (icon_list));
 140   pixbuf = gdk_pixbuf_new_from_file ("gnome-textfile.png", NULL);
 141
 142
 143   for (i = 0; i < n; i++)
 144     {
 145       str = g_strdup_printf ("Icon %d", count);
 146       str2 = g_strdup_printf ("Icon <b>%d</b>", count);
 147       gtk_list_store_prepend (store, &iter);
 148       gtk_list_store_set (store, &iter,
 149                           0, pixbuf,
 150                           1, str,
 151                           2, i,
 152                           3, str2,
 153                           -1);
 154       g_free (str);
 155       g_free (str2);
 156       count++;
 157     }
 158 }
 159
 160 static void
 161 add_some (GtkWidget *button, GtkIconView *icon_list)
 162 {
 163   add_n_items (icon_list, SOME_ITEMS);
 164 }
 165
 166 static void
 167 add_many (GtkWidget *button, GtkIconView *icon_list)
 168 {
 169   add_n_items (icon_list, MANY_ITEMS);
 170 }
 171
 172 static void
 173 add_large (GtkWidget *button, GtkIconView *icon_list)
 174 {
 175   GtkListStore *store;
 176   GtkTreeIter iter;
 177
 178   GdkPixbuf *pixbuf, *pb;
 179   gchar *str;
 180
 181   store = GTK_LIST_STORE (gtk_icon_view_get_model (icon_list));
 182   pixbuf = gdk_pixbuf_new_from_file ("gnome-textfile.png", NULL);
 183
 184   pb = gdk_pixbuf_scale_simple (pixbuf,
 185                                 2 * gdk_pixbuf_get_width (pixbuf),
 186                                 2 * gdk_pixbuf_get_height (pixbuf),
 187                                 GDK_INTERP_BILINEAR);
 188
 189   str = g_strdup_printf ("Some really long text");
 190   gtk_list_store_append (store, &iter);
 191   gtk_list_store_set (store, &iter,
 192                       0, pb,
 193                       1, str,
 194                       2, 0,
 195                       3, str,
 196                       -1);
 197   g_object_unref (pb);
 198   g_free (str);
 199
 200   pb = gdk_pixbuf_scale_simple (pixbuf,
 201                                 3 * gdk_pixbuf_get_width (pixbuf),
 202                                 3 * gdk_pixbuf_get_height (pixbuf),
 203                                 GDK_INTERP_BILINEAR);
 204
 205   str = g_strdup ("see how long text behaves when placed underneath "
 206                   "an oversized icon which would allow for long lines");
 207   gtk_list_store_append (store, &iter);
 208   gtk_list_store_set (store, &iter,
 209                       0, pb,
 210                       1, str,
 211                       2, 1,
 212                       3, str,
 213                       -1);
 214   g_object_unref (pb);
 215   g_free (str);
 216
 217   pb = gdk_pixbuf_scale_simple (pixbuf,
 218                                 3 * gdk_pixbuf_get_width (pixbuf),
 219                                 3 * gdk_pixbuf_get_height (pixbuf),
 220                                 GDK_INTERP_BILINEAR);
 221
 222   str = g_strdup ("short text");
 223   gtk_list_store_append (store, &iter);
 224   gtk_list_store_set (store, &iter,
 225                       0, pb,
 226                       1, str,
 227                       2, 2,
 228                       3, str,
 229                       -1);
 230   g_object_unref (pb);
 231   g_free (str);
 232
 233   g_object_unref (pixbuf);
 234 }
 235
 236 static void
 237 select_all (GtkWidget *button, GtkIconView *icon_list)
 238 {
 239   gtk_icon_view_select_all (icon_list);
 240 }
 241
 242 static void
 243 select_nonexisting (GtkWidget *button, GtkIconView *icon_list)
 244 {
 245   GtkTreePath *path = gtk_tree_path_new_from_indices (999999, -1);
 246   gtk_icon_view_select_path (icon_list, path);
 247   gtk_tree_path_free (path);
 248 }
 249
 250 static void
 251 unselect_all (GtkWidget *button, GtkIconView *icon_list)
 252 {
 253   gtk_icon_view_unselect_all (icon_list);
 254 }
 255
 256 static void
 257 selection_changed (GtkIconView *icon_list)
 258 {
 259   g_print ("Selection changed!\n");
 260 }
 261
 262 typedef struct {
 263   GtkIconView     *icon_list;
 264   GtkTreePath     *path;
 265 } ItemData;
 266
 267 static void
 268 free_item_data (ItemData *data)
 269 {
 270   gtk_tree_path_free (data->path);
 271   g_free (data);
 272 }
 273
 274 static void
 275 item_activated (GtkIconView *icon_view,
 276                 GtkTreePath *path)
 277 {
 278   GtkTreeIter iter;
 279   GtkTreeModel *model;
 280   gchar *text;
 281
 282   model = gtk_icon_view_get_model (icon_view);
 283   gtk_tree_model_get_iter (model, &iter, path);
 284
 285   gtk_tree_model_get (model, &iter, 1, &text, -1);
 286   g_print ("Item activated, text is %s\n", text);
 287   g_free (text);
 288
 289 }
 290
 291 static void
 292 toggled (GtkCellRendererToggle *cell,
 293          gchar                 *path_string,
 294          gpointer               data)
 295 {
 296   GtkTreeModel *model = GTK_TREE_MODEL (data);
 297   GtkTreeIter iter;
 298   GtkTreePath *path = gtk_tree_path_new_from_string (path_string);
 299   gboolean value;
 300
 301   gtk_tree_model_get_iter (model, &iter, path);
 302   gtk_tree_model_get (model, &iter, 4, &value, -1);
 303
 304   value = !value;
 305   gtk_list_store_set (GTK_LIST_STORE (model), &iter, 4, value, -1);
 306
 307   gtk_tree_path_free (path);
 308 }
 309
 310 static void
 311 edited (GtkCellRendererText *cell,
 312         gchar               *path_string,
 313         gchar               *new_text,
 314         gpointer             data)
 315 {
 316   GtkTreeModel *model = GTK_TREE_MODEL (data);
 317   GtkTreeIter iter;
 318   GtkTreePath *path = gtk_tree_path_new_from_string (path_string);
 319
 320   gtk_tree_model_get_iter (model, &iter, path);
 321   gtk_list_store_set (GTK_LIST_STORE (model), &iter, 1, new_text, -1);
 322
 323   gtk_tree_path_free (path);
 324 }
 325
 326 static void
 327 item_cb (GtkWidget *menuitem,
 328          ItemData  *data)
 329 {
 330   item_activated (data->icon_list, data->path);
 331 }
 332
 333 static void
 334 do_popup_menu (GtkWidget      *icon_list,
 335                GdkEventButton *event)
 336 {
 337   GtkIconView *icon_view = GTK_ICON_VIEW (icon_list);
 338   GtkWidget *menu;
 339   GtkWidget *menuitem;
 340   GtkTreePath *path = NULL;
 341   int button, event_time;
 342   ItemData *data;
 343   GList *list;
 344
 345   if (event)
 346     path = gtk_icon_view_get_path_at_pos (icon_view, event->x, event->y);
 347   else
 348     {
 349       list = gtk_icon_view_get_selected_items (icon_view);
 350
 351       if (list)
 352         {
 353           path = (GtkTreePath*)list->data;
 354           g_list_free_full (list, (GDestroyNotify) gtk_tree_path_free);
 355         }
 356     }
 357
 358   if (!path)
 359     return;
 360
 361   menu = gtk_menu_new ();
 362
 363   data = g_new0 (ItemData, 1);
 364   data->icon_list = icon_view;
 365   data->path = path;
 366   g_object_set_data_full (G_OBJECT (menu), "item-path", data, (GDestroyNotify)free_item_data);
 367
 368   menuitem = gtk_menu_item_new_with_label ("Activate");
 369   gtk_widget_show (menuitem);
 370   gtk_menu_shell_append (GTK_MENU_SHELL (menu), menuitem);
 371   g_signal_connect (menuitem, "activate", G_CALLBACK (item_cb), data);
 372
 373   if (event)
 374     {
 375       button = event->button;
 376       event_time = event->time;
 377     }
 378   else
 379     {
 380       button = 0;
 381       event_time = gtk_get_current_event_time ();
 382     }
 383
 384   gtk_menu_popup (GTK_MENU (menu), NULL, NULL, NULL, NULL,
 385                   button, event_time);
 386 }
 387
 388
 389 static gboolean
 390 button_press_event_handler (GtkWidget      *widget,
 391                             GdkEventButton *event)
 392 {
 393   /* Ignore double-clicks and triple-clicks */
 394   if (event->button == 3 && event->type == GDK_BUTTON_PRESS)
 395     {
 396       do_popup_menu (widget, event);
 397       return TRUE;
 398     }
 399
 400   return FALSE;
 401 }
 402
 403 static gboolean
 404 popup_menu_handler (GtkWidget *widget)
 405 {
 406   do_popup_menu (widget, NULL);
 407   return TRUE;
 408 }
 409
 410 static const GtkTargetEntry item_targets[] = {
 411   { "GTK_TREE_MODEL_ROW", GTK_TARGET_SAME_APP, 0 }
 412 };
 413
 414 gint
 415 main (gint argc, gchar **argv)
 416 {
 417   GtkWidget *paned, *tv;
 418   GtkWidget *window, *icon_list, *scrolled_window;
 419   GtkWidget *vbox, *bbox;
 420   GtkWidget *button;
 421   GtkWidget *prop_editor;
 422   GtkTreeModel *model;
 423   GtkCellRenderer *cell;
 424   GtkTreeViewColumn *tvc;
 425
 426   gtk_init (&argc, &argv);
 427
 428   /* to test rtl layout, set RTL=1 in the environment */
 429   if (g_getenv ("RTL"))
 430     gtk_widget_set_default_direction (GTK_TEXT_DIR_RTL);
 431
 432   window = gtk_window_new (GTK_WINDOW_TOPLEVEL);
 433   gtk_window_set_default_size (GTK_WINDOW (window), 700, 400);
 434
 435   vbox = gtk_box_new (GTK_ORIENTATION_VERTICAL, 0);
 436   gtk_container_add (GTK_CONTAINER (window), vbox);
 437
 438   paned = gtk_paned_new (GTK_ORIENTATION_HORIZONTAL);
 439   gtk_box_pack_start (GTK_BOX (vbox), paned, TRUE, TRUE, 0);
 440
 441   icon_list = gtk_icon_view_new ();
 442   gtk_icon_view_set_selection_mode (GTK_ICON_VIEW (icon_list), GTK_SELECTION_MULTIPLE);
 443
 444   tv = gtk_tree_view_new ();
 445   tvc = gtk_tree_view_column_new ();
 446   gtk_tree_view_append_column (GTK_TREE_VIEW (tv), tvc);
 447
 448   g_signal_connect_after (icon_list, "button_press_event",
 449                           G_CALLBACK (button_press_event_handler), NULL);
 450   g_signal_connect (icon_list, "selection_changed",
 451                     G_CALLBACK (selection_changed), NULL);
 452   g_signal_connect (icon_list, "popup_menu",
 453                     G_CALLBACK (popup_menu_handler), NULL);
 454
 455   g_signal_connect (icon_list, "item_activated",
 456                     G_CALLBACK (item_activated), NULL);
 457
 458   model = create_model ();
 459   gtk_icon_view_set_model (GTK_ICON_VIEW (icon_list), model);
 460   gtk_tree_view_set_model (GTK_TREE_VIEW (tv), model);
 461   fill_model (model);
 462
 463 #if 0
 464
 465   gtk_icon_view_set_pixbuf_column (GTK_ICON_VIEW (icon_list), 0);
 466   gtk_icon_view_set_text_column (GTK_ICON_VIEW (icon_list), 1);
 467
 468 #else
 469
 470   cell = gtk_cell_renderer_toggle_new ();
 471   gtk_cell_layout_pack_start (GTK_CELL_LAYOUT (icon_list), cell, FALSE);
 472   g_object_set (cell, "activatable", TRUE, NULL);
 473   gtk_cell_layout_set_attributes (GTK_CELL_LAYOUT (icon_list),
 474                                   cell, "active", 4, NULL);
 475   g_signal_connect (cell, "toggled", G_CALLBACK (toggled), model);
 476
 477   cell = gtk_cell_renderer_pixbuf_new ();
 478   gtk_cell_layout_pack_start (GTK_CELL_LAYOUT (icon_list), cell, FALSE);
 479   g_object_set (cell,
 480                 "follow-state", TRUE,
 481                 NULL);
 482   gtk_cell_layout_set_attributes (GTK_CELL_LAYOUT (icon_list),
 483                                   cell, "pixbuf", 0, NULL);
 484
 485   cell = gtk_cell_renderer_text_new ();
 486   gtk_cell_layout_pack_start (GTK_CELL_LAYOUT (icon_list), cell, FALSE);
 487   g_object_set (cell,
 488                 "editable", TRUE,
 489                 "xalign", 0.5,
 490                 "wrap-mode", PANGO_WRAP_WORD_CHAR,
 491                 "wrap-width", 100,
 492                 NULL);
 493   gtk_cell_layout_set_attributes (GTK_CELL_LAYOUT (icon_list),
 494                                   cell, "text", 1, NULL);
 495   g_signal_connect (cell, "edited", G_CALLBACK (edited), model);
 496
 497   /* now the tree view... */
 498   cell = gtk_cell_renderer_toggle_new ();
 499   gtk_cell_layout_pack_start (GTK_CELL_LAYOUT (tvc), cell, FALSE);
 500   g_object_set (cell, "activatable", TRUE, NULL);
 501   gtk_cell_layout_set_attributes (GTK_CELL_LAYOUT (tvc),
 502                                   cell, "active", 4, NULL);
 503   g_signal_connect (cell, "toggled", G_CALLBACK (toggled), model);
 504
 505   cell = gtk_cell_renderer_pixbuf_new ();
 506   gtk_cell_layout_pack_start (GTK_CELL_LAYOUT (tvc), cell, FALSE);
 507   g_object_set (cell,
 508                 "follow-state", TRUE,
 509                 NULL);
 510   gtk_cell_layout_set_attributes (GTK_CELL_LAYOUT (tvc),
 511                                   cell, "pixbuf", 0, NULL);
 512
 513   cell = gtk_cell_renderer_text_new ();
 514   gtk_cell_layout_pack_start (GTK_CELL_LAYOUT (tvc), cell, FALSE);
 515   g_object_set (cell, "editable", TRUE, NULL);
 516   gtk_cell_layout_set_attributes (GTK_CELL_LAYOUT (tvc),
 517                                   cell, "text", 1, NULL);
 518   g_signal_connect (cell, "edited", G_CALLBACK (edited), model);
 519 #endif
 520   /* Allow DND between the icon view and the tree view */
 521
 522   gtk_icon_view_enable_model_drag_source (GTK_ICON_VIEW (icon_list),
 523                                           GDK_BUTTON1_MASK,
 524                                           item_targets,
 525                                           G_N_ELEMENTS (item_targets),
 526                                           GDK_ACTION_MOVE);
 527   gtk_icon_view_enable_model_drag_dest (GTK_ICON_VIEW (icon_list),
 528                                         item_targets,
 529                                         G_N_ELEMENTS (item_targets),
 530                                         GDK_ACTION_MOVE);
 531
 532   gtk_tree_view_enable_model_drag_source (GTK_TREE_VIEW (tv),
 533                                           GDK_BUTTON1_MASK,
 534                                           item_targets,
 535                                           G_N_ELEMENTS (item_targets),
 536                                           GDK_ACTION_MOVE);
 537   gtk_tree_view_enable_model_drag_dest (GTK_TREE_VIEW (tv),
 538                                         item_targets,
 539                                         G_N_ELEMENTS (item_targets),
 540                                         GDK_ACTION_MOVE);
 541
 542
 543   prop_editor = create_prop_editor (G_OBJECT (icon_list), 0);
 544   gtk_widget_show_all (prop_editor);
 545
 546   scrolled_window = gtk_scrolled_window_new (NULL, NULL);
 547   gtk_container_add (GTK_CONTAINER (scrolled_window), icon_list);
 548   gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (scrolled_window),
 549                                   GTK_POLICY_AUTOMATIC, GTK_POLICY_AUTOMATIC);
 550
 551   gtk_paned_add1 (GTK_PANED (paned), scrolled_window);
 552
 553   scrolled_window = gtk_scrolled_window_new (NULL, NULL);
 554   gtk_container_add (GTK_CONTAINER (scrolled_window), tv);
 555   gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (scrolled_window),
 556                                   GTK_POLICY_AUTOMATIC, GTK_POLICY_AUTOMATIC);
 557
 558   gtk_paned_add2 (GTK_PANED (paned), scrolled_window);
 559
 560   bbox = gtk_button_box_new (GTK_ORIENTATION_HORIZONTAL);
 561   gtk_button_box_set_layout (GTK_BUTTON_BOX (bbox), GTK_BUTTONBOX_START);
 562   gtk_box_pack_start (GTK_BOX (vbox), bbox, FALSE, FALSE, 0);
 563
 564   button = gtk_button_new_with_label ("Add some");
 565   g_signal_connect (button, "clicked", G_CALLBACK (add_some), icon_list);
 566   gtk_box_pack_start (GTK_BOX (bbox), button, TRUE, TRUE, 0);
 567
 568   button = gtk_button_new_with_label ("Add many");
 569   g_signal_connect (button, "clicked", G_CALLBACK (add_many), icon_list);
 570   gtk_box_pack_start (GTK_BOX (bbox), button, TRUE, TRUE, 0);
 571
 572   button = gtk_button_new_with_label ("Add large");
 573   g_signal_connect (button, "clicked", G_CALLBACK (add_large), icon_list);
 574   gtk_box_pack_start (GTK_BOX (bbox), button, TRUE, TRUE, 0);
 575
 576   button = gtk_button_new_with_label ("Remove selected");
 577   g_signal_connect (button, "clicked", G_CALLBACK (foreach_selected_remove), icon_list);
 578   gtk_box_pack_start (GTK_BOX (bbox), button, TRUE, TRUE, 0);
 579
 580   button = gtk_button_new_with_label ("Swap");
 581   g_signal_connect (button, "clicked", G_CALLBACK (swap_rows), icon_list);
 582   gtk_box_pack_start (GTK_BOX (bbox), button, TRUE, TRUE, 0);
 583
 584   bbox = gtk_button_box_new (GTK_ORIENTATION_HORIZONTAL);
 585   gtk_button_box_set_layout (GTK_BUTTON_BOX (bbox), GTK_BUTTONBOX_START);
 586   gtk_box_pack_start (GTK_BOX (vbox), bbox, FALSE, FALSE, 0);
 587
 588   button = gtk_button_new_with_label ("Select all");
 589   g_signal_connect (button, "clicked", G_CALLBACK (select_all), icon_list);
 590   gtk_box_pack_start (GTK_BOX (bbox), button, TRUE, TRUE, 0);
 591
 592   button = gtk_button_new_with_label ("Unselect all");
 593   g_signal_connect (button, "clicked", G_CALLBACK (unselect_all), icon_list);
 594   gtk_box_pack_start (GTK_BOX (bbox), button, TRUE, TRUE, 0);
 595
 596   button = gtk_button_new_with_label ("Select nonexisting");
 597   g_signal_connect (button, "clicked", G_CALLBACK (select_nonexisting), icon_list);
 598   gtk_box_pack_start (GTK_BOX (bbox), button, TRUE, TRUE, 0);
 599
 600   icon_list = gtk_icon_view_new ();
 601
 602   scrolled_window = gtk_scrolled_window_new (NULL, NULL);
 603   gtk_container_add (GTK_CONTAINER (scrolled_window), icon_list);
 604   gtk_scrolled_window_set_policy (GTK_SCROLLED_WINDOW (scrolled_window),
 605                                   GTK_POLICY_AUTOMATIC, GTK_POLICY_AUTOMATIC);
 606   gtk_paned_add2 (GTK_PANED (paned), scrolled_window);
 607
 608   gtk_widget_show_all (window);
 609
 610   gtk_main ();
 611
 612   return 0;
 613 }