aboutsummaryrefslogtreecommitdiffstats
path: root/modules/mail/e-mail-config-web-view-gtkhtml.c
diff options
context:
space:
mode:
Diffstat (limited to 'modules/mail/e-mail-config-web-view-gtkhtml.c')
-rw-r--r--modules/mail/e-mail-config-web-view-gtkhtml.c307
1 files changed, 0 insertions, 307 deletions
diff --git a/modules/mail/e-mail-config-web-view-gtkhtml.c b/modules/mail/e-mail-config-web-view-gtkhtml.c
deleted file mode 100644
index 40360d4e48..0000000000
--- a/modules/mail/e-mail-config-web-view-gtkhtml.c
+++ /dev/null
@@ -1,307 +0,0 @@
-/*
- * e-mail-config-web-view.c
- *
- * This program is free software; you can redistribute it and/or
- * modify it under the terms of the GNU Lesser General Public
- * License as published by the Free Software Foundation; either
- * version 2 of the License, or (at your option) version 3.
- *
- * This program is distributed in the hope that it will be useful,
- * but WITHOUT ANY WARRANTY; without even the implied warranty of
- * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
- * Lesser General Public License for more details.
- *
- * You should have received a copy of the GNU Lesser General Public
- * License along with the program; if not, see <http://www.gnu.org/licenses/>
- *
- */
-
-#ifdef HAVE_CONFIG_H
-#include <config.h>
-#endif
-
-#include <stdio.h>
-#include <string.h>
-
-#include "e-mail-config-web-view-gtkhtml.h"
-
-#include <shell/e-shell.h>
-
-#define E_MAIL_CONFIG_WEB_VIEW_GTKHTML_GET_PRIVATE(obj) \
- (G_TYPE_INSTANCE_GET_PRIVATE \
- ((obj), E_TYPE_MAIL_CONFIG_WEB_VIEW_GTKHTML, EMailConfigWebViewGtkHTMLPrivate))
-
-struct _EMailConfigWebViewGtkHTMLPrivate {
- GtkCssProvider *css_provider;
- EShellSettings *shell_settings;
-};
-
-G_DEFINE_DYNAMIC_TYPE (
- EMailConfigWebViewGtkHTML,
- e_mail_config_web_view_gtkhtml,
- E_TYPE_EXTENSION)
-
-/* replaces content of color string */
-static void
-mail_config_web_view_gtkhtml_fix_color_string (gchar *color_string)
-{
- GdkColor color;
-
- if (color_string == NULL)
- return;
-
- if (strlen (color_string) < 13)
- return;
-
- if (!gdk_color_parse (color_string, &color))
- return;
-
- sprintf (
- color_string, "#%02x%02x%02x",
- (gint) color.red * 256 / 65536,
- (gint) color.green * 256 / 65536,
- (gint) color.blue * 256 / 65536);
-}
-
-static void
-mail_config_web_view_gtkhtml_load_style (EMailConfigWebViewGtkHTML *extension)
-{
- GString *buffer;
- gchar *citation_color;
- gchar *monospace_font;
- gchar *spell_color;
- gchar *variable_font;
- gboolean custom_fonts;
- gboolean mark_citations;
- EExtensible *extensible;
- EShellSettings *shell_settings;
- GtkStyleContext *style_context;
- GError *error = NULL;
-
- /* Some of our mail and composer preferences are passed down to
- * GtkHtml through style properties, unfortunately. This builds
- * a style sheet for the EWebView using values from GSettings. */
-
- shell_settings = extension->priv->shell_settings;
-
- custom_fonts = e_shell_settings_get_boolean (
- shell_settings, "mail-use-custom-fonts");
-
- monospace_font = e_shell_settings_get_string (
- shell_settings, "mail-font-monospace");
-
- variable_font = e_shell_settings_get_string (
- shell_settings, "mail-font-variable");
-
- mark_citations = e_shell_settings_get_boolean (
- shell_settings, "mail-mark-citations");
-
- citation_color = e_shell_settings_get_string (
- shell_settings, "mail-citation-color");
-
- spell_color = e_shell_settings_get_string (
- shell_settings, "composer-spell-color");
-
- buffer = g_string_new ("EWebViewGtkHTML {\n");
-
- mail_config_web_view_gtkhtml_fix_color_string (citation_color);
- mail_config_web_view_gtkhtml_fix_color_string (spell_color);
-
- if (custom_fonts && variable_font != NULL)
- g_string_append_printf (
- buffer, " font: %s;\n", variable_font);
-
- if (custom_fonts && monospace_font != NULL)
- g_string_append_printf (
- buffer, " -GtkHTML-fixed-font-name: '%s';\n",
- monospace_font);
-
- if (mark_citations && citation_color != NULL)
- g_string_append_printf (
- buffer, " -GtkHTML-cite-color: %s;\n",
- citation_color);
-
- if (spell_color != NULL)
- g_string_append_printf (
- buffer, " -GtkHTML-spell-error-color: %s;\n",
- spell_color);
-
- g_string_append (buffer, "}\n");
-
- gtk_css_provider_load_from_data (
- extension->priv->css_provider,
- buffer->str, buffer->len, &error);
-
- if (error != NULL) {
- g_warning ("%s", error->message);
- g_error_free (error);
- }
-
- g_string_free (buffer, TRUE);
-
- g_free (monospace_font);
- g_free (variable_font);
- g_free (citation_color);
- g_free (spell_color);
-
- extensible = e_extension_get_extensible (E_EXTENSION (extension));
- style_context = gtk_widget_get_style_context (GTK_WIDGET (extensible));
- gtk_style_context_invalidate (style_context);
-}
-
-static void
-mail_config_web_view_gtkhtml_realize (GtkWidget *widget,
- EMailConfigWebViewGtkHTML *extension)
-{
- EShellSettings *shell_settings;
-
- shell_settings = extension->priv->shell_settings;
-
- g_object_bind_property (
- shell_settings, "composer-inline-spelling",
- widget, "inline-spelling",
- G_BINDING_SYNC_CREATE);
-
- g_object_bind_property (
- shell_settings, "composer-magic-links",
- widget, "magic-links",
- G_BINDING_SYNC_CREATE);
-
- g_object_bind_property (
- shell_settings, "composer-magic-smileys",
- widget, "magic-smileys",
- G_BINDING_SYNC_CREATE);
-
- gtk_style_context_add_provider (
- gtk_widget_get_style_context (widget),
- GTK_STYLE_PROVIDER (extension->priv->css_provider),
- GTK_STYLE_PROVIDER_PRIORITY_APPLICATION);
-
- mail_config_web_view_gtkhtml_load_style (extension);
-
- /* Reload the style sheet when certain settings change. */
-
- g_signal_connect_swapped (
- shell_settings, "notify::mail-use-custom-fonts",
- G_CALLBACK (mail_config_web_view_gtkhtml_load_style),
- extension);
-
- g_signal_connect_swapped (
- shell_settings, "notify::mail-font-monospace",
- G_CALLBACK (mail_config_web_view_gtkhtml_load_style),
- extension);
-
- g_signal_connect_swapped (
- shell_settings, "notify::mail-font-variable",
- G_CALLBACK (mail_config_web_view_gtkhtml_load_style),
- extension);
-
- g_signal_connect_swapped (
- shell_settings, "notify::mail-mark-citations",
- G_CALLBACK (mail_config_web_view_gtkhtml_load_style),
- extension);
-
- g_signal_connect_swapped (
- shell_settings, "notify::mail-citation-color",
- G_CALLBACK (mail_config_web_view_gtkhtml_load_style),
- extension);
-
- g_signal_connect_swapped (
- shell_settings, "notify::composer-spell-color",
- G_CALLBACK (mail_config_web_view_gtkhtml_load_style),
- extension);
-}
-
-static void
-mail_config_web_view_gtkhtml_dispose (GObject *object)
-{
- EMailConfigWebViewGtkHTMLPrivate *priv;
-
- priv = E_MAIL_CONFIG_WEB_VIEW_GTKHTML_GET_PRIVATE (object);
-
- if (priv->css_provider != NULL) {
- g_object_unref (priv->css_provider);
- priv->css_provider = NULL;
- }
-
- if (priv->shell_settings != NULL) {
- g_signal_handlers_disconnect_by_func (
- priv->shell_settings,
- mail_config_web_view_gtkhtml_load_style, object);
- g_object_unref (priv->shell_settings);
- priv->shell_settings = NULL;
- }
-
- /* Chain up to parent's dispose() method. */
- G_OBJECT_CLASS (e_mail_config_web_view_gtkhtml_parent_class)->
- dispose (object);
-}
-
-static void
-mail_config_web_view_gtkhtml_constructed (GObject *object)
-{
- EShell *shell;
- EShellSettings *shell_settings;
- EMailConfigWebViewGtkHTML *extension;
- EExtensible *extensible;
-
- shell = e_shell_get_default ();
- shell_settings = e_shell_get_shell_settings (shell);
-
- extension = (EMailConfigWebViewGtkHTML *) object;
- extensible = e_extension_get_extensible (E_EXTENSION (extension));
-
- extension->priv->css_provider = gtk_css_provider_new ();
- extension->priv->shell_settings = g_object_ref (shell_settings);
-
- /* Wait to bind shell settings until the EWebView is realized
- * so GtkhtmlEditor has a chance to install a GtkHTMLEditorAPI.
- * Otherwise our settings will have no effect. */
-
- g_signal_connect (
- extensible, "realize",
- G_CALLBACK (mail_config_web_view_gtkhtml_realize), extension);
-
- /* Chain up to parent's constructed() method. */
- G_OBJECT_CLASS (e_mail_config_web_view_gtkhtml_parent_class)->
- constructed (object);
-}
-
-static void
-e_mail_config_web_view_gtkhtml_class_init (EMailConfigWebViewGtkHTMLClass *class)
-{
- GObjectClass *object_class;
- EExtensionClass *extension_class;
-
- g_type_class_add_private (
- class, sizeof (EMailConfigWebViewGtkHTMLPrivate));
-
- object_class = G_OBJECT_CLASS (class);
- object_class->dispose = mail_config_web_view_gtkhtml_dispose;
- object_class->constructed = mail_config_web_view_gtkhtml_constructed;
-
- extension_class = E_EXTENSION_CLASS (class);
- extension_class->extensible_type = E_TYPE_WEB_VIEW_GTKHTML;
-}
-
-static void
-e_mail_config_web_view_gtkhtml_class_finalize (EMailConfigWebViewGtkHTMLClass *class)
-{
-}
-
-static void
-e_mail_config_web_view_gtkhtml_init (EMailConfigWebViewGtkHTML *extension)
-{
- extension->priv =
- E_MAIL_CONFIG_WEB_VIEW_GTKHTML_GET_PRIVATE (extension);
-}
-
-void
-e_mail_config_web_view_gtkhtml_type_register (GTypeModule *type_module)
-{
- /* XXX G_DEFINE_DYNAMIC_TYPE declares a static type registration
- * function, so we have to wrap it with a public function in
- * order to register types from a separate compilation unit. */
- e_mail_config_web_view_gtkhtml_register_type (type_module);
-}
-