- glade_init ();
-
- fmt_init ();
- settings_init ();
- fh_init ();
- factory = flexifile_factory_create ();
- the_source_stream = create_source_stream (
- fn_getenv_default ("STAT_INCLUDE_PATH", include_path)
- );
-
- the_dataset = create_dataset (factory);
-
- message_dialog_init (the_source_stream);
-
- dictionary =
- psppire_dict_new_from_dict (
- dataset_dict (the_dataset)
- );
-
- bind_textdomain_codeset (PACKAGE, "UTF-8");
-
- /* Create the model for the var_sheet */
- the_var_store = psppire_var_store_new (dictionary);
-
-
- the_data_store = psppire_data_store_new (dictionary);
-
- create_icon_factory ();
-
-#if 0
- /* load the interface */
- data_editor_xml = glade_xml_new (PKGDATADIR "/data-editor.glade", NULL, NULL);
-
- if ( !data_editor_xml ) return 1;
-
- data_editor = get_widget_assert (data_editor_xml, "data_editor");
-
- /* connect the signals in the interface */
- glade_xml_signal_autoconnect (data_editor_xml);
-
- var_sheet = GTK_SHEET (get_widget_assert (data_editor_xml, "variable_sheet"));
- data_sheet = GTK_SHEET (get_widget_assert (data_editor_xml, "data_sheet"));
-
- gtk_sheet_set_model (var_sheet, G_SHEET_MODEL (the_var_store));
-
- gtk_sheet_set_model (data_sheet, G_SHEET_MODEL (the_data_store));
-
- var_data_selection_init ();
-
- {
- GList *helps = glade_xml_get_widget_prefix (data_editor_xml, "help_button_");
-
- GList *i;
- for ( i = g_list_first (helps); i ; i = g_list_next (i))
- g_signal_connect (GTK_WIDGET (i->data), "clicked", give_help, 0);
- }
-
-#endif
-
- new_data_window (NULL, NULL);
-
- /* start the event loop */
- gtk_main ();
-
- destroy_source_stream (the_source_stream);
- message_dialog_done ();