struct crosstabs_dialog cd;
GtkBuilder *xml = builder_new ("crosstabs.ui");
-
PsppireVarStore *vs = NULL;
PsppireDataWindow *de = PSPPIRE_DATA_WINDOW (data);
}
-
void
paste_syntax_in_new_window (const gchar *syntax)
{
return psppire_data_window_type;
}
+static GObjectClass *parent_class ;
static void
psppire_data_window_finalize (GObject *object)
{
PsppireDataWindow *de = PSPPIRE_DATA_WINDOW (object);
- GObjectClass *class = G_OBJECT_GET_CLASS (object);
-
- GObjectClass *parent_class = g_type_class_peek_parent (class);
-
g_object_unref (de->xml);
-
if (G_OBJECT_CLASS (parent_class)->finalize)
(*G_OBJECT_CLASS (parent_class)->finalize) (object);
}
static void
psppire_data_window_class_init (PsppireDataWindowClass *class)
{
+ parent_class = g_type_class_peek_parent (class);
}
return psppire_output_window_type;
}
+static GObjectClass *parent_class;
static void
psppire_output_window_finalize (GObject *object)
{
- GObjectClass *class = G_OBJECT_GET_CLASS (object);
-
- GObjectClass *parent_class = g_type_class_peek_parent (class);
-
-
if (G_OBJECT_CLASS (parent_class)->finalize)
(*G_OBJECT_CLASS (parent_class)->finalize) (object);
-
}
static void
psppire_output_window_class_init (PsppireOutputWindowClass *class)
{
+ parent_class = g_type_class_peek_parent (class);
}
return psppire_syntax_window_type;
}
+static GObjectClass *parent_class ;
+
static void
psppire_syntax_window_finalize (GObject *object)
{
- GObjectClass *class = G_OBJECT_GET_CLASS (object);
-
- GObjectClass *parent_class = g_type_class_peek_parent (class);
-
if (G_OBJECT_CLASS (parent_class)->finalize)
(*G_OBJECT_CLASS (parent_class)->finalize) (object);
}
static void
psppire_syntax_window_class_init (PsppireSyntaxWindowClass *class)
{
+ parent_class = g_type_class_peek_parent (class);
}
if ( result )
{
+ gchar *msg = g_strdup_printf (_("Saved file \"%s\""), filename);
+ gtk_statusbar_push (GTK_STATUSBAR (se->sb), se->text_context, msg);
psppire_window_set_filename (PSPPIRE_WINDOW (se), filename);
gtk_text_buffer_set_modified (buffer, FALSE);
+ g_free (msg);
}
return result;
static void
save_if_modified (PsppireSyntaxWindow *se)
{
-
if ( TRUE == gtk_text_buffer_get_modified (se->buffer))
{
gint response;
gtk_dialog_add_button (GTK_DIALOG (dialog),
GTK_STOCK_YES,
GTK_RESPONSE_ACCEPT);
+
gtk_dialog_add_button (GTK_DIALOG (dialog),
GTK_STOCK_NO,
GTK_RESPONSE_REJECT);
+
gtk_dialog_add_button (GTK_DIALOG (dialog),
GTK_STOCK_CANCEL,
GTK_RESPONSE_CANCEL);
-
response = gtk_dialog_run (GTK_DIALOG (dialog));
gtk_widget_destroy (dialog);
}
+static void
+on_text_changed (GtkTextBuffer *buffer, PsppireSyntaxWindow *window)
+{
+ gtk_statusbar_pop (GTK_STATUSBAR (window->sb), window->text_context);
+}
extern struct source_stream *the_source_stream ;
GtkWidget *menubar = get_widget_assert (xml, "menubar2");
GtkWidget *sw = get_widget_assert (xml, "scrolledwindow8");
- GtkWidget *sb = get_widget_assert (xml, "statusbar2");
+
GtkWidget *text_view = get_widget_assert (xml, "syntax_text_view");
window->buffer = gtk_text_view_get_buffer (GTK_TEXT_VIEW (text_view));
window->lexer = lex_create (the_source_stream);
+ window->sb = get_widget_assert (xml, "statusbar2");
+ window->text_context = gtk_statusbar_get_context_id (GTK_STATUSBAR (window->sb), "Text Context");
+
+ g_signal_connect (window->buffer, "changed", G_CALLBACK (on_text_changed), window);
+
connect_help (xml);
gtk_container_add (GTK_CONTAINER (window), box);
g_object_ref (menubar);
- gtk_widget_unparent (menubar);
g_object_ref (sw);
- gtk_widget_unparent (sw);
- g_object_ref (sb);
- gtk_widget_unparent (sb);
+ g_object_ref (window->sb);
gtk_box_pack_start (GTK_BOX (box), menubar, FALSE, TRUE, 0);
gtk_box_pack_start (GTK_BOX (box), sw, TRUE, TRUE, 0);
- gtk_box_pack_start (GTK_BOX (box), sb, FALSE, TRUE, 0);
+ gtk_box_pack_start (GTK_BOX (box), window->sb, FALSE, TRUE, 0);
gtk_widget_show_all (box);
GtkTextBuffer *buffer; /* The buffer which contains the text */
struct lexer *lexer; /* Lexer to parse syntax */
+ GtkWidget *sb;
+ guint text_context;
};
struct _PsppireSyntaxWindowClass
ds_destroy (&syntax);
- psppire_window_set_filename (the_data_window, arg);
+ psppire_window_set_filename (PSPPIRE_WINDOW (the_data_window), arg);
break;
}
<glade-interface>
-<widget class="GtkWindow" id="syntax_editor">
- <property name="default_width">640</property>
- <property name="default_height">480</property>
- <property name="can_focus">True</property>
- <property name="title" translatable="yes">Psppire Syntax Editor</property>
- <property name="type">GTK_WINDOW_TOPLEVEL</property>
- <property name="window_position">GTK_WIN_POS_NONE</property>
- <property name="modal">False</property>
- <property name="resizable">True</property>
- <property name="destroy_with_parent">False</property>
- <property name="decorated">True</property>
- <property name="skip_taskbar_hint">False</property>
- <property name="skip_pager_hint">False</property>
- <property name="type_hint">GDK_WINDOW_TYPE_HINT_NORMAL</property>
- <property name="gravity">GDK_GRAVITY_NORTH_WEST</property>
- <property name="focus_on_map">True</property>
- <property name="urgency_hint">False</property>
-
- <child>
- <widget class="GtkVBox" id="vbox14">
- <property name="visible">True</property>
- <property name="homogeneous">False</property>
- <property name="spacing">0</property>
-
- <child>
<widget class="GtkMenuBar" id="menubar2">
<property name="visible">True</property>
<property name="pack_direction">GTK_PACK_DIRECTION_LTR</property>
</widget>
</child>
</widget>
- <packing>
- <property name="padding">0</property>
- <property name="expand">False</property>
- <property name="fill">False</property>
- </packing>
- </child>
-
- <child>
+
+
<widget class="GtkScrolledWindow" id="scrolledwindow8">
<property name="visible">True</property>
<property name="can_focus">True</property>
</widget>
</child>
</widget>
- <packing>
- <property name="padding">0</property>
- <property name="expand">True</property>
- <property name="fill">True</property>
- </packing>
- </child>
-
- <child>
+
<widget class="GtkStatusbar" id="statusbar2">
<property name="visible">True</property>
<property name="has_resize_grip">True</property>
</widget>
- <packing>
- <property name="padding">0</property>
- <property name="expand">False</property>
- <property name="fill">False</property>
- </packing>
- </child>
- </widget>
- </child>
-</widget>
</glade-interface>