Renamed function to reflect change of purpose from previous commit

[pspp-builds.git] / src / ui / gui / correlation-dialog.c

diff --git a/src/ui/gui/correlation-dialog.c b/src/ui/gui/correlation-dialog.c
index 19bb7a7001e0ca31541251ea37f8b1a5dab67990..04e11ba1479f575e82e385aced8c8e49ed0ffc3a 100644 (file)
--- a/src/ui/gui/correlation-dialog.c
+++ b/src/ui/gui/correlation-dialog.c
@@ -83,13 +83,12 @@ dialog_state_valid (gpointer data)
 
 /* Pops up the Correlation dialog box */
 void
-correlation_dialog (GObject *o, gpointer data)
+correlation_dialog (PsppireDataWindow *de)
 {
   struct correlation rd;
   gint response;
 
   GtkBuilder *xml = builder_new ("correlation.ui");
-  PsppireDataWindow *de = PSPPIRE_DATA_WINDOW (data);
   PsppireVarStore *vs;
 
   GtkWidget *dialog = get_widget_assert   (xml, "correlation-dialog");
@@ -100,7 +99,10 @@ correlation_dialog (GObject *o, gpointer data)
   gtk_window_set_transient_for (GTK_WINDOW (dialog), GTK_WINDOW (de));
 
   g_object_get (vs, "dictionary", &rd.dict, NULL);
-  g_object_set (source, "model", rd.dict, NULL);
+  g_object_set (source,
+               "model", rd.dict, 
+               "predicate", var_is_numeric,
+               NULL);
 
   rd.variables = get_widget_assert (xml, "psppire-var-view1");
   rd.significant = get_widget_assert (xml, "button-flag-significants");
@@ -128,7 +130,7 @@ correlation_dialog (GObject *o, gpointer data)
     case PSPPIRE_RESPONSE_PASTE:
       {
        gchar *syntax = generate_syntax (&rd);
-        paste_syntax_in_new_window (syntax);
+        paste_syntax_to_window (syntax);
 
        g_free (syntax);
       }