X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;ds=sidebyside;f=src%2Fui%2Fgui%2Fexamine-dialog.c;h=931c0461ff4ee5ec64aceeca195db395ab88683c;hb=bc19562deb692e6db3271eb0402e9f9c99e4cbcb;hp=67523143fc48ea09eedcae8c5acfe67f8979ce5a;hpb=7a8adbe2e7067f33767f934ec36c60549d50d2e2;p=pspp-builds.git diff --git a/src/ui/gui/examine-dialog.c b/src/ui/gui/examine-dialog.c index 67523143..931c0461 100644 --- a/src/ui/gui/examine-dialog.c +++ b/src/ui/gui/examine-dialog.c @@ -1,5 +1,5 @@ /* PSPPIRE - a graphical user interface for PSPP. - Copyright (C) 2007, 2008, 2009 Free Software Foundation + Copyright (C) 2007, 2008, 2009, 2010 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 @@ -22,7 +22,6 @@ #include #include -#include #include #include #include @@ -234,10 +233,9 @@ run_opts_dialog (struct examine_dialog *ed) /* Pops up the Examine dialog box */ void -examine_dialog (GObject *o, gpointer data) +examine_dialog (PsppireDataWindow *de) { gint response; - PsppireDataWindow *de = PSPPIRE_DATA_WINDOW (data); struct examine_dialog ex_d; @@ -302,22 +300,10 @@ examine_dialog (GObject *o, gpointer data) switch (response) { case GTK_RESPONSE_OK: - { - gchar *syntax = generate_syntax (&ex_d); - - struct getl_interface *sss = create_syntax_string_source (syntax); - - execute_syntax (sss); - - g_free (syntax); - } + g_free (execute_syntax_string (generate_syntax (&ex_d))); break; case PSPPIRE_RESPONSE_PASTE: - { - gchar *syntax = generate_syntax (&ex_d); - paste_syntax_in_new_window (syntax); - g_free (syntax); - } + g_free (paste_syntax_to_window (generate_syntax (&ex_d))); break; default: break;