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);
55 message_type = GTK_MESSAGE_ERROR;
60 message_type = GTK_MESSAGE_WARNING;
66 message_type = GTK_MESSAGE_INFO;
75 msg = g_strdup(_("Script Error"));
80 msg = g_strdup(_("Installation Error"));
85 msg = g_strdup(_("Data File Error"));
92 msg = g_strdup(_("PSPP Error"));
96 GtkWindow *parent = GTK_WINDOW(get_widget_assert(xml, "data_editor"));
98 GtkWidget *dialog = gtk_message_dialog_new(parent,
105 gtk_message_dialog_format_secondary_text(GTK_MESSAGE_DIALOG(dialog), text);
110 gtk_window_set_transient_for(GTK_WINDOW(dialog), parent);
112 gtk_dialog_run(GTK_DIALOG(dialog));
114 gtk_widget_destroy (dialog);
120 msg(int klass, const char *fmt, ...)
124 vmsg(klass, fmt, ap);
130 err_vmsg (const struct error *e, const char *format, va_list args)
132 vmsg(e->class, format, args);
137 err_assert_fail(const char *expr, const char *file, int line)
139 msg(ME, "Assertion failed: %s:%d; (%s)\n",file,line,expr);
142 /* The GUI is always interactive.
143 So this function does nothing */
153 msg(ME, _("Terminating NOW due to fatal error"));
158 /* FIXME: This is a stub .
159 * A temporary workaround until getl.c is rearranged
162 err_location (struct file_locator *f)