Added an initialization function, which must be called at every entry point of the...

[rodin/chimara.git] / tests / test-multisession.c

diff --git a/tests/test-multisession.c b/tests/test-multisession.c
index 7f984c837ea136ed80086852d5387d3d149aa5f3..0bf7a3ed93dbd76bc2ac867d2257e2b302a0b40b 100644 (file)
--- a/tests/test-multisession.c
+++ b/tests/test-multisession.c
@@ -17,25 +17,30 @@ on_stopped(ChimaraGlk *glk, const gchar *data)
     g_printerr("%s stopped!\n", data);
 }
 
+static gboolean
+on_delete_event(void)
+{
+       gtk_main_quit();
+       return TRUE;
+}
+
 int
 main(int argc, char **argv)
 {
        if( !g_thread_supported() )
                g_thread_init(NULL);
-
        gdk_threads_init();
-    
-       gtk_set_locale();
        gtk_init(&argc, &argv);
 
        GtkWidget *window = gtk_window_new(GTK_WINDOW_TOPLEVEL);
        gtk_widget_set_size_request(window, 800, 500);
+       g_signal_connect(window, "delete_event", G_CALLBACK(on_delete_event), NULL);
        
        GtkWidget *hpaned = gtk_hpaned_new();
        gtk_paned_set_position(GTK_PANED(hpaned), 400);
        
        GtkWidget *frotz = chimara_glk_new();
-       chimara_glk_set_default_font_string(CHIMARA_GLK(frotz), "Lucida Sans Unicode 12");
+       chimara_glk_set_default_font_string(CHIMARA_GLK(frotz), "Lucida Sans 12");
        chimara_glk_set_monospace_font_string(CHIMARA_GLK(frotz), "Lucida Console 12");
        g_signal_connect(frotz, "started", G_CALLBACK(on_started), "Frotz");
        g_signal_connect(frotz, "stopped", G_CALLBACK(on_stopped), "Frotz");
@@ -56,11 +61,11 @@ main(int argc, char **argv)
                return 1;
        if(!chimara_glk_run(CHIMARA_GLK(nitfol), "../interpreters/nitfol/.libs/nitfol.so", argc, argv, NULL))
                return 1;
-
+       
     gdk_threads_enter();
        gtk_main();
        gdk_threads_leave();
-
+       
        chimara_glk_stop(CHIMARA_GLK(frotz));
        chimara_glk_stop(CHIMARA_GLK(nitfol));