Convert to utf8 in data_out function.
[pspp-builds.git] / src / ui / gui / dialog-common.c
index b4a127230fa8e737b46a860363dcbfe2077952f1..5d52204ce566ad89cdb1807adda7be338bf846e5 100644 (file)
    along with this program.  If not, see <http://www.gnu.org/licenses/>. */
 
 #include <config.h>
+
+#include <libpspp/i18n.h>
 #include "dialog-common.h"
 
+#include "psppire-var-ptr.h"
+
 #include "helper.h"
 
 
 /* Append the names of selected variables to STRING.
    TREEVIEW is the treeview containing the variables.
+   COLUMN is the column in the treeview containing the variables.
    DICT is the dictionary for those variables.
 */
 gint
 append_variable_names (GString *string,
-                      PsppireDict *dict, GtkTreeView *treeview)
+                      PsppireDict *dict, GtkTreeView *treeview, gint column)
 {
   gint n_vars = 0;
   GtkTreeIter iter;
@@ -39,12 +44,23 @@ append_variable_names (GString *string,
       do
        {
          GValue value = {0};
-         struct variable *var;
+         struct variable *var = NULL;
          GtkTreePath *path = gtk_tree_model_get_path (list_store, &iter);
 
-         gtk_tree_model_get_value (list_store, &iter, 0, &value);
+         gtk_tree_model_get_value (list_store, &iter, column, &value);
 
+         /* FIXME:  G_TYPE_INT should be deprecated.
+            As well as being simpler, it'd be unecessary to pass dict */
+         if ( G_VALUE_TYPE (&value) == G_TYPE_INT )
          var = psppire_dict_get_variable (dict, g_value_get_int (&value));
+
+         else if ( G_VALUE_TYPE (&value) == PSPPIRE_VAR_PTR_TYPE)
+           var = g_value_get_boxed (&value);
+
+         else
+           g_critical ("Unsupported type \"%s\", in variable name treeview.",
+                       G_VALUE_TYPE_NAME (&value));
+
          g_value_unset (&value);
 
          g_string_append (string, " ");
@@ -98,14 +114,9 @@ cell_var_name (GtkTreeViewColumn *tree_column,
               gpointer data)
 {
   PsppireDict *dict = data;
-  struct variable *var;
-  gchar *name;
+  const struct variable *var = get_selected_variable (tree_model, iter, dict);
 
-  var = get_selected_variable (tree_model, iter, dict);
-
-  name = pspp_locale_to_utf8 (var_get_name (var), -1, NULL);
-  g_object_set (cell, "text", name, NULL);
-  g_free (name);
+  g_object_set (cell, "text", var_get_name (var), NULL);
 }
 
 
@@ -178,16 +189,15 @@ homogeneous_types (GtkWidget *source, GtkWidget *dest)
   for (l = list; l ; l = l->next)
     {
       GtkTreePath *path = l->data;
-      GtkTreePath *fpath;
-      gint *idx;
 
-      const struct variable *v;
+      GtkTreePath *fpath =
+       gtk_tree_model_filter_convert_path_to_child_path (GTK_TREE_MODEL_FILTER (model), path);
 
-      fpath = gtk_tree_model_filter_convert_path_to_child_path (GTK_TREE_MODEL_FILTER (model), path);
+      gint *idx = gtk_tree_path_get_indices (fpath);
 
-      idx = gtk_tree_path_get_indices (fpath);
+      const struct variable *v = psppire_dict_get_variable (dict, idx[0]);
 
-      v = psppire_dict_get_variable (dict, idx[0]);
+      gtk_tree_path_free (fpath);
 
       if ( type != -1 )
        {
@@ -265,17 +275,14 @@ numeric_only (GtkWidget *source, GtkWidget *dest)
   for (l = list; l ; l = l->next)
     {
       GtkTreePath *path = l->data;
-      GtkTreePath *fpath;
-      gint *idx;
-
-      const struct variable *v;
-
-      fpath = gtk_tree_model_filter_convert_path_to_child_path
+      GtkTreePath *fpath = gtk_tree_model_filter_convert_path_to_child_path
        (GTK_TREE_MODEL_FILTER (model), path);
 
-      idx = gtk_tree_path_get_indices (fpath);
+      gint *idx = gtk_tree_path_get_indices (fpath);
+
+      const struct variable *v = psppire_dict_get_variable (dict, idx[0]);
 
-      v = psppire_dict_get_variable (dict, idx[0]);
+      gtk_tree_path_free (fpath);
 
       if ( var_is_alpha (v))
        {