Added calls to set the preferred interpreter
[projects/chimara/chimara.git] / player / main.c
index 3586ca1b3654ae1ecd17b6ebe6b8a32f8ae51132..9bfcb6fa6a096670ce113cf623ef968df5fc6f20 100644 (file)
@@ -155,6 +155,7 @@ create_window(void)
        const gchar *patterns[] = {
                "*.z[1-8]", "*.[zg]lb", "*.[zg]blorb", "*.ulx", "*.blb", "*.blorb", NULL
        };
+       
        for(ptr = patterns; *ptr; ptr++)
                gtk_recent_filter_add_pattern(filter, *ptr);
        GtkRecentChooser *recent = GTK_RECENT_CHOOSER(load_object("recent"));
@@ -175,12 +176,15 @@ create_window(void)
        }
        
        glk = chimara_if_new();
-       g_object_set(glk, "ignore-errors", TRUE, NULL);
+       g_object_set(glk,
+           "ignore-errors", TRUE,
+           /*"interpreter-number", CHIMARA_IF_ZMACHINE_TANDY_COLOR,*/
+           NULL);
        if( !chimara_glk_set_css_from_file(CHIMARA_GLK(glk), PACKAGE_DATA_DIR "/style.css", &error) ) {
 #ifdef DEBUG
                g_error_free(error);
                error = NULL;
-               if( !chimara_glk_set_css_from_file(CHIMARA_GLK(glk), PACKAGE_SRC_DIR "/macstyle.css", &error) ) {
+               if( !chimara_glk_set_css_from_file(CHIMARA_GLK(glk), PACKAGE_SRC_DIR "/style.css", &error) ) {
 #endif /* DEBUG */
                        error_dialog(NULL, error, "Couldn't open CSS file: ");
                        return;
@@ -188,6 +192,24 @@ create_window(void)
                }
 #endif /* DEBUG */
        }
+       chimara_if_set_preferred_interpreter(CHIMARA_IF(glk),
+           CHIMARA_IF_FORMAT_Z5,
+           CHIMARA_IF_INTERPRETER_FROTZ);
+       chimara_if_set_preferred_interpreter(CHIMARA_IF(glk),
+           CHIMARA_IF_FORMAT_Z6,
+           CHIMARA_IF_INTERPRETER_NITFOL);
+       chimara_if_set_preferred_interpreter(CHIMARA_IF(glk),
+           CHIMARA_IF_FORMAT_Z8,
+           CHIMARA_IF_INTERPRETER_FROTZ);
+       chimara_if_set_preferred_interpreter(CHIMARA_IF(glk),
+           CHIMARA_IF_FORMAT_Z_BLORB,
+           CHIMARA_IF_INTERPRETER_FROTZ);
+       chimara_if_set_preferred_interpreter(CHIMARA_IF(glk),
+           CHIMARA_IF_FORMAT_GLULX,
+           CHIMARA_IF_INTERPRETER_GLULXE);
+       chimara_if_set_preferred_interpreter(CHIMARA_IF(glk),
+           CHIMARA_IF_FORMAT_GLULX_BLORB,
+           CHIMARA_IF_INTERPRETER_GLULXE);
        
        /* DON'T UNCOMMENT THIS your eyes will burn
         but it is a good test of programmatically altering just one style
@@ -214,7 +236,7 @@ create_window(void)
        g_signal_connect(glk, "notify::story-name", G_CALLBACK(change_window_title), window);
        
        /* Create preferences window */
-       preferences_create(CHIMARA_GLK(glk));
+       //preferences_create(CHIMARA_GLK(glk));
 }
 
 int