aboutsummaryrefslogblamecommitdiffstats
path: root/mail/e-mail-message-pane.c
blob: 8ca68026392eba2f04c2fba804e36fc9a32292d4 (plain) (tree)

























                                                                             
                                

                               
 
                                              
                                      
                                                                   
 
                                 
                         



               
                            

  
                                                                             


                                             

                                                


                                                    

                              
                                          







                                                                       


                                                  

                              
                                          
                                             

                                      
                               





                                                                       
                                               


                                      
                                                        
 
                                                        
                                                                                
 

                                                                                    


           

                                                           
 


                                                                

 
               
                                                  
 
                    


           
                                                             

                                   
                                        
 




                                                                           

                                                                  


                                                                                
 

                                          

                                     


           
                                                    
 
                                                                  


           
                                                
 
                                                                  

                             
                                         
                                         

                                        
 
/*
 * e-mail-browser.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/>
 *
 *
 * Copyright (C) 1999-2008 Novell, Inc. (www.novell.com)
 *
 */

#include "e-mail-message-pane.h"

#include <string.h>
#include <glib/gi18n.h>

#include "e-util/gconf-bridge.h"

#include "mail/e-mail-reader.h"

#define E_MAIL_MESSAGE_PANE_GET_PRIVATE(obj) \
    (G_TYPE_INSTANCE_GET_PRIVATE \
    ((obj), E_TYPE_MAIL_MESSAGE_PANE, EMailMessagePanePrivate))

struct _EMailMessagePanePrivate {
    gint placeholder;
};

enum {
    PROP_0,
    PROP_PREVIEW_VISIBLE
};

G_DEFINE_TYPE (EMailMessagePane, e_mail_message_pane, E_TYPE_MAIL_PANED_VIEW)

/* This is too trivial to put in a file.
 * It gets merged with the EMailReader UI. */
static void
mail_message_pane_set_property (GObject *object,
                                guint property_id,
                                const GValue *value,
                                GParamSpec *pspec)
{
    switch (property_id) {
        case PROP_PREVIEW_VISIBLE:
            return;
    }

    G_OBJECT_WARN_INVALID_PROPERTY_ID (object, property_id, pspec);
}

static void
mail_message_pane_get_property (GObject *object,
                                guint property_id,
                                GValue *value,
                                GParamSpec *pspec)
{
    switch (property_id) {
        case PROP_PREVIEW_VISIBLE:
            g_value_set_boolean (
                value,
                TRUE);
            return;
    }

    G_OBJECT_WARN_INVALID_PROPERTY_ID (object, property_id, pspec);
}

static void
mail_message_pane_constructed (GObject *object)
{
    EMailMessagePanePrivate *priv;

    priv = E_MAIL_MESSAGE_PANE_GET_PRIVATE (object);

    /* Chain up to parent's constructed() method. */
    G_OBJECT_CLASS (e_mail_message_pane_parent_class)->constructed (object);

    gtk_widget_hide (e_mail_reader_get_message_list (E_MAIL_READER(object)));
    e_mail_paned_view_hide_message_list_pane (E_MAIL_PANED_VIEW(object), FALSE);
}

static void
message_pane_set_preview_visible (EMailView *view,
                                  gboolean preview_visible)
{
    /* Chain up to parent's set_preview_visible() method. */
    E_MAIL_VIEW_CLASS (e_mail_message_pane_parent_class)->
        set_preview_visible (view, TRUE);
}

static gboolean
message_pane_get_preview_visible (EMailView *view)
{
    return TRUE;
}

static void
e_mail_message_pane_class_init (EMailMessagePaneClass *class)
{
    GObjectClass *object_class;
    EMailViewClass *mail_view_class;

    g_type_class_add_private (class, sizeof (EMailMessagePanePrivate));

    object_class = G_OBJECT_CLASS (class);
    object_class->set_property = mail_message_pane_set_property;
    object_class->get_property = mail_message_pane_get_property;
    object_class->constructed = mail_message_pane_constructed;

    mail_view_class = E_MAIL_VIEW_CLASS (class);
    mail_view_class->set_preview_visible = message_pane_set_preview_visible;
    mail_view_class->get_preview_visible = message_pane_get_preview_visible;

    g_object_class_override_property (
        object_class,
        PROP_PREVIEW_VISIBLE,
        "preview-visible");
}

static void
e_mail_message_pane_init (EMailMessagePane *browser)
{
    browser->priv = E_MAIL_MESSAGE_PANE_GET_PRIVATE (browser);
}

GtkWidget *
e_mail_message_pane_new (EShellContent *content)
{
    g_return_val_if_fail (E_IS_SHELL_CONTENT (content), NULL);

    return g_object_new (
        E_TYPE_MAIL_MESSAGE_PANE,
        "shell-content", content,
        "preview-visible", TRUE,
        NULL);
}