Added a dialog box for the CORRELATION command
[pspp-builds.git] / src / ui / gui / psppire-data-window.c
index ffa9482eb0f4b766c391e32ac7c3ecac9dca3087..e9a89465b4cf1c17cda74bd5356e9547cf5b296d 100644 (file)
@@ -56,6 +56,8 @@
 #include "examine-dialog.h"
 #include "regression-dialog.h"
 #include "reliability-dialog.h"
+#include "roc-dialog.h"
+#include "correlation-dialog.h"
 #include "oneway-anova-dialog.h"
 #include "t-test-independent-samples-dialog.h"
 #include "t-test-one-sample.h"
@@ -1247,7 +1249,6 @@ psppire_data_window_init (PsppireDataWindow *de)
       resolve_action (de->builder, "file_save_as", NULL);
 
     g_object_set (action_data_save_as,
-                 "label", _("Save As"),
                  "tooltip", _("Save data to file"),
                  "stock-id", "gtk-save-as",
                  NULL);
@@ -1693,6 +1694,34 @@ psppire_data_window_init (PsppireDataWindow *de)
                      G_CALLBACK (reliability_dialog), de);
   }
 
+  {
+    GtkAction *invoke_roc_dialog =
+      resolve_action (de->builder, "roc-curve", NULL);
+
+    g_object_set (invoke_roc_dialog,
+                 "tooltip", _("ROC Curve"),
+                 "stock-id", "pspp-roc",
+                 NULL
+                 );
+
+    g_signal_connect (invoke_roc_dialog, "activate",
+                     G_CALLBACK (roc_dialog), de);
+  }
+
+  {
+    GtkAction *invoke_correlation_dialog =
+      resolve_action (de->builder, "correlation", NULL);
+
+    g_object_set (invoke_correlation_dialog,
+                 "tooltip", _("Bivariate Correlation"),
+                 "stock-id", "pspp-correlation",
+                 NULL
+                 );
+
+    g_signal_connect (invoke_correlation_dialog, "activate",
+                     G_CALLBACK (correlation_dialog), de);
+  }
+
 
   {
     GtkUIManager *uim = GTK_UI_MANAGER (get_object_assert (de->builder, "uimanager1", GTK_TYPE_UI_MANAGER));