X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fui%2Fgui%2Fdescriptives-dialog.c;h=a1e65ea7d7971a9fbb4643dac59ccfabad308628;hb=66153a44d861ccddf6a176ec5a94ffb959232ad6;hp=7b33eae21026e454362cbb238f15c828034b21ff;hpb=db2b1501c7ef5912183d51340740dd4bd2ee45ac;p=pspp-builds.git diff --git a/src/ui/gui/descriptives-dialog.c b/src/ui/gui/descriptives-dialog.c index 7b33eae2..a1e65ea7 100644 --- a/src/ui/gui/descriptives-dialog.c +++ b/src/ui/gui/descriptives-dialog.c @@ -23,13 +23,13 @@ #include #include -#include +#include #include #include #include #include #include -#include +#include "executor.h" #include "gettext.h" #define _(msgid) gettext (msgid) @@ -202,11 +202,11 @@ void descriptives_dialog (GObject *o, gpointer data) { gint response; - struct data_editor *de = data; + PsppireDataWindow *de = PSPPIRE_DATA_WINDOW (data); struct descriptives_dialog scd; - GladeXML *xml = XML_NEW ("descriptives-dialog.glade"); + GtkBuilder *xml = builder_new ("descriptives-dialog.ui"); GtkWidget *dialog = get_widget_assert (xml, "descriptives-dialog"); @@ -218,16 +218,18 @@ descriptives_dialog (GObject *o, gpointer data) GtkWidget *stats_treeview = get_widget_assert (xml, "statistics"); PsppireVarStore *vs = NULL; + PsppireDict *dict; g_object_get (de->data_editor, "var-store", &vs, NULL); + g_object_get (vs, "dictionary", &dict, NULL); + + gtk_window_set_transient_for (GTK_WINDOW (dialog), GTK_WINDOW (de)); - gtk_window_set_transient_for (GTK_WINDOW (dialog), de->parent.window); - attach_dictionary_to_treeview (GTK_TREE_VIEW (source), - vs->dict, - GTK_SELECTION_MULTIPLE, var_is_numeric); + g_object_set (source, "dictionary", dict, + "predicate", var_is_numeric, NULL); - set_dest_model (GTK_TREE_VIEW (dest), vs->dict); + set_dest_model (GTK_TREE_VIEW (dest), dict); psppire_selector_set_subjects (PSPPIRE_SELECTOR (selector), source, @@ -242,7 +244,9 @@ descriptives_dialog (GObject *o, gpointer data) scd.stat_vars = GTK_TREE_VIEW (dest); scd.stats = gtk_tree_view_get_model (GTK_TREE_VIEW (stats_treeview)); - scd.dict = vs->dict; + + g_object_get (vs, "dictionary", &scd.dict, NULL); + scd.include_user_missing = GTK_TOGGLE_BUTTON (get_widget_assert (xml, "include_user_missing")); scd.exclude_missing_listwise = @@ -263,6 +267,7 @@ descriptives_dialog (GObject *o, gpointer data) case GTK_RESPONSE_OK: { gchar *syntax = generate_syntax (&scd); + struct getl_interface *sss = create_syntax_string_source (syntax); execute_syntax (sss); @@ -272,12 +277,7 @@ descriptives_dialog (GObject *o, gpointer data) case PSPPIRE_RESPONSE_PASTE: { gchar *syntax = generate_syntax (&scd); - - 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); } break;