2 PSPPIRE --- A Graphical User Interface for PSPP
3 Copyright (C) 2004,2005 Free Software Foundation
4 Written by John Darrington
6 This program is free software; you can redistribute it and/or modify
7 it under the terms of the GNU General Public License as published by
8 the Free Software Foundation; either version 2 of the License, or
9 (at your option) any later version.
11 This program is distributed in the hope that it will be useful,
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14 GNU General Public License for more details.
16 You should have received a copy of the GNU General Public License
17 along with this program; if not, write to the Free Software
18 Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
27 #include <libpspp/message.h>
28 #include "message-dialog.h"
32 #include <glade/glade.h>
42 vmsg(int klass, const char *fmt, va_list args)
45 gchar *text = g_strdup_vprintf (fmt, args);
58 message_type = GTK_MESSAGE_ERROR;
63 message_type = GTK_MESSAGE_WARNING;
69 message_type = GTK_MESSAGE_INFO;
78 msg = g_strdup(_("Script Error"));
83 msg = g_strdup(_("Installation Error"));
88 msg = g_strdup(_("Data File Error"));
95 msg = g_strdup(_("PSPP Error"));
99 parent = GTK_WINDOW(get_widget_assert(xml, "data_editor"));
101 dialog = gtk_message_dialog_new(parent,
107 gtk_message_dialog_format_secondary_text(GTK_MESSAGE_DIALOG(dialog), text);
112 gtk_window_set_transient_for(GTK_WINDOW(dialog), parent);
114 gtk_dialog_run(GTK_DIALOG(dialog));
116 gtk_widget_destroy (dialog);
122 msg(int klass, const char *fmt, ...)
126 vmsg(klass, fmt, ap);
132 err_vmsg (const struct error *e, const char *format, va_list args)
134 vmsg(e->class, format, args);
139 err_assert_fail(const char *expr, const char *file, int line)
141 msg(ME, "Assertion failed: %s:%d; (%s)\n",file,line,expr);
144 /* The GUI is always interactive.
145 So this function does nothing */
155 msg(ME, _("Terminating NOW due to fatal error"));
160 /* FIXME: This is a stub .
161 * A temporary workaround until getl.c is rearranged
164 err_location (struct file_locator *f)