X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fui%2Fgui%2Foneway-anova-dialog.c;h=a17a93977e612db7fa99b9eb58226fd9b91f72c8;hb=9e0e4996fad6563f0a1ce628b80db5c23ef8279e;hp=be281f7c546adb838306771c68ea50c1a7bfa86f;hpb=0bd0098aec2ee31d9460c8d4c1263d0b5ccc4324;p=pspp-builds.git diff --git a/src/ui/gui/oneway-anova-dialog.c b/src/ui/gui/oneway-anova-dialog.c index be281f7c..a17a9397 100644 --- a/src/ui/gui/oneway-anova-dialog.c +++ b/src/ui/gui/oneway-anova-dialog.c @@ -17,22 +17,21 @@ #include -#include #include #include "oneway-anova-dialog.h" #include "psppire-dict.h" #include "psppire-var-store.h" #include "helper.h" -#include -#include "data-editor.h" +#include "psppire-data-window.h" #include "psppire-dialog.h" #include "dialog-common.h" -#include "dict-display.h" #include "psppire-acr.h" +#include "psppire-selector.h" +#include "dict-display.h" #include -#include "syntax-editor.h" +#include "executor.h" #include "gettext.h" @@ -122,61 +121,57 @@ refresh (struct oneway_anova_dialog *ow) } + /* Pops up the dialog box */ void oneway_anova_dialog (GObject *o, gpointer data) { gint response; - struct data_editor *de = data; - - PsppireVarStore *vs; + PsppireDataWindow *de = PSPPIRE_DATA_WINDOW (data); - GladeXML *xml = XML_NEW ("oneway.glade"); + PsppireVarStore *vs = NULL; struct oneway_anova_dialog ow; - GtkSheet *var_sheet = - GTK_SHEET (get_widget_assert (de->xml, "variable_sheet")); + GtkBuilder *builder = builder_new ("oneway.ui"); GtkWidget *dict_view = - get_widget_assert (xml, "oneway-anova-treeview1"); + get_widget_assert (builder, "oneway-anova-treeview1"); GtkWidget *selector2 = - get_widget_assert (xml, "oneway-anova-selector2"); + get_widget_assert (builder, "oneway-anova-selector2"); GtkWidget *selector1 = - get_widget_assert (xml, "oneway-anova-selector1"); + get_widget_assert (builder, "oneway-anova-selector1"); GtkWidget *contrasts_button = - get_widget_assert (xml, "contrasts-button"); + get_widget_assert (builder, "contrasts-button"); g_signal_connect_swapped (contrasts_button, "clicked", G_CALLBACK (run_contrasts_dialog), &ow); - ow.factor_entry = get_widget_assert (xml, "oneway-anova-entry"); + ow.factor_entry = get_widget_assert (builder, "oneway-anova-entry"); ow.vars_treeview = - get_widget_assert (xml, "oneway-anova-treeview2"); + get_widget_assert (builder, "oneway-anova-treeview2"); ow.descriptives = - GTK_TOGGLE_BUTTON (get_widget_assert (xml, "checkbutton1")); + GTK_TOGGLE_BUTTON (get_widget_assert (builder, "checkbutton1")); ow.homogeneity = - GTK_TOGGLE_BUTTON (get_widget_assert (xml, "checkbutton2")); + GTK_TOGGLE_BUTTON (get_widget_assert (builder, "checkbutton2")); - vs = PSPPIRE_VAR_STORE (gtk_sheet_get_model (var_sheet)); + g_object_get (de->data_editor, "var-store", &vs, NULL); ow.dict = vs->dict; ow.dialog = - GTK_WINDOW (get_widget_assert (xml, "oneway-anova-dialog")); + GTK_WINDOW (get_widget_assert (builder, "oneway-anova-dialog")); - gtk_window_set_transient_for (ow.dialog, de->parent.window); + gtk_window_set_transient_for (ow.dialog, GTK_WINDOW (de)); - attach_dictionary_to_treeview (GTK_TREE_VIEW (dict_view), - vs->dict, - GTK_SELECTION_MULTIPLE, NULL); + g_object_set (dict_view, "dictionary", vs->dict, NULL); set_dest_model (GTK_TREE_VIEW (ow.vars_treeview), vs->dict); @@ -206,16 +201,16 @@ oneway_anova_dialog (GObject *o, gpointer data) { struct contrasts_subdialog *cd = &ow.contrasts; - GtkEntry *entry = GTK_ENTRY (get_widget_assert (xml, "entry1")); + GtkEntry *entry = GTK_ENTRY (get_widget_assert (builder, "entry1")); - cd->acr = PSPPIRE_ACR (get_widget_assert (xml, "psppire-acr1")); - cd->contrasts_dialog = get_widget_assert (xml, "contrasts-dialog"); + cd->acr = PSPPIRE_ACR (get_widget_assert (builder, "psppire-acr1")); + cd->contrasts_dialog = get_widget_assert (builder, "contrasts-dialog"); - cd->next = get_widget_assert (xml, "next-button"); - cd->prev = get_widget_assert (xml, "prev-button"); - cd->ctotal = get_widget_assert (xml, "entry2"); + cd->next = get_widget_assert (builder, "next-button"); + cd->prev = get_widget_assert (builder, "prev-button"); + cd->ctotal = get_widget_assert (builder, "entry2"); - cd->stack_label = get_widget_assert (xml, "contrast-stack-label"); + cd->stack_label = get_widget_assert (builder, "contrast-stack-label"); /* Contrasts */ ow.contrasts_array = g_array_new (FALSE, FALSE, sizeof (GtkListStore *)); @@ -226,7 +221,7 @@ oneway_anova_dialog (GObject *o, gpointer data) psppire_acr_set_entry (cd->acr, entry); gtk_window_set_transient_for (GTK_WINDOW (cd->contrasts_dialog), - de->parent.window); + GTK_WINDOW (de)); } response = psppire_dialog_run (PSPPIRE_DIALOG (ow.dialog)); @@ -236,6 +231,7 @@ oneway_anova_dialog (GObject *o, gpointer data) case GTK_RESPONSE_OK: { gchar *syntax = generate_syntax (&ow); + struct getl_interface *sss = create_syntax_string_source (syntax); execute_syntax (sss); @@ -245,11 +241,7 @@ oneway_anova_dialog (GObject *o, gpointer data) case PSPPIRE_RESPONSE_PASTE: { gchar *syntax = generate_syntax (&ow); - - struct syntax_editor *se = - (struct syntax_editor *) window_create (WINDOW_SYNTAX, NULL); - - gtk_text_buffer_insert_at_cursor (se->buffer, syntax, -1); + paste_syntax_in_new_window (syntax); g_free (syntax); } @@ -260,7 +252,7 @@ oneway_anova_dialog (GObject *o, gpointer data) g_array_free (ow.contrasts_array, FALSE); - g_object_unref (xml); + g_object_unref (builder); }