X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fui%2Fgui%2Fregression-dialog.c;h=ac23fb1dcb8f7cd15303991ba33e526680a4e1d3;hb=c43efc75c86dd48cd67f23a4d3b5132964b331b8;hp=f4a88db7dfca59521ce19e24dbc7f8f369861c43;hpb=319711ff80e76a730ec26c86d67c0107143d8747;p=pspp diff --git a/src/ui/gui/regression-dialog.c b/src/ui/gui/regression-dialog.c index f4a88db7df..ac23fb1dcb 100644 --- a/src/ui/gui/regression-dialog.c +++ b/src/ui/gui/regression-dialog.c @@ -1,5 +1,5 @@ /* PSPPIRE - a graphical user interface for PSPP. - Copyright (C) 2008 Free Software Foundation + Copyright (C) 2008, 2010, 2011, 2012 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,10 +23,10 @@ #include #include -#include #include #include #include +#include #include #include #include @@ -222,13 +222,12 @@ dialog_state_valid (gpointer data) /* Pops up the Regression dialog box */ void -regression_dialog (gpointer data) +regression_dialog (PsppireDataWindow *de) { gint response; struct regression_dialog rd; GtkBuilder *xml = builder_new ("regression.ui"); - PsppireDataWindow *de = PSPPIRE_DATA_WINDOW (data); PsppireVarStore *vs; GtkWidget *dialog = get_widget_assert (xml, "regression-dialog"); @@ -289,22 +288,10 @@ regression_dialog (gpointer data) switch (response) { case GTK_RESPONSE_OK: - { - gchar *syntax = generate_syntax (&rd); - - struct getl_interface *sss = create_syntax_string_source (syntax); - execute_syntax (sss); - - g_free (syntax); - } + g_free (execute_syntax_string (de, generate_syntax (&rd))); break; case PSPPIRE_RESPONSE_PASTE: - { - gchar *syntax = generate_syntax (&rd); - paste_syntax_in_new_window (syntax); - - g_free (syntax); - } + g_free (paste_syntax_to_window (generate_syntax (&rd))); break; default: break;