}
-
-static GtkWidget *
-create_data_sheet_variable_popup_menu (PsppireDataWindow *de)
-{
- GtkWidget *menu = gtk_menu_new ();
-
- GtkWidget *sort_ascending =
- gtk_action_create_menu_item (gtk_action_new ("sort-up",
- _("Sort Ascending"),
- NULL,
- "gtk-sort-ascending"));
-
- GtkWidget *sort_descending =
- gtk_action_create_menu_item (gtk_action_new ("sort-down",
- _("Sort Descending"),
- NULL,
- "gtk-sort-descending"));
-
- GtkWidget *insert_variable =
- gtk_menu_item_new_with_label (_("Insert Variable"));
-
- GtkWidget *clear_variable =
- gtk_menu_item_new_with_label (_("Clear"));
-
-
- gtk_action_connect_proxy (de->delete_variables,
- clear_variable );
-
-
- gtk_menu_shell_append (GTK_MENU_SHELL (menu), insert_variable);
-
-
- gtk_menu_shell_append (GTK_MENU_SHELL (menu),
- gtk_separator_menu_item_new ());
-
-
- gtk_menu_shell_append (GTK_MENU_SHELL (menu), clear_variable);
-
-
- gtk_menu_shell_append (GTK_MENU_SHELL (menu),
- gtk_separator_menu_item_new ());
-
-
- gtk_menu_shell_append (GTK_MENU_SHELL (menu), sort_ascending);
-
-
- g_signal_connect_swapped (sort_ascending, "activate",
- G_CALLBACK (psppire_data_editor_sort_ascending),
- de->data_editor);
-
- g_signal_connect_swapped (sort_descending, "activate",
- G_CALLBACK (psppire_data_editor_sort_descending),
- de->data_editor);
-
- g_signal_connect_swapped (insert_variable, "activate",
- G_CALLBACK (gtk_action_activate),
- de->insert_variable);
-
-
- gtk_menu_shell_append (GTK_MENU_SHELL (menu), sort_descending);
-
- gtk_widget_show_all (menu);
-
- return menu;
-}
-
-
static GtkWidget *
create_data_sheet_cases_popup_menu (PsppireDataWindow *de)
{
}
-static GtkAction *
-resolve_action (GtkBuilder *builder, const gchar *action, const gchar *proxy)
-{
- GtkWidget *pr = NULL;
- GtkAction *act = get_action_assert (builder, action);
- g_assert (GTK_IS_ACTION (act));
-
- if ( proxy )
- pr = get_widget_assert (builder, proxy);
-
- if ( pr )
- gtk_action_connect_proxy (act, pr);
-
- return act;
-}
-
static void
set_unsaved (gpointer w)
{
GtkAction *action_data_new =
- resolve_action (de->builder, "file_new_data", NULL);
+ get_action_assert (de->builder, "file_new_data");
g_object_set (action_data_new,
"tooltip", _("New data file"),
{
GtkAction *invoke_text_import_assistant =
- resolve_action (de->builder, "file_import-text", NULL);
+ get_action_assert (de->builder, "file_import-text");
g_object_set (invoke_text_import_assistant,
"tooltip", _("Import text data file"),
{
GtkAction *action_data_save_as =
- resolve_action (de->builder, "file_save_as", NULL);
+ get_action_assert (de->builder, "file_save_as");
g_object_set (action_data_save_as,
"tooltip", _("Save data to file"),
{
GtkAction *action_info_working_file =
- resolve_action (de->builder,
- "file_information_working-file", NULL);
+ get_action_assert (de->builder, "file_information_working-file");
g_signal_connect_swapped (action_info_working_file, "activate",
{
GtkAction *action_info_external_file =
- resolve_action (de->builder,
- "file_information_external-file", NULL);
+ get_action_assert (de->builder, "file_information_external-file");
g_signal_connect_swapped (action_info_external_file, "activate",
{
de->delete_cases =
- resolve_action (de->builder, "edit_clear-cases", NULL);
+ get_action_assert (de->builder, "edit_clear-cases");
g_object_set (de->delete_cases,
{
de->delete_variables =
- resolve_action (de->builder, "edit_clear-variables", NULL);
+ get_action_assert (de->builder, "edit_clear-variables");
g_object_set (de->delete_variables,
"label", _("Clear"),
{
GtkAction *invoke_transpose_dialog =
- resolve_action (de->builder, "data_transpose", NULL);
+ get_action_assert (de->builder, "data_transpose");
g_object_set (invoke_transpose_dialog,
{
GtkAction *invoke_sort_cases_dialog =
- resolve_action (de->builder, "data_sort-cases", NULL);
+ get_action_assert (de->builder, "data_sort-cases");
g_object_set (invoke_sort_cases_dialog,
{
GtkAction *invoke_compute_dialog =
- resolve_action (de->builder, "transform_compute", NULL);
+ get_action_assert (de->builder, "transform_compute");
g_object_set (invoke_compute_dialog,
"tooltip", _("Compute new values for a variable"),
{
GtkAction *invoke_oneway_anova_dialog =
- resolve_action (de->builder, "oneway-anova", NULL);
+ get_action_assert (de->builder, "oneway-anova");
g_object_set (invoke_oneway_anova_dialog,
"tooltip", _("Perform one way analysis of variance"),
{
GtkAction *invoke_t_test_independent_samples_dialog =
- resolve_action (de->builder, "indep-t-test", NULL);
+ get_action_assert (de->builder, "indep-t-test");
g_object_set (invoke_t_test_independent_samples_dialog,
{
GtkAction *invoke_t_test_paired_samples_dialog =
- resolve_action (de->builder, "paired-t-test", NULL);
+ get_action_assert (de->builder, "paired-t-test");
g_object_set (invoke_t_test_paired_samples_dialog,
"tooltip",
{
GtkAction *invoke_t_test_one_sample_dialog =
- resolve_action (de->builder, "one-sample-t-test", NULL);
+ get_action_assert (de->builder, "one-sample-t-test");
g_object_set (invoke_t_test_one_sample_dialog,
"tooltip",
{
GtkAction *invoke_comments_dialog =
- resolve_action (de->builder, "utilities_comments", NULL);
+ get_action_assert (de->builder, "utilities_comments");
g_object_set (invoke_comments_dialog,
{
GtkAction *invoke_rank_dialog =
- resolve_action (de->builder, "transform_rank", NULL);
+ get_action_assert (de->builder, "transform_rank");
g_object_set (invoke_rank_dialog,
"stock-id", "pspp-rank-cases",
{
GtkAction *invoke_recode_same_dialog =
- resolve_action (de->builder, "transform_recode-same", NULL);
+ get_action_assert (de->builder, "transform_recode-same");
g_object_set (invoke_recode_same_dialog,
"stock-id", "pspp-recode-same",
{
GtkAction *invoke_recode_different_dialog =
- resolve_action (de->builder, "transform_recode-different", NULL);
+ get_action_assert (de->builder, "transform_recode-different");
g_object_set (invoke_recode_different_dialog,
"stock-id", "pspp-recode-different",
{
GtkAction *invoke_descriptives_dialog =
- resolve_action (de->builder, "analyze_descriptives", NULL);
+ get_action_assert (de->builder, "analyze_descriptives");
g_object_set (invoke_descriptives_dialog,
"tooltip", _("Calculate descriptive statistics (mean, variance, ...)"),
{
GtkAction *invoke_frequencies_dialog =
- resolve_action (de->builder, "analyze_frequencies", NULL);
+ get_action_assert (de->builder, "analyze_frequencies");
g_object_set (invoke_frequencies_dialog,
"tooltip", _("Generate frequency statistics"),
{
GtkAction *invoke_crosstabs_dialog =
- resolve_action (de->builder, "crosstabs", NULL);
+ get_action_assert (de->builder, "crosstabs");
g_object_set (invoke_crosstabs_dialog,
"tooltip", _("Generate crosstabulations"),
{
GtkAction *invoke_examine_dialog =
- resolve_action (de->builder, "analyze_explore", NULL);
+ get_action_assert (de->builder, "analyze_explore");
g_object_set (invoke_examine_dialog,
"tooltip", _("Examine Data by Factors"),
{
GtkAction *invoke_regression_dialog =
- resolve_action (de->builder, "linear-regression", NULL);
+ get_action_assert (de->builder, "linear-regression");
g_object_set (invoke_regression_dialog,
"tooltip", _("Estimate parameters of the linear model"),
{
GtkAction *invoke_reliability_dialog =
- resolve_action (de->builder, "reliability", NULL);
+ get_action_assert (de->builder, "reliability");
g_object_set (invoke_reliability_dialog,
"tooltip", _("Reliability Analysis"),
{
GtkAction *invoke_roc_dialog =
- resolve_action (de->builder, "roc-curve", NULL);
+ get_action_assert (de->builder, "roc-curve");
g_object_set (invoke_roc_dialog,
"tooltip", _("ROC Curve"),
{
GtkAction *invoke_correlation_dialog =
- resolve_action (de->builder, "correlation", NULL);
+ get_action_assert (de->builder, "correlation");
g_object_set (invoke_correlation_dialog,
"tooltip", _("Bivariate Correlation"),
{
GtkAction *invoke_factor_dialog =
- resolve_action (de->builder, "factor-analysis", NULL);
+ get_action_assert (de->builder, "factor-analysis");
g_object_set (invoke_factor_dialog,
"tooltip", _("Principal Axis Factoring and Principal Components Analysis"),
{
GtkAction *font_action =
- resolve_action (de->builder, "view_fonts", NULL);
+ get_action_assert (de->builder, "view_fonts");
g_object_set (font_action,
"stock-id", "gtk-select-font",
{
GtkAction *split_window_action =
- resolve_action (de->builder, "windows_split", NULL);
+ get_action_assert (de->builder, "windows_split");
g_object_set (split_window_action,
"tooltip", _("Split the window vertically and horizontally"),
}
{
- GtkMenu *data_sheet_variable_popup_menu =
- GTK_MENU (create_data_sheet_variable_popup_menu (de));
+ GtkMenu *data_sheet_variable_popup_menu = get_widget_assert (de->builder,
+ "datasheet-variable-popup");
+
+ g_signal_connect_swapped (get_action_assert (de->builder, "sort-up"), "activate",
+ G_CALLBACK (psppire_data_editor_sort_ascending),
+ de->data_editor);
+
+ g_signal_connect_swapped (get_action_assert (de->builder, "sort-down"), "activate",
+ G_CALLBACK (psppire_data_editor_sort_descending),
+ de->data_editor);
GtkMenu *var_sheet_variable_popup_menu =
GTK_MENU (create_var_sheet_variable_popup_menu (de));