helm/DEVEL/mathml_editor/test/guiGTK.c

   1 /* This file is part of EdiTeX, an editor of mathematical
   2  * expressions based on TeX syntax.
   3  *
   4  * Copyright (C) 2002-2003 Luca Padovani <lpadovan@cs.unibo.it>,
   5  *                    2003 Paolo Marinelli <pmarinel@cs.unibo.it>.
   6  *
   7  * This library is free software; you can redistribute it and/or
   8  * modify it under the terms of the GNU Lesser General Public
   9  * License as published by the Free Software Foundation; either
  10  * version 2.1 of the License, or (at your option) any later version.
  11  *
  12  * This library is distributed in the hope that it will be useful,
  13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  15  * Lesser General Public License for more details.
  16  *
  17  * You should have received a copy of the GNU Lesser General Public
  18  * License along with this library; if not, write to the Free Software
  19  * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  20  *
  21  * For more information, please visit the project's home page
  22  * http://helm.cs.unibo.it/editex/
  23  * or send an email to <lpadovan@cs.unibo.it>
  24  */
  25
  26 #include <config.h>
  27 #include <stdio.h>
  28 #include <gtk/gtk.h>
  29 #include <gdk/gdkkeysyms.h>
  30
  31 #include <gtkmathview.h>
  32 #include "guiGTK.h"
  33
  34 #define XLINK_NS_URI "http://www.w3.org/1999/xlink"
  35
  36 static GtkWidget* window;
  37 static GtkWidget* main_area;
  38 static GtkWidget* scrolled_area;
  39
  40 static gpointer context = NULL;
  41 static gchar* doc_name = NULL;
  42 static GdomeElement* first_selected = NULL;
  43 static GdomeElement* root_selected = NULL;
  44
  45 static void create_widget_set(gpointer);
  46 static GtkWidget* get_main_menu(void);
  47 static void file_open(GtkWidget*, gpointer);
  48 static void file_re_open(GtkWidget*, gpointer);
  49 static void file_close(GtkWidget*, gpointer);
  50 static void file_output_tex(GtkWidget*, gpointer);
  51 static void options_set_font_size(GtkWidget*, gpointer);
  52 static void options_change_font_size(GtkWidget*, gboolean);
  53 static void options_verbosity(GtkWidget*, guint);
  54 static void edit_delete_selection(GtkWidget*, gpointer);
  55 static void edit_select_parent(GtkWidget*, gpointer);
  56 static void edit_reset_selection(GtkWidget*, gpointer);
  57 static void edit_reset(GtkWidget*, gpointer);
  58 static void edit_insert(GtkWidget*, gpointer);
  59 static void help_about(GtkWidget*, gpointer);
  60
  61 static GtkItemFactoryEntry menu_items[] = {
  62   { "/_File",                          NULL,         NULL,          0, "<Branch>" },
  63   { "/File/_Open...",                  "<control>O", file_open,     0, NULL },
  64   { "/File/_Reopen",                   NULL,         file_re_open,  0, NULL },
  65   { "/File/_Close",                    "<control>W", file_close,    0, NULL },
  66   { "/File/Output _TeX",               NULL,         file_output_tex, 0, NULL },
  67   { "/File/sep1",                      NULL,         NULL,          0, "<Separator>" },
  68   { "/File/_Quit",                     "<control>Q", gtk_main_quit, 0, NULL },
  69
  70   { "/_Edit",                          NULL, NULL,                  0,  "<Branch>" },
  71   { "/Edit/Reset Selection",           NULL, edit_reset_selection,  0, NULL },
  72   { "/Edit/Delete Selection",          NULL, edit_delete_selection, 0, NULL },
  73   { "/Edit/Select Parent",             NULL, edit_select_parent,    0, NULL },
  74   { "/Edit/sep1",                      NULL,         NULL,          0, "<Separator>" },
  75   { "/Edit/_Reset",                    NULL, edit_reset,            0, NULL },
  76   { "/Edit/Insert...",                 "<control>I", edit_insert,   0, NULL },
  77
  78   { "/_Options",                       NULL, NULL,                  0,  "<Branch>" },
  79   { "/Options/Default _Font Size",     NULL, NULL,                  0,  "<Branch>" },
  80   { "/Options/Default Font Size/Set...", NULL, options_set_font_size, 0,  NULL },
  81   { "/Options/Default Font Size/sep1", NULL, NULL,                  0,  "<Separator>" },
  82   { "/Options/Default Font Size/Larger", NULL, options_change_font_size, TRUE, NULL },
  83   { "/Options/Default Font Size/Smaller", NULL, options_change_font_size, FALSE, NULL },
  84   { "/Options/Verbosity",              NULL, NULL,                  0,  "<Branch>" },
  85   { "/Options/Verbosity/_Errors",      NULL, options_verbosity,     0,  "<RadioItem>" },
  86   { "/Options/Verbosity/_Warnings",    NULL, options_verbosity,     1,  "/Options/Verbosity/Errors" },
  87   { "/Options/Verbosity/_Info",        NULL, options_verbosity,     2,  "/Options/Verbosity/Errors" },
  88   { "/Options/Verbosity/_Debug",       NULL, options_verbosity,     3,  "/Options/Verbosity/Errors" },
  89
  90   { "/_Help" ,        NULL,         NULL,          0, "<LastBranch>" },
  91   { "/Help/About...", NULL,         help_about,    0, NULL }
  92 };
  93
  94 static void
  95 quick_message(const char* msg)
  96 {
  97   GtkWidget* dialog;
  98   GtkWidget* label;
  99   GtkWidget* okay_button;
 100
 101   /* Create the widgets */
 102
 103   dialog = gtk_dialog_new();
 104   label = gtk_label_new (msg);
 105   okay_button = gtk_button_new_with_label("OK");
 106
 107   gtk_widget_set_usize(dialog, 300, 100);
 108
 109   /* Ensure that the dialog box is destroyed when the user clicks ok. */
 110
 111   gtk_signal_connect_object (GTK_OBJECT (okay_button), "clicked",
 112                              GTK_SIGNAL_FUNC (gtk_widget_destroy), dialog);
 113   gtk_container_add (GTK_CONTAINER (GTK_DIALOG(dialog)->action_area),
 114                      okay_button);
 115
 116   /* Add the label, and show everything we've added to the dialog. */
 117
 118   gtk_container_add (GTK_CONTAINER (GTK_DIALOG(dialog)->vbox), label);
 119   gtk_widget_show_all (dialog);
 120 }
 121
 122 static void
 123 load_error_msg(const char* name)
 124 {
 125   char* msg = g_strdup_printf("Could not load\n`%s'", name);
 126   quick_message(msg);
 127   g_free(msg);
 128 }
 129
 130 static guint edit_timeout_id;
 131 extern void edit_timeout(gpointer);
 132
 133 void
 134 GUI_init(int* argc, char*** argv, char* title, guint width, guint height, gpointer c)
 135 {
 136   gtk_init(argc, argv);
 137
 138   window = gtk_window_new(GTK_WINDOW_TOPLEVEL);
 139   gtk_window_set_title(GTK_WINDOW(window), title);
 140   gtk_window_set_default_size(GTK_WINDOW(window), width, height);
 141   gtk_signal_connect(GTK_OBJECT(window), "delete_event", (GtkSignalFunc) gtk_main_quit, NULL);
 142   create_widget_set(context);
 143
 144   gtk_widget_show(window);
 145
 146   context = c;
 147   /*edit_timeout_id = gtk_timeout_add(50, edit_timeout, context);*/
 148 }
 149
 150 void
 151 GUI_uninit()
 152 {
 153   GdomeException exc = 0;
 154
 155   if (first_selected != NULL)
 156     {
 157       gdome_el_unref(first_selected, &exc);
 158       g_assert(exc == 0);
 159       first_selected = NULL;
 160     }
 161
 162   if (root_selected != NULL)
 163     {
 164       gdome_el_unref(root_selected, &exc);
 165       g_assert(exc == 0);
 166       root_selected = NULL;
 167     }
 168
 169   context = NULL;
 170 }
 171
 172 int
 173 GUI_load_document(GdomeDocument* doc)
 174 {
 175   GtkMathView* math_view;
 176
 177   g_return_val_if_fail(doc != NULL, -1);
 178   g_return_val_if_fail(main_area != NULL, -1);
 179   g_return_val_if_fail(GTK_IS_MATH_VIEW(main_area), -1);
 180
 181   math_view = GTK_MATH_VIEW(main_area);
 182
 183   if (!gtk_math_view_load_doc(math_view, doc)) return -1;
 184
 185   return 0;
 186 }
 187
 188 void
 189 GUI_freeze()
 190 {
 191   gtk_math_view_freeze(GTK_MATH_VIEW(main_area));
 192 }
 193
 194 void
 195 GUI_thaw()
 196 {
 197   gtk_math_view_thaw(GTK_MATH_VIEW(main_area));
 198 }
 199
 200 void
 201 GUI_unload_document()
 202 {
 203   GtkMathView* math_view;
 204
 205   g_return_if_fail(main_area != NULL);
 206   g_return_if_fail(GTK_IS_MATH_VIEW(main_area));
 207
 208   math_view = GTK_MATH_VIEW(main_area);
 209
 210   gtk_math_view_unload(math_view);
 211
 212   if (doc_name != NULL) g_free(doc_name);
 213   doc_name = NULL;
 214 }
 215
 216 void
 217 GUI_run()
 218 {
 219   gtk_main();
 220 }
 221
 222 #if 0
 223 void
 224 GUI_set_font_manager(FontManagerId id)
 225 {
 226   gboolean t1;
 227   GtkMathView* math_view;
 228
 229   g_return_if_fail(id != FONT_MANAGER_UNKNOWN);
 230   g_return_if_fail(main_area != NULL);
 231   g_return_if_fail(GTK_IS_MATH_VIEW(main_area));
 232
 233   t1 = id == FONT_MANAGER_T1;
 234
 235   math_view = GTK_MATH_VIEW(main_area);
 236
 237   gtk_math_view_freeze(math_view);
 238
 239   if (id != gtk_math_view_get_font_manager_type(math_view))
 240     gtk_math_view_set_font_manager_type(math_view, id);
 241
 242   gtk_widget_set_sensitive(anti_aliasing(math_view, GTK_CHECK_MENU_ITEM(anti_aliasing_item)->active);
 243       gtk_math_view_set_transparency(math_view, GTK_CHECK_MENU_ITEM(transparency_item)->active);
 244     }
 245
 246   gtk_math_view_thaw(math_view);
 247 }
 248 #endif
 249
 250 static void
 251 store_filename(GtkFileSelection* selector, GtkWidget* user_data)
 252 {
 253   gchar* selected_filename = gtk_file_selection_get_filename (GTK_FILE_SELECTION(user_data));
 254   if (selected_filename != NULL)
 255     GUI_load_document(selected_filename);
 256 }
 257
 258 static void
 259 file_close(GtkWidget* widget, gpointer data)
 260 {
 261   GUI_unload_document();
 262 }
 263
 264 static void
 265 file_re_open(GtkWidget* widget, gpointer data)
 266 {
 267   if (doc_name != NULL) {
 268     GUI_load_document(doc_name);
 269   }
 270 }
 271
 272 static void
 273 file_open(GtkWidget* widget, gpointer data)
 274 {
 275   GtkWidget* fs = gtk_file_selection_new("Open File");
 276
 277   gtk_signal_connect (GTK_OBJECT (GTK_FILE_SELECTION(fs)->ok_button),
 278                       "clicked", GTK_SIGNAL_FUNC (store_filename), (gpointer) fs);
 279
 280   /* Ensure that the dialog box is destroyed when the user clicks a button. */
 281
 282   gtk_signal_connect_object (GTK_OBJECT (GTK_FILE_SELECTION(fs)->ok_button),
 283                              "clicked", GTK_SIGNAL_FUNC (gtk_widget_destroy),
 284                              (gpointer) fs);
 285
 286   gtk_signal_connect_object (GTK_OBJECT (GTK_FILE_SELECTION(fs)->cancel_button),
 287                              "clicked", GTK_SIGNAL_FUNC (gtk_widget_destroy),
 288                              (gpointer) fs);
 289
 290   /* Display that dialog */
 291
 292   gtk_widget_show (fs);
 293 }
 294
 295 static void
 296 file_output_tex(GtkWidget* widget, gpointer data)
 297 {
 298   g_assert(context != NULL);
 299   edit_output_tex(context);
 300 }
 301
 302 #if 0
 303 static void
 304 options_font_manager(GtkWidget* widget, FontManagerId id)
 305 {
 306   g_return_if_fail(id != FONT_MANAGER_UNKNOWN);
 307   GUI_set_font_manager(id);
 308 }
 309 #endif
 310
 311 static void
 312 options_verbosity(GtkWidget* widget, guint level)
 313 {
 314   gtk_math_view_set_log_verbosity(GTK_MATH_VIEW(main_area), level);
 315 }
 316
 317 static void
 318 edit_delete_selection(GtkWidget* widget, gpointer data)
 319 {
 320   if (root_selected != NULL)
 321     {
 322       GdomeException exc;
 323       gtk_math_view_freeze(GTK_MATH_VIEW(main_area));
 324       printf("about to remove element %p\n", root_selected);
 325       delete_element(root_selected);
 326       gdome_el_unref(root_selected, &exc);
 327       g_assert(exc == 0);
 328       root_selected = NULL;
 329       gtk_math_view_thaw(GTK_MATH_VIEW(main_area));
 330     }
 331 }
 332
 333 static void
 334 edit_select_parent(GtkWidget* widget, gpointer data)
 335 {
 336   if (root_selected != NULL)
 337     {
 338       GdomeException exc = 0;
 339       GdomeElement* parent = gdome_n_parentNode(root_selected, &exc);
 340       g_assert(exc == 0);
 341       gdome_el_unref(root_selected, &exc);
 342       g_assert(exc == 0);
 343       root_selected = parent;
 344       /* gtk_math_view_set_selection(GTK_MATH_VIEW(main_area), root_selected); */
 345     }
 346 }
 347
 348 static void
 349 edit_reset_selection(GtkWidget* widget, gpointer data)
 350 {
 351   if (root_selected != NULL)
 352     {
 353       GdomeException exc = 0;
 354       /* gtk_math_view_reset_selection(GTK_MATH_VIEW(main_area), root_selected); */
 355       gdome_el_unref(root_selected, &exc);
 356       g_assert(exc == 0);
 357       root_selected = NULL;
 358     }
 359 }
 360
 361 static void
 362 edit_reset(GtkWidget* widget, gpointer data)
 363 {
 364   g_assert(context != NULL);
 365   edit_reset_tex(context);
 366 }
 367
 368 static void
 369 insert_tex(GtkWidget* widget, GtkEntry* entry)
 370 {
 371   gchar* text;
 372   g_return_if_fail(entry != NULL);
 373
 374   text = gtk_editable_get_chars(GTK_EDITABLE(entry), 0, -1);
 375   edit_push_string(context, text);
 376   g_free(text);
 377 }
 378
 379 static void
 380 edit_insert(GtkWidget* widget, gpointer data)
 381 {
 382   GtkWidget* dialog;
 383   GtkWidget* entry;
 384   GtkWidget* ok;
 385   GtkWidget* cancel;
 386
 387   dialog = gtk_dialog_new();
 388   entry = gtk_entry_new();
 389   ok = gtk_button_new_with_label("OK");
 390   cancel = gtk_button_new_with_label("Cancel");
 391
 392   gtk_signal_connect (GTK_OBJECT (ok), "clicked",
 393                       GTK_SIGNAL_FUNC (insert_tex), (gpointer) entry);
 394
 395   gtk_signal_connect_object (GTK_OBJECT (ok), "clicked",
 396                              GTK_SIGNAL_FUNC (gtk_widget_destroy), (gpointer) dialog);
 397
 398   gtk_signal_connect_object (GTK_OBJECT (ok), "clicked",
 399                              GTK_SIGNAL_FUNC (gtk_widget_destroy), (gpointer) dialog);
 400
 401   gtk_signal_connect_object (GTK_OBJECT (cancel), "clicked",
 402                              GTK_SIGNAL_FUNC (gtk_widget_destroy), (gpointer) dialog);
 403
 404   gtk_container_set_border_width (GTK_CONTAINER (GTK_DIALOG(dialog)->vbox), 5);
 405
 406   gtk_container_add (GTK_CONTAINER (GTK_DIALOG(dialog)->vbox), entry);
 407   gtk_container_add (GTK_CONTAINER (GTK_DIALOG(dialog)->action_area), ok);
 408   gtk_container_add (GTK_CONTAINER (GTK_DIALOG(dialog)->action_area), cancel);
 409
 410   gtk_widget_show_all (dialog);
 411 }
 412
 413 static void
 414 help_about(GtkWidget* widget, gpointer data)
 415 {
 416   GtkWidget* dialog;
 417   GtkWidget* label;
 418   GtkWidget* ok;
 419
 420   dialog = gtk_dialog_new();
 421   label = gtk_label_new("\n    MathML Editor    \n    Copyright (C) 2003 Luca Padovani    \n");
 422   ok = gtk_button_new_with_label("Close");
 423
 424   gtk_signal_connect_object (GTK_OBJECT (ok), "clicked",
 425                              GTK_SIGNAL_FUNC (gtk_widget_destroy), (gpointer) dialog);
 426   gtk_container_add (GTK_CONTAINER (GTK_DIALOG(dialog)->action_area),
 427                      ok);
 428
 429   gtk_container_add (GTK_CONTAINER (GTK_DIALOG(dialog)->vbox), label);
 430
 431   gtk_widget_show_all (dialog);
 432 }
 433
 434 static void
 435 change_default_font_size(GtkWidget* widget, GtkSpinButton* spin)
 436 {
 437   g_return_if_fail(spin != NULL);
 438   gtk_math_view_set_font_size( GTK_MATH_VIEW(main_area), gtk_spin_button_get_value_as_int(spin));
 439 }
 440
 441 static void
 442 options_change_font_size(GtkWidget* widget, gboolean larger)
 443 {
 444   gfloat size = gtk_math_view_get_font_size (GTK_MATH_VIEW(main_area));
 445   if (larger) size = size / 0.71;
 446   else size = size * 0.71;
 447   if (size < 1) size = 1;
 448   gtk_math_view_set_font_size (GTK_MATH_VIEW(main_area), (gint) size + 0.5);
 449 }
 450
 451 static void
 452 options_set_font_size(GtkWidget* widget, gpointer data)
 453 {
 454   GtkWidget* dialog;
 455   GtkWidget* label;
 456   GtkWidget* ok;
 457   GtkWidget* cancel;
 458   GtkWidget* spin;
 459   GtkObject* adj;
 460
 461   dialog = gtk_dialog_new();
 462   label = gtk_label_new("Default font size:");
 463   ok = gtk_button_new_with_label("OK");
 464   cancel = gtk_button_new_with_label("Cancel");
 465
 466   adj = gtk_adjustment_new (gtk_math_view_get_font_size (GTK_MATH_VIEW(main_area)), 1, 200, 1, 1, 1);
 467   spin = gtk_spin_button_new (GTK_ADJUSTMENT(adj), 1, 0);
 468   gtk_spin_button_set_numeric (GTK_SPIN_BUTTON (spin), TRUE);
 469
 470   gtk_signal_connect (GTK_OBJECT (ok), "clicked",
 471                       GTK_SIGNAL_FUNC (change_default_font_size), (gpointer) spin);
 472
 473   gtk_signal_connect_object (GTK_OBJECT (ok), "clicked",
 474                              GTK_SIGNAL_FUNC (gtk_widget_destroy), (gpointer) dialog);
 475
 476   gtk_signal_connect_object (GTK_OBJECT (ok), "clicked",
 477                              GTK_SIGNAL_FUNC (gtk_widget_destroy), (gpointer) dialog);
 478
 479   gtk_signal_connect_object (GTK_OBJECT (cancel), "clicked",
 480                              GTK_SIGNAL_FUNC (gtk_widget_destroy), (gpointer) dialog);
 481
 482   gtk_container_set_border_width (GTK_CONTAINER (GTK_DIALOG(dialog)->vbox), 5);
 483
 484   gtk_container_add (GTK_CONTAINER (GTK_DIALOG(dialog)->action_area), ok);
 485   gtk_container_add (GTK_CONTAINER (GTK_DIALOG(dialog)->action_area), cancel);
 486   gtk_container_add (GTK_CONTAINER (GTK_DIALOG(dialog)->vbox), label);
 487   gtk_container_add (GTK_CONTAINER (GTK_DIALOG(dialog)->vbox), spin);
 488
 489   gtk_widget_show_all (dialog);
 490 }
 491
 492 static void
 493 select_begin(GtkMathView* math_view, GdomeElement* first, gint state)
 494 {
 495   GdomeException exc = 0;
 496
 497   g_return_if_fail(math_view != NULL);
 498   g_return_if_fail(GTK_IS_MATH_VIEW(math_view));
 499   g_return_if_fail(first != NULL);
 500
 501   gtk_math_view_freeze(math_view);
 502
 503   if (root_selected != NULL)
 504     {
 505       gtk_math_view_unselect(math_view, root_selected);
 506       gdome_el_unref(root_selected, &exc);
 507       g_assert(exc == 0);
 508     }
 509
 510   root_selected = first_selected = find_element_with_ref(first);
 511
 512   if (root_selected != NULL)
 513     {
 514       gtk_math_view_select(math_view, root_selected);
 515       gdome_el_ref(root_selected, &exc);
 516       g_assert(exc == 0);
 517     }
 518
 519   gtk_math_view_thaw(math_view);
 520 }
 521
 522 static void
 523 select_over(GtkMathView* math_view, GdomeElement* elem, gint state)
 524 {
 525   GdomeElement* new_selected = NULL;
 526   GdomeException exc = 0;
 527
 528   g_return_if_fail(math_view != NULL);
 529   g_return_if_fail(GTK_IS_MATH_VIEW(math_view));
 530   g_return_if_fail(elem != NULL);
 531
 532   if (first_selected == NULL || elem == NULL)
 533     new_selected = NULL;
 534   else
 535     new_selected = find_common_ancestor_with_ref(first_selected, elem);
 536
 537   if (new_selected != root_selected)
 538     {
 539       gtk_math_view_freeze(math_view);
 540       if (root_selected != NULL)
 541         {
 542           gtk_math_view_unselect(math_view, root_selected);
 543           gdome_el_unref(root_selected, &exc);
 544           g_assert(exc == 0);
 545         }
 546       root_selected = new_selected;
 547       if (root_selected != NULL)
 548         gtk_math_view_select(math_view, root_selected);
 549       gtk_math_view_thaw(math_view);
 550     }
 551   else if (new_selected != NULL)
 552     {
 553       gdome_el_unref(new_selected, &exc);
 554       g_assert(exc == 0);
 555     }
 556
 557 }
 558
 559 static gboolean
 560 key_press_event(gpointer c,
 561                 GdkEventKey* event,
 562                 GtkWidget* widget)
 563 {
 564   g_return_val_if_fail(widget != NULL, FALSE);
 565   g_return_val_if_fail(event != NULL, FALSE);
 566   g_return_val_if_fail(context != NULL, FALSE);
 567
 568   if (event->type != GDK_KEY_PRESS) return FALSE;
 569
 570   switch (event->keyval)
 571     {
 572     case GDK_BackSpace:
 573       edit_drop(context, event->state & GDK_MOD1_MASK, event->state & GDK_CONTROL_MASK);
 574       break;
 575     case GDK_Tab:
 576       edit_complete(context);
 577       break;
 578     default:
 579       if ((event->state & (GDK_CONTROL_MASK | GDK_MOD1_MASK)) == 0 && event->keyval < 0x80)
 580         edit_push_char(context, event->keyval);
 581       return FALSE;
 582     }
 583
 584   return TRUE;
 585 }
 586
 587 static void
 588 create_widget_set(gpointer context)
 589 {
 590   GtkWidget* main_vbox;
 591   GtkWidget* menu_bar;
 592
 593   main_vbox = gtk_vbox_new(FALSE, 1);
 594   gtk_container_border_width(GTK_CONTAINER(main_vbox), 1);
 595   gtk_container_add(GTK_CONTAINER(window), main_vbox);
 596   gtk_widget_show(main_vbox);
 597
 598   menu_bar = get_main_menu();
 599   gtk_box_pack_start(GTK_BOX(main_vbox), menu_bar, FALSE, TRUE, 0);
 600   gtk_widget_show(menu_bar);
 601
 602   main_area = gtk_math_view_new(NULL, NULL);
 603   gtk_widget_show(main_area);
 604
 605   //gtk_math_view_set_log_verbosity(GTK_MATH_VIEW(main_area), 3);
 606
 607   gtk_signal_connect_object (GTK_OBJECT (main_area),
 608                              "select_begin", GTK_SIGNAL_FUNC (select_begin),
 609                              (gpointer) main_area);
 610
 611   gtk_signal_connect_object (GTK_OBJECT (main_area),
 612                              "select_over", GTK_SIGNAL_FUNC (select_over),
 613                              (gpointer) main_area);
 614
 615   gtk_signal_connect_object (GTK_OBJECT(window),
 616                              "key_press_event", GTK_SIGNAL_FUNC(key_press_event),
 617                              context);
 618
 619   gtk_widget_add_events(GTK_WIDGET(main_area), GDK_KEY_PRESS_MASK);
 620
 621   scrolled_area = gtk_scrolled_window_new(NULL, NULL);
 622   gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(scrolled_area),
 623                                  GTK_POLICY_AUTOMATIC, GTK_POLICY_ALWAYS);
 624
 625   gtk_widget_show(scrolled_area);
 626   gtk_container_add(GTK_CONTAINER(scrolled_area), main_area);
 627   gtk_box_pack_start(GTK_BOX(main_vbox), scrolled_area, TRUE, TRUE, 0);
 628
 629   gtk_widget_show(main_vbox);
 630 }
 631
 632 GtkWidget*
 633 get_main_menu()
 634 {
 635   GtkItemFactory* item_factory;
 636   GtkAccelGroup* accel_group;
 637   GtkWidget* menu_item;
 638
 639   gint nmenu_items = sizeof(menu_items) / sizeof(menu_items[0]);
 640
 641   accel_group = gtk_accel_group_new();
 642
 643   item_factory = gtk_item_factory_new(GTK_TYPE_MENU_BAR, "<main>", accel_group);
 644
 645   gtk_item_factory_create_items(item_factory, nmenu_items, menu_items, NULL);
 646
 647   gtk_window_add_accel_group(GTK_WINDOW(window), accel_group);
 648
 649   return gtk_item_factory_get_widget(item_factory, "<main>");
 650 }