Replace syntactical keywords in error/warning messages by printf directives
[pspp] / src / ui / gui / dialog-common.c
index 7edbbe504920a594e22bba139dba576f9e45b213..7472b5708fa99294de1a102ae541572b1669f2c2 100644 (file)
@@ -1,5 +1,5 @@
 /* PSPPIRE - a graphical user interface for PSPP.
-   Copyright (C) 2007  Free Software Foundation
+   Copyright (C) 2007, 2014  Free Software Foundation
 
    This program is free software: you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
 
 #include "helper.h"
 
-/* A (*GtkTreeCellDataFunc) function.
-   This function expects TREEMODEL to hold G_TYPE_BOXED, which is a pointer to a variable.
-   It renders the name of the variable into CELL.
-*/
-void
-XXX_cell_var_name (GtkTreeViewColumn *tree_column,
-                  GtkCellRenderer *cell,
-                  GtkTreeModel *treemodel,
-                  GtkTreeIter *iter,
-                  gpointer data)
-{
-  const struct variable *var;
-  GValue value = {0};
-
-  GtkTreePath *path = gtk_tree_model_get_path (treemodel, iter);
-
-  gtk_tree_model_get_value (treemodel, iter, 0, &value);
-
-  gtk_tree_path_free (path);
-
-  var = g_value_get_boxed (&value);
-
-  g_value_unset (&value);
-
-  g_object_set (cell, "text", var_get_name (var), NULL);
-}
-
-
 
 /* Returns FALSE if the variables represented by the union of the rows
    currently selected by SOURCE widget, and contents of the DEST
@@ -71,8 +43,9 @@ homogeneous_types (GtkWidget *source, GtkWidget *dest)
 
   PsppireDict *dict;
   GtkTreeSelection *selection;
-  enum val_type type = -1;
+  enum val_type type;
   GList *list, *l;
+  bool have_type;
 
   while (GTK_IS_TREE_MODEL_FILTER (model))
     {
@@ -86,6 +59,7 @@ homogeneous_types (GtkWidget *source, GtkWidget *dest)
   list = gtk_tree_selection_get_selected_rows (selection, &model);
 
   /* Iterate through the selection of the source treeview */
+  have_type = false;
   for (l = list; l ; l = l->next)
     {
       GtkTreePath *path = l->data;
@@ -99,16 +73,14 @@ homogeneous_types (GtkWidget *source, GtkWidget *dest)
 
       gtk_tree_path_free (fpath);
 
-      if ( type != -1 )
-       {
-         if ( var_get_type (v) != type )
-           {
-             retval = FALSE;
-             break;
-           }
-       }
+      if (have_type && var_get_type (v) != type)
+        {
+          retval = FALSE;
+          break;
+        }
 
       type = var_get_type (v);
+      have_type = true;
     }
 
   g_list_foreach (list, (GFunc) gtk_tree_path_free, NULL);
@@ -127,16 +99,14 @@ homogeneous_types (GtkWidget *source, GtkWidget *dest)
       const struct variable *v;
       gtk_tree_model_get (model, &iter, 0, &v, -1);
 
-      if ( type != -1 )
-       {
-         if ( var_get_type (v) != type )
-           {
-             retval = FALSE;
-             break;
-           }
-       }
+      if ( have_type && var_get_type (v) != type )
+        {
+          retval = FALSE;
+          break;
+        }
 
       type = var_get_type (v);
+      have_type = true;
     }
 
   return retval;
@@ -193,3 +163,30 @@ numeric_only (GtkWidget *source, GtkWidget *dest)
   return retval;
 }
 
+/*
+  A pair of functions intended to be used as callbacks for the "toggled" signal
+  of a GtkToggleButton widget.  They make the sensitivity of W follow the status
+  of the togglebutton.
+*/
+void
+set_sensitivity_from_toggle (GtkToggleButton *togglebutton,  GtkWidget *w)
+{
+  gboolean active = gtk_toggle_button_get_active (togglebutton);
+
+  gtk_widget_set_sensitive (w, active);
+  if (active)
+    gtk_widget_grab_focus (w);
+}
+
+/* */
+void
+set_sensitivity_from_toggle_invert (GtkToggleButton *togglebutton,
+                                   GtkWidget *w)
+{
+  gboolean active = gtk_toggle_button_get_active (togglebutton);
+
+  gtk_widget_set_sensitive (w, !active);
+}
+
+
+