X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fui%2Fgui%2Fdialog-common.c;h=7472b5708fa99294de1a102ae541572b1669f2c2;hb=a6f1c88d9d4dee24e1f79048c8a5d8274f68c405;hp=7edbbe504920a594e22bba139dba576f9e45b213;hpb=93b5d67c0fdc08137f308f332fede32543e7bc8e;p=pspp

diff --git a/src/ui/gui/dialog-common.c b/src/ui/gui/dialog-common.c
index 7edbbe5049..7472b5708f 100644
--- a/src/ui/gui/dialog-common.c
+++ b/src/ui/gui/dialog-common.c
@@ -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
@@ -23,34 +23,6 @@
 
 #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);
+}
+
+
+