X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fui%2Fgui%2Fhelper.c;h=3e53f1ecb2e2ece73aa5d3a60d4d4fc8a0a4e206;hb=9529d1a99cc7c288d94e5bbdb9f4263bd524da6c;hp=bec6716689a9501561ced5fe0edcdb4451fd6b01;hpb=f15c854d8500105766b2f5666bb62b983ff24f88;p=pspp-builds.git diff --git a/src/ui/gui/helper.c b/src/ui/gui/helper.c index bec67166..3e53f1ec 100644 --- a/src/ui/gui/helper.c +++ b/src/ui/gui/helper.c @@ -49,27 +49,38 @@ /* Formats a value according to FORMAT The returned string must be freed when no longer required */ gchar * -value_to_text (union value v, struct fmt_spec format) +value_to_text (union value v, const PsppireDict *dict, struct fmt_spec format) { gchar *s = 0; - s = data_out (&v, &format); + s = data_out (&v, dict_get_encoding (dict->dict), &format); g_strchug (s); return s; } +/* Converts TEXT to a value. -gboolean -text_to_value (const gchar *text, union value *v, - struct fmt_spec format) + VAL will be initialised and filled by this function. + It is the caller's responsibility to destroy VAL when no longer needed. + VAR and DICT must be the variable and dictionary with which VAL + is associated. + + On success, VAL is returned, NULL otherwise. +*/ +union value * +text_to_value (const gchar *text, + const PsppireDict *dict, + const struct variable *var, + union value *val) { - bool ok; + const struct fmt_spec *format = var_get_print_format (var); + int width = var_get_width (var); - if ( format.type != FMT_A) + if ( format->type != FMT_A) { - if ( ! text ) return FALSE; + if ( ! text ) return NULL; { const gchar *s = text; @@ -80,16 +91,18 @@ text_to_value (const gchar *text, union value *v, s++; } - if ( !*s) return FALSE; + if ( !*s) return NULL; } } + value_init (val, width); msg_disable (); - ok = data_in (ss_cstr (text), LEGACY_NATIVE, format.type, 0, 0, 0, - v, fmt_var_width (&format)); + data_in (ss_cstr (text), UTF8, format->type, 0, 0, 0, + dict->dict, + val, width); msg_enable (); - return ok; + return val; } @@ -287,3 +300,12 @@ paste_syntax_in_new_window (const gchar *syntax) gtk_widget_show (se); } + + +/* gtk_box_pack_start_defaults is deprecated. + Therefore we roll our own until a better solution is found */ +void +psppire_box_pack_start_defaults (GtkBox *box, GtkWidget *widget) +{ + gtk_box_pack_start (box, widget, TRUE, TRUE, 0); +}