Added widgets/e-paned/Makefile.

2000-05-24  Christopher James Lahey  <clahey@helixcode.com>

	* configure.in: Added widgets/e-paned/Makefile.

	* tests/ui-tests/message-browser.c: Switched from GtkPaned to
	EPaned.

	* widgets/Makefile.am: Added e-paned directory.

	* widgets/e-paned/, widgets/e-paned/.cvsignore,
	widgets/e-paned/Makefile.am, widgets/e-paned/e-hpaned.c,
	widgets/e-paned/e-hpaned.h, widgets/e-paned/e-paned.c,
	widgets/e-paned/e-paned.h, widgets/e-paned/e-vpaned.c,
	widgets/e-paned/e-vpaned.h: New widget based completely on
	GtkPaned from 1.4.  This will be more advanced soon.

From calendar/ChangeLog:

2000-05-24  Christopher James Lahey  <clahey@helixcode.com>

	* gui/Makefile.am: Added libepaned.a.

	* gui/gnome-cal.c: Switched from GtkPaned to EPaned.

From mail/ChangeLog:

2000-05-24  Christopher James Lahey  <clahey@helixcode.com>

	* Makefile.am: Added libepaned.a.

	* folder-browser.c: Switched from GtkPaned to EPaned.

From shell/ChangeLog:

2000-05-24  Christopher James Lahey  <clahey@helixcode.com>

	* Makefile.am: Added libepaned.a.

	* e-shell-view.c: Switched from GtkPaned to EPaned.

From widgets/shortcut-bar/ChangeLog:

2000-05-24  Christopher James Lahey  <clahey@helixcode.com>

	* Makefile.am: Added libepaned.a.

	* test-shortcut-bar.c: Switched from GtkPaned to EPaned.

svn path=/trunk/; revision=3191

8 files changed, 1684 insertions, 0 deletions

diff --git a/widgets/e-paned/.cvsignore b/widgets/e-paned/.cvsignore
new file mode 100644
index 0000000000..955fc0b6d0
--- /dev/null
+++ b/widgets/e-paned/.cvsignore
@@ -0,0 +1,8 @@
+.deps
+.libs
+.pure
+Makefile
+Makefile.in
+*.lo
+*.la
+libepaned.a
diff --git a/widgets/e-paned/Makefile.am b/widgets/e-paned/Makefile.am
new file mode 100644
index 0000000000..51ab38c80d
--- /dev/null
+++ b/widgets/e-paned/Makefile.am
@@ -0,0 +1,15 @@
+INCLUDES =					\
+	-I$(top_srcdir)				\
+	$(GNOME_INCLUDEDIR)			\
+	-DG_LOG_DOMAIN=\"e-paned\"
+
+noinst_LIBRARIES =				\
+	libepaned.a
+
+libepaned_a_SOURCES = 		\
+	e-hpaned.c		\
+	e-hpaned.h		\
+	e-paned.c		\
+	e-paned.h		\
+	e-vpaned.c		\
+	e-vpaned.h
diff --git a/widgets/e-paned/e-hpaned.c b/widgets/e-paned/e-hpaned.c
new file mode 100644
index 0000000000..b43630fff0
--- /dev/null
+++ b/widgets/e-paned/e-hpaned.c
@@ -0,0 +1,403 @@
+/* EPaned - A slightly more advanced paned widget.
+ * Copyright (C) 2000 Helix Code, Inc.
+ *
+ * Author: Christopher James Lahey <clahey@helixcode.com>
+ *
+ * based on GtkPaned from Gtk+.  Gtk+ Copyright notice follows.
+ */
+
+/* GTK - The GIMP Toolkit
+ * Copyright (C) 1995-1997 Peter Mattis, Spencer Kimball and Josh MacDonald
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library 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
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+ * Boston, MA 02111-1307, USA.
+ */
+
+/*
+ * Modified by the GTK+ Team and others 1997-1999.  See the AUTHORS
+ * file for a list of people on the GTK+ Team.  See the ChangeLog
+ * files for a list of changes.  These files are distributed with
+ * GTK+ at ftp://ftp.gtk.org/pub/gtk/. 
+ */
+
+#include "e-hpaned.h"
+
+static void     e_hpaned_class_init     (EHPanedClass   *klass);
+static void     e_hpaned_init           (EHPaned        *hpaned);
+static void     e_hpaned_size_request   (GtkWidget      *widget,
+					 GtkRequisition *requisition);
+static void     e_hpaned_size_allocate  (GtkWidget      *widget,
+					 GtkAllocation  *allocation);
+static void     e_hpaned_draw           (GtkWidget      *widget,
+					 GdkRectangle   *area);
+static void     e_hpaned_xor_line       (EPaned         *paned);
+static gboolean e_hpaned_button_press   (GtkWidget      *widget,
+					 GdkEventButton *event);
+static gboolean e_hpaned_button_release (GtkWidget      *widget,
+					 GdkEventButton *event);
+static gboolean e_hpaned_motion         (GtkWidget      *widget,
+					 GdkEventMotion *event);
+
+GtkType
+e_hpaned_get_type (void)
+{
+  static GtkType hpaned_type = 0;
+
+  if (!hpaned_type)
+    {
+      static const GtkTypeInfo hpaned_info =
+      {
+	"EHPaned",
+	sizeof (EHPaned),
+	sizeof (EHPanedClass),
+	(GtkClassInitFunc) e_hpaned_class_init,
+	(GtkObjectInitFunc) e_hpaned_init,
+	/* reserved_1 */ NULL,
+	/* reserved_2 */ NULL,
+	(GtkClassInitFunc) NULL,
+      };
+
+      hpaned_type = gtk_type_unique (E_TYPE_PANED, &hpaned_info);
+    }
+
+  return hpaned_type;
+}
+
+static void
+e_hpaned_class_init (EHPanedClass *class)
+{
+  GtkWidgetClass *widget_class;
+
+  widget_class = (GtkWidgetClass *) class;
+
+  widget_class->size_request = e_hpaned_size_request;
+  widget_class->size_allocate = e_hpaned_size_allocate;
+  widget_class->draw = e_hpaned_draw;
+  widget_class->button_press_event = e_hpaned_button_press;
+  widget_class->button_release_event = e_hpaned_button_release;
+  widget_class->motion_notify_event = e_hpaned_motion;
+}
+
+static void
+e_hpaned_init (EHPaned *hpaned)
+{
+  EPaned *paned;
+
+  g_return_if_fail (hpaned != NULL);
+  g_return_if_fail (E_IS_PANED (hpaned));
+
+  paned = E_PANED (hpaned);
+  
+  paned->cursor_type = GDK_SB_H_DOUBLE_ARROW;
+}
+
+GtkWidget *
+e_hpaned_new (void)
+{
+  EHPaned *hpaned;
+
+  hpaned = gtk_type_new (E_TYPE_HPANED);
+
+  return GTK_WIDGET (hpaned);
+}
+
+static void
+e_hpaned_size_request (GtkWidget      *widget,
+			 GtkRequisition *requisition)
+{
+  EPaned *paned;
+  GtkRequisition child_requisition;
+
+  g_return_if_fail (widget != NULL);
+  g_return_if_fail (E_IS_HPANED (widget));
+  g_return_if_fail (requisition != NULL);
+
+  paned = E_PANED (widget);
+  requisition->width = 0;
+  requisition->height = 0;
+
+  if (paned->child1 && GTK_WIDGET_VISIBLE (paned->child1))
+    {
+      gtk_widget_size_request (paned->child1, &child_requisition);
+
+      requisition->height = child_requisition.height;
+      requisition->width = child_requisition.width;
+    }
+
+  if (paned->child2 && GTK_WIDGET_VISIBLE (paned->child2))
+    {
+      gtk_widget_size_request (paned->child2, &child_requisition);
+
+      requisition->height = MAX(requisition->height, child_requisition.height);
+      requisition->width += child_requisition.width;
+    }
+
+  requisition->width += GTK_CONTAINER (paned)->border_width * 2 + paned->handle_size;
+  requisition->height += GTK_CONTAINER (paned)->border_width * 2;
+}
+
+static void
+e_hpaned_size_allocate (GtkWidget     *widget,
+			  GtkAllocation *allocation)
+{
+  EPaned *paned;
+  GtkRequisition child1_requisition;
+  GtkRequisition child2_requisition;
+  GtkAllocation child1_allocation;
+  GtkAllocation child2_allocation;
+  gint border_width;
+
+  g_return_if_fail (widget != NULL);
+  g_return_if_fail (E_IS_HPANED (widget));
+  g_return_if_fail (allocation != NULL);
+
+  widget->allocation = *allocation;
+  paned = E_PANED (widget);
+  border_width = GTK_CONTAINER (paned)->border_width;
+  
+  if (paned->child1)
+    gtk_widget_get_child_requisition (paned->child1, &child1_requisition);
+  else
+    child1_requisition.width = 0;
+
+  if (paned->child2)
+    gtk_widget_get_child_requisition (paned->child2, &child2_requisition);
+  else
+    child2_requisition.width = 0;
+
+  e_paned_compute_position (paned,
+			      MAX (1, (gint) widget->allocation.width
+				      - (gint) paned->handle_size
+				   - 2 * border_width),
+			      child1_requisition.width,
+			      child2_requisition.width);
+
+  /* Move the handle before the children so we don't get extra expose events */
+
+  paned->handle_xpos = paned->child1_size + border_width;
+  paned->handle_ypos = border_width;
+  paned->handle_width = paned->handle_size;
+  paned->handle_height = MAX (1, (gint) widget->allocation.height - 2 * border_width);
+
+  if (GTK_WIDGET_REALIZED (widget))
+    {
+      gdk_window_move_resize (widget->window,
+			      allocation->x, allocation->y,
+			      allocation->width,
+			      allocation->height);
+
+      gdk_window_move_resize (paned->handle,
+			      paned->handle_xpos,
+			      paned->handle_ypos,
+			      paned->handle_size,
+			      paned->handle_height);
+    }
+
+  child1_allocation.height = child2_allocation.height = MAX (1, (gint) allocation->height - border_width * 2);
+  child1_allocation.width = paned->child1_size;
+  child1_allocation.x = border_width;
+  child1_allocation.y = child2_allocation.y = border_width;
+  
+  child2_allocation.x = child1_allocation.x + child1_allocation.width +  paned->handle_width;
+  child2_allocation.width = MAX (1, (gint) allocation->width - child2_allocation.x - border_width);
+
+  /* Now allocate the childen, making sure, when resizing not to
+   * overlap the windows */
+  if (GTK_WIDGET_MAPPED (widget) &&
+      paned->child1 && GTK_WIDGET_VISIBLE (paned->child1) &&
+      paned->child1->allocation.width < child1_allocation.width)
+    {
+      if (paned->child2 && GTK_WIDGET_VISIBLE (paned->child2))
+	gtk_widget_size_allocate (paned->child2, &child2_allocation);
+      gtk_widget_size_allocate (paned->child1, &child1_allocation);
+    }
+  else
+    {
+      if (paned->child1 && GTK_WIDGET_VISIBLE (paned->child1))
+	gtk_widget_size_allocate (paned->child1, &child1_allocation);
+      if (paned->child2 && GTK_WIDGET_VISIBLE (paned->child2))
+	gtk_widget_size_allocate (paned->child2, &child2_allocation);
+    }
+}
+
+static void
+e_hpaned_draw (GtkWidget    *widget,
+		 GdkRectangle *area)
+{
+  EPaned *paned;
+  GdkRectangle handle_area, child_area;
+  guint16 border_width;
+
+  g_return_if_fail (widget != NULL);
+  g_return_if_fail (E_IS_PANED (widget));
+
+  if (GTK_WIDGET_VISIBLE (widget) && GTK_WIDGET_MAPPED (widget)) 
+    {
+      paned = E_PANED (widget);
+      border_width = GTK_CONTAINER (paned)->border_width;
+
+      gdk_window_clear_area (widget->window,
+			     area->x, area->y, area->width,
+			     area->height);
+
+      handle_area.x = paned->handle_xpos;
+      handle_area.y = paned->handle_ypos;
+      handle_area.width = paned->handle_size;
+      handle_area.height = paned->handle_height;
+
+      if (gdk_rectangle_intersect (&handle_area, area, &child_area))
+	{
+	  child_area.x -= paned->handle_xpos;
+	  child_area.y -= paned->handle_ypos;
+
+	  gtk_paint_handle (widget->style,
+			    paned->handle,
+			    GTK_STATE_NORMAL,
+			    GTK_SHADOW_NONE,
+			    &child_area,
+			    widget,
+			    "paned",
+			    0, 0, -1, -1,
+			    GTK_ORIENTATION_VERTICAL);
+			    
+	}
+      /* Redraw the children
+       */
+      if (paned->child1 && gtk_widget_intersect (paned->child1, area, &child_area))
+	gtk_widget_draw(paned->child1, &child_area);
+      if (paned->child2 && gtk_widget_intersect(paned->child2, area, &child_area))
+	gtk_widget_draw(paned->child2, &child_area);
+    }
+}
+
+static void
+e_hpaned_xor_line (EPaned *paned)
+{
+  GtkWidget *widget;
+  GdkGCValues values;
+  guint16 xpos;
+
+  widget = GTK_WIDGET(paned);
+
+  if (!paned->xor_gc)
+    {
+      values.function = GDK_INVERT;
+      values.subwindow_mode = GDK_INCLUDE_INFERIORS;
+      paned->xor_gc = gdk_gc_new_with_values (widget->window,
+					      &values,
+					      GDK_GC_FUNCTION | GDK_GC_SUBWINDOW);
+    }
+
+  gdk_gc_set_line_attributes (paned->xor_gc, 2, GDK_LINE_SOLID,
+			      GDK_CAP_NOT_LAST, GDK_JOIN_BEVEL);
+
+  xpos = paned->child1_size
+    + GTK_CONTAINER (paned)->border_width + paned->handle_size / 2;
+
+  gdk_draw_line (widget->window, paned->xor_gc,
+		 xpos,
+		 0,
+		 xpos,
+		 widget->allocation.height - 1);
+}
+
+static gboolean
+e_hpaned_button_press (GtkWidget      *widget,
+			 GdkEventButton *event)
+{
+  EPaned *paned;
+
+  g_return_val_if_fail (widget != NULL, FALSE);
+  g_return_val_if_fail (E_IS_PANED (widget), FALSE);
+
+  paned = E_PANED (widget);
+
+  if (!paned->in_drag &&
+      event->window == paned->handle && event->button == 1)
+    {
+      paned->in_drag = TRUE;
+      /* We need a server grab here, not gtk_grab_add(), since
+       * we don't want to pass events on to the widget's children */
+      gdk_pointer_grab(paned->handle, FALSE,
+		       GDK_POINTER_MOTION_HINT_MASK
+		       | GDK_BUTTON1_MOTION_MASK
+		       | GDK_BUTTON_RELEASE_MASK,
+		       NULL, NULL, event->time);
+      paned->child1_size += event->x - paned->handle_size / 2;
+      paned->child1_size = CLAMP (paned->child1_size, 0,
+				  widget->allocation.width
+				  - paned->handle_size
+				  - 2 * GTK_CONTAINER (paned)->border_width);
+      e_hpaned_xor_line (paned);
+
+      return TRUE;
+    }
+
+  return FALSE;
+}
+
+static gboolean
+e_hpaned_button_release (GtkWidget      *widget,
+			   GdkEventButton *event)
+{
+  EPaned *paned;
+
+  g_return_val_if_fail (widget != NULL, FALSE);
+  g_return_val_if_fail (E_IS_PANED (widget), FALSE);
+
+  paned = E_PANED (widget);
+
+  if (paned->in_drag && (event->button == 1))
+    {
+      e_hpaned_xor_line (paned);
+      paned->in_drag = FALSE;
+      paned->position_set = TRUE;
+      gdk_pointer_ungrab (event->time);
+      gtk_widget_queue_resize (GTK_WIDGET (paned));
+
+      return TRUE;
+    }
+
+  return FALSE;
+}
+
+static gboolean
+e_hpaned_motion (GtkWidget      *widget,
+		   GdkEventMotion *event)
+{
+  EPaned *paned;
+  gint x;
+
+  g_return_val_if_fail (widget != NULL, FALSE);
+  g_return_val_if_fail (E_IS_PANED (widget), FALSE);
+
+  paned = E_PANED (widget);
+
+  if (event->is_hint || event->window != widget->window)
+    gtk_widget_get_pointer(widget, &x, NULL);
+  else
+    x = event->x;
+
+  if (paned->in_drag)
+    {
+      gint size = x - GTK_CONTAINER (paned)->border_width - paned->handle_size / 2;
+
+      e_hpaned_xor_line (paned);
+      paned->child1_size = CLAMP (size, paned->min_position, paned->max_position);
+      e_hpaned_xor_line (paned);
+    }
+
+  return TRUE;
+}
diff --git a/widgets/e-paned/e-hpaned.h b/widgets/e-paned/e-hpaned.h
new file mode 100644
index 0000000000..63c09198b1
--- /dev/null
+++ b/widgets/e-paned/e-hpaned.h
@@ -0,0 +1,72 @@
+/* EPaned - A slightly more advanced paned widget.
+ * Copyright (C) 2000 Helix Code, Inc.
+ *
+ * Author: Christopher James Lahey <clahey@helixcode.com>
+ *
+ * based on GtkPaned from Gtk+.  Gtk+ Copyright notice follows.
+ */
+
+/* GTK - The GIMP Toolkit
+ * Copyright (C) 1995-1997 Peter Mattis, Spencer Kimball and Josh MacDonald
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library 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
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+ * Boston, MA 02111-1307, USA.
+ */
+
+/*
+ * Modified by the GTK+ Team and others 1997-2000.  See the AUTHORS
+ * file for a list of people on the GTK+ Team.  See the ChangeLog
+ * files for a list of changes.  These files are distributed with
+ * GTK+ at ftp://ftp.gtk.org/pub/gtk/. 
+ */
+
+#ifndef __E_HPANED_H__
+#define __E_HPANED_H__
+
+#include <widgets/e-paned/e-paned.h>
+
+#ifdef __cplusplus
+extern "C" {
+#endif /* __cplusplus */
+
+#define E_TYPE_HPANED	         (e_hpaned_get_type ())
+#define E_HPANED(obj)            (GTK_CHECK_CAST ((obj), E_TYPE_HPANED, EHPaned))
+#define E_HPANED_CLASS(klass)    (GTK_CHECK_CLASS_CAST ((klass), E_TYPE_HPANED, EHPanedClass))
+#define E_IS_HPANED(obj)         (GTK_CHECK_TYPE ((obj), E_TYPE_HPANED))
+#define E_IS_HPANED_CLASS(klass) (GTK_CHECK_CLASS_TYPE ((klass), E_TYPE_HPANED))
+#define E_HPANED_GET_CLASS(obj)  (GTK_CHECK_GET_CLASS ((obj), E_TYPE_HPANED, EHPanedClass))
+
+
+typedef struct _EHPaned      EHPaned;
+typedef struct _EHPanedClass EHPanedClass;
+
+struct _EHPaned
+{
+  EPaned paned;
+};
+
+struct _EHPanedClass
+{
+  EPanedClass parent_class;
+};
+
+GtkType    e_hpaned_get_type (void);
+GtkWidget *e_hpaned_new      (void);
+
+#ifdef __cplusplus
+}
+#endif /* __cplusplus */
+
+#endif /* __E_HPANED_H__ */
diff --git a/widgets/e-paned/e-paned.c b/widgets/e-paned/e-paned.c
new file mode 100644
index 0000000000..f2db002e6e
--- /dev/null
+++ b/widgets/e-paned/e-paned.c
@@ -0,0 +1,587 @@
+/* EPaned - A slightly more advanced paned widget.
+ * Copyright (C) 2000 Helix Code, Inc.
+ *
+ * Author: Christopher James Lahey <clahey@helixcode.com>
+ *
+ * based on GtkPaned from Gtk+.  Gtk+ Copyright notice follows.
+ */
+
+/* GTK - The GIMP Toolkit
+ * Copyright (C) 1995-1997 Peter Mattis, Spencer Kimball and Josh MacDonald
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library 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
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+ * Boston, MA 02111-1307, USA.
+ */
+
+/*
+ * Modified by the GTK+ Team and others 1997-2000.  See the AUTHORS
+ * file for a list of people on the GTK+ Team.  See the ChangeLog
+ * files for a list of changes.  These files are distributed with
+ * GTK+ at ftp://ftp.gtk.org/pub/gtk/. 
+ */
+
+#include "e-paned.h"
+
+enum {
+  ARG_0,
+  ARG_HANDLE_SIZE
+};
+
+static void    e_paned_class_init (EPanedClass  *klass);
+static void    e_paned_init       (EPaned       *paned);
+static void    e_paned_set_arg    (GtkObject      *object,
+				     GtkArg         *arg,
+				     guint           arg_id);
+static void    e_paned_get_arg    (GtkObject      *object,
+				     GtkArg         *arg,
+				     guint           arg_id);
+static void    e_paned_realize    (GtkWidget      *widget);
+static void    e_paned_map        (GtkWidget      *widget);
+static void    e_paned_unmap      (GtkWidget      *widget);
+static void    e_paned_unrealize  (GtkWidget      *widget);
+static gint    e_paned_expose     (GtkWidget      *widget,
+				     GdkEventExpose *event);
+static void    e_paned_add        (GtkContainer   *container,
+				     GtkWidget      *widget);
+static void    e_paned_remove     (GtkContainer   *container,
+				     GtkWidget      *widget);
+static void    e_paned_forall     (GtkContainer   *container,
+				     gboolean        include_internals,
+				     GtkCallback     callback,
+				     gpointer        callback_data);
+static GtkType e_paned_child_type (GtkContainer   *container);
+
+static GtkContainerClass *parent_class = NULL;
+
+
+GtkType
+e_paned_get_type (void)
+{
+  static GtkType paned_type = 0;
+  
+  if (!paned_type)
+    {
+      static const GtkTypeInfo paned_info =
+      {
+	"EPaned",
+	sizeof (EPaned),
+	sizeof (EPanedClass),
+	(GtkClassInitFunc) e_paned_class_init,
+	(GtkObjectInitFunc) e_paned_init,
+	/* reserved_1 */ NULL,
+	/* reserved_2 */ NULL,
+	(GtkClassInitFunc) NULL,
+      };
+
+      paned_type = gtk_type_unique (GTK_TYPE_CONTAINER, &paned_info);
+    }
+  
+  return paned_type;
+}
+
+static void
+e_paned_class_init (EPanedClass *class)
+{
+  GtkObjectClass *object_class;
+  GtkWidgetClass *widget_class;
+  GtkContainerClass *container_class;
+
+  object_class = (GtkObjectClass *) class;
+  widget_class = (GtkWidgetClass *) class;
+  container_class = (GtkContainerClass *) class;
+
+  parent_class = gtk_type_class (GTK_TYPE_CONTAINER);
+
+  object_class->set_arg = e_paned_set_arg;
+  object_class->get_arg = e_paned_get_arg;
+
+  widget_class->realize = e_paned_realize;
+  widget_class->map = e_paned_map;
+  widget_class->unmap = e_paned_unmap;
+  widget_class->unrealize = e_paned_unrealize;
+  widget_class->expose_event = e_paned_expose;
+  
+  container_class->add = e_paned_add;
+  container_class->remove = e_paned_remove;
+  container_class->forall = e_paned_forall;
+  container_class->child_type = e_paned_child_type;
+
+  gtk_object_add_arg_type("EPaned::handle_size", GTK_TYPE_UINT,
+			  GTK_ARG_READWRITE, ARG_HANDLE_SIZE);
+}
+
+static GtkType
+e_paned_child_type (GtkContainer *container)
+{
+  if (!E_PANED (container)->child1 || !E_PANED (container)->child2)
+    return GTK_TYPE_WIDGET;
+  else
+    return GTK_TYPE_NONE;
+}
+
+static void
+e_paned_init (EPaned *paned)
+{
+  GTK_WIDGET_UNSET_FLAGS (paned, GTK_NO_WINDOW);
+  
+  paned->child1 = NULL;
+  paned->child2 = NULL;
+  paned->handle = NULL;
+  paned->xor_gc = NULL;
+  paned->cursor_type = GDK_CROSS;
+  
+  paned->handle_width = 5;
+  paned->handle_height = 5;
+  paned->handle_size = 5;
+  paned->position_set = FALSE;
+  paned->last_allocation = -1;
+  paned->in_drag = FALSE;
+  
+  paned->handle_xpos = -1;
+  paned->handle_ypos = -1;
+}
+
+static void
+e_paned_set_arg (GtkObject *object,
+		   GtkArg    *arg,
+		   guint      arg_id)
+{
+  EPaned *paned = E_PANED (object);
+  
+  switch (arg_id)
+    {
+    case ARG_HANDLE_SIZE:
+      e_paned_set_handle_size (paned, GTK_VALUE_UINT (*arg));
+      break;
+    default:
+      break;
+    }
+}
+
+static void
+e_paned_get_arg (GtkObject *object,
+		   GtkArg    *arg,
+		   guint      arg_id)
+{
+  EPaned *paned = E_PANED (object);
+
+  switch (arg_id)
+    {
+    case ARG_HANDLE_SIZE:
+      GTK_VALUE_UINT (*arg) = paned->handle_size;
+      break;
+    default:
+      arg->type = GTK_TYPE_INVALID;
+      break;
+    }
+}
+
+static void
+e_paned_realize (GtkWidget *widget)
+{
+  EPaned *paned;
+  GdkWindowAttr attributes;
+  gint attributes_mask;
+
+  g_return_if_fail (widget != NULL);
+  g_return_if_fail (E_IS_PANED (widget));
+
+  GTK_WIDGET_SET_FLAGS (widget, GTK_REALIZED);
+  paned = E_PANED (widget);
+
+  attributes.x = widget->allocation.x;
+  attributes.y = widget->allocation.y;
+  attributes.width = widget->allocation.width;
+  attributes.height = widget->allocation.height;
+  attributes.window_type = GDK_WINDOW_CHILD;
+  attributes.wclass = GDK_INPUT_OUTPUT;
+  attributes.visual = gtk_widget_get_visual (widget);
+  attributes.colormap = gtk_widget_get_colormap (widget);
+  attributes.event_mask = gtk_widget_get_events (widget) | GDK_EXPOSURE_MASK;
+  attributes_mask = GDK_WA_X | GDK_WA_Y | GDK_WA_VISUAL | GDK_WA_COLORMAP;
+
+  widget->window = gdk_window_new (gtk_widget_get_parent_window(widget),
+				   &attributes, attributes_mask);
+  gdk_window_set_user_data (widget->window, paned);
+
+  attributes.x = paned->handle_xpos;
+  attributes.y = paned->handle_ypos;
+  attributes.width = paned->handle_width;
+  attributes.height = paned->handle_height;
+  attributes.cursor = gdk_cursor_new (paned->cursor_type);
+  attributes.event_mask |= (GDK_BUTTON_PRESS_MASK |
+			    GDK_BUTTON_RELEASE_MASK |
+			    GDK_POINTER_MOTION_MASK |
+			    GDK_POINTER_MOTION_HINT_MASK);
+  attributes_mask |= GDK_WA_CURSOR;
+
+  paned->handle = gdk_window_new (widget->window,
+				  &attributes, attributes_mask);
+  gdk_window_set_user_data (paned->handle, paned);
+  gdk_cursor_destroy (attributes.cursor);
+
+  widget->style = gtk_style_attach (widget->style, widget->window);
+
+  gtk_style_set_background (widget->style, widget->window, GTK_STATE_NORMAL);
+  gtk_style_set_background (widget->style, paned->handle, GTK_STATE_NORMAL);
+
+  gdk_window_set_back_pixmap (widget->window, NULL, TRUE);
+
+  gdk_window_show (paned->handle);
+}
+
+static void
+e_paned_map (GtkWidget *widget)
+{
+  EPaned *paned;
+
+  g_return_if_fail (widget != NULL);
+  g_return_if_fail (E_IS_PANED (widget));
+
+  GTK_WIDGET_SET_FLAGS (widget, GTK_MAPPED);
+  paned = E_PANED (widget);
+
+  if (paned->child1 &&
+      GTK_WIDGET_VISIBLE (paned->child1) &&
+      !GTK_WIDGET_MAPPED (paned->child1))
+    gtk_widget_map (paned->child1);
+  if (paned->child2 &&
+      GTK_WIDGET_VISIBLE (paned->child2) &&
+      !GTK_WIDGET_MAPPED (paned->child2))
+    gtk_widget_map (paned->child2);
+
+  gdk_window_show (widget->window);
+}
+
+static void
+e_paned_unmap (GtkWidget *widget)
+{
+  g_return_if_fail (widget != NULL);
+  g_return_if_fail (E_IS_PANED (widget));
+
+  GTK_WIDGET_UNSET_FLAGS (widget, GTK_MAPPED);
+
+  gdk_window_hide (widget->window);
+}
+
+static void
+e_paned_unrealize (GtkWidget *widget)
+{
+  EPaned *paned;
+
+  g_return_if_fail (widget != NULL);
+  g_return_if_fail (E_IS_PANED (widget));
+
+  paned = E_PANED (widget);
+
+  if (paned->xor_gc)
+    {
+      gdk_gc_destroy (paned->xor_gc);
+      paned->xor_gc = NULL;
+    }
+
+  if (paned->handle)
+    {
+      gdk_window_set_user_data (paned->handle, NULL);
+      gdk_window_destroy (paned->handle);
+      paned->handle = NULL;
+    }
+
+  if (GTK_WIDGET_CLASS (parent_class)->unrealize)
+    (* GTK_WIDGET_CLASS (parent_class)->unrealize) (widget);
+}
+
+static gint
+e_paned_expose (GtkWidget      *widget,
+		  GdkEventExpose *event)
+{
+  EPaned *paned;
+  GdkEventExpose child_event;
+
+  g_return_val_if_fail (widget != NULL, FALSE);
+  g_return_val_if_fail (E_IS_PANED (widget), FALSE);
+  g_return_val_if_fail (event != NULL, FALSE);
+
+  if (GTK_WIDGET_DRAWABLE (widget))
+    {
+      paned = E_PANED (widget);
+
+      if (event->window == paned->handle)
+	{
+	  child_event = *event;
+	  event->area.x += paned->handle_xpos;
+	  event->area.y += paned->handle_ypos;
+	  gtk_widget_draw (widget, &event->area);
+	}
+      else
+	{
+	  child_event = *event;
+	  if (paned->child1 &&
+	      GTK_WIDGET_NO_WINDOW (paned->child1) &&
+	      gtk_widget_intersect (paned->child1, &event->area, &child_event.area))
+	    gtk_widget_event (paned->child1, (GdkEvent *) &child_event);
+
+	  if (paned->child2 &&
+	      GTK_WIDGET_NO_WINDOW (paned->child2) &&
+	      gtk_widget_intersect (paned->child2, &event->area, &child_event.area))
+	    gtk_widget_event (paned->child2, (GdkEvent *) &child_event);
+	}
+    }
+
+  return FALSE;
+}
+
+void
+e_paned_add1 (EPaned  *paned,
+		GtkWidget *widget)
+{
+  e_paned_pack1 (paned, widget, FALSE, TRUE);
+}
+
+void
+e_paned_add2 (EPaned  *paned,
+		GtkWidget *widget)
+{
+  e_paned_pack2 (paned, widget, TRUE, TRUE);
+}
+
+void
+e_paned_pack1 (EPaned  *paned,
+		 GtkWidget *child,
+		 gboolean   resize,
+		 gboolean   shrink)
+{
+  g_return_if_fail (paned != NULL);
+  g_return_if_fail (E_IS_PANED (paned));
+  g_return_if_fail (GTK_IS_WIDGET (child));
+
+  if (!paned->child1)
+    {
+      paned->child1 = child;
+      paned->child1_resize = resize;
+      paned->child1_shrink = shrink;
+
+      gtk_widget_set_parent (child, GTK_WIDGET (paned));
+
+      if (GTK_WIDGET_REALIZED (child->parent))
+	gtk_widget_realize (child);
+
+      if (GTK_WIDGET_VISIBLE (child->parent) && GTK_WIDGET_VISIBLE (child))
+	{
+	  if (GTK_WIDGET_MAPPED (child->parent))
+	    gtk_widget_map (child);
+
+	  gtk_widget_queue_resize (child);
+	}
+    }
+}
+
+void
+e_paned_pack2 (EPaned  *paned,
+		 GtkWidget *child,
+		 gboolean   resize,
+		 gboolean   shrink)
+{
+  g_return_if_fail (paned != NULL);
+  g_return_if_fail (E_IS_PANED (paned));
+  g_return_if_fail (GTK_IS_WIDGET (child));
+
+  if (!paned->child2)
+    {
+      paned->child2 = child;
+      paned->child2_resize = resize;
+      paned->child2_shrink = shrink;
+
+      gtk_widget_set_parent (child, GTK_WIDGET (paned));
+
+      if (GTK_WIDGET_REALIZED (child->parent))
+	gtk_widget_realize (child);
+
+      if (GTK_WIDGET_VISIBLE (child->parent) && GTK_WIDGET_VISIBLE (child))
+	{
+	  if (GTK_WIDGET_MAPPED (child->parent))
+	    gtk_widget_map (child);
+
+	  gtk_widget_queue_resize (child);
+	}
+    }
+}
+
+
+static void
+e_paned_add (GtkContainer *container,
+	       GtkWidget    *widget)
+{
+  EPaned *paned;
+
+  g_return_if_fail (container != NULL);
+  g_return_if_fail (E_IS_PANED (container));
+  g_return_if_fail (widget != NULL);
+
+  paned = E_PANED (container);
+
+  if (!paned->child1)
+    e_paned_add1 (E_PANED (container), widget);
+  else if (!paned->child2)
+    e_paned_add2 (E_PANED (container), widget);
+}
+
+static void
+e_paned_remove (GtkContainer *container,
+		  GtkWidget    *widget)
+{
+  EPaned *paned;
+  gboolean was_visible;
+
+  g_return_if_fail (container != NULL);
+  g_return_if_fail (E_IS_PANED (container));
+  g_return_if_fail (widget != NULL);
+
+  paned = E_PANED (container);
+  was_visible = GTK_WIDGET_VISIBLE (widget);
+
+  if (paned->child1 == widget)
+    {
+      gtk_widget_unparent (widget);
+
+      paned->child1 = NULL;
+
+      if (was_visible && GTK_WIDGET_VISIBLE (container))
+	gtk_widget_queue_resize (GTK_WIDGET (container));
+    }
+  else if (paned->child2 == widget)
+    {
+      gtk_widget_unparent (widget);
+
+      paned->child2 = NULL;
+
+      if (was_visible && GTK_WIDGET_VISIBLE (container))
+	gtk_widget_queue_resize (GTK_WIDGET (container));
+    }
+}
+
+static void
+e_paned_forall (GtkContainer *container,
+		  gboolean      include_internals,
+		  GtkCallback   callback,
+		  gpointer      callback_data)
+{
+  EPaned *paned;
+
+  g_return_if_fail (container != NULL);
+  g_return_if_fail (E_IS_PANED (container));
+  g_return_if_fail (callback != NULL);
+
+  paned = E_PANED (container);
+
+  if (paned->child1)
+    (*callback) (paned->child1, callback_data);
+  if (paned->child2)
+    (*callback) (paned->child2, callback_data);
+}
+
+gint
+e_paned_get_position (EPaned  *paned)
+{
+  g_return_val_if_fail (paned != NULL, 0);
+  g_return_val_if_fail (E_IS_PANED (paned), 0);
+
+  return paned->child1_size;
+}
+
+void
+e_paned_set_position (EPaned *paned,
+			gint      position)
+{
+  g_return_if_fail (paned != NULL);
+  g_return_if_fail (E_IS_PANED (paned));
+
+  if (position >= 0)
+    {
+      /* We don't clamp here - the assumption is that
+       * if the total allocation changes at the same time
+       * as the position, the position set is with reference
+       * to the new total size. If only the position changes,
+       * then clamping will occur in e_paned_compute_position()
+       */
+      paned->child1_size = position;
+      paned->position_set = TRUE;
+    }
+  else
+    {
+      paned->position_set = FALSE;
+    }
+
+  gtk_widget_queue_resize (GTK_WIDGET (paned));
+}
+
+void
+e_paned_set_handle_size (EPaned *paned,
+			   guint16   size)
+{
+  g_return_if_fail (paned != NULL);
+  g_return_if_fail (E_IS_PANED (paned));
+
+  gtk_widget_queue_resize (GTK_WIDGET (paned));
+
+  paned->handle_size = size;
+}
+
+void
+e_paned_compute_position(EPaned *paned,
+			   gint      allocation,
+			   gint      child1_req,
+			   gint      child2_req)
+{
+  g_return_if_fail (paned != NULL);
+  g_return_if_fail (E_IS_PANED (paned));
+
+  paned->min_position = paned->child1_shrink ? 0 : child1_req;
+
+  paned->max_position = allocation;
+  if (!paned->child2_shrink)
+    paned->max_position = MAX (1, paned->max_position - child2_req);
+
+  if (!paned->position_set)
+    {
+      if (paned->child1_resize && !paned->child2_resize)
+	paned->child1_size = MAX (1, allocation - child2_req);
+      else if (!paned->child1_resize && paned->child2_resize)
+	paned->child1_size = child1_req;
+      else if (child1_req + child2_req != 0)
+	paned->child1_size = allocation * ((gdouble)child1_req / (child1_req + child2_req));
+      else
+	paned->child1_size = allocation * 0.5;
+    }
+  else
+    {
+      /* If the position was set before the initial allocation.
+       * (paned->last_allocation <= 0) just clamp it and leave it.
+       */
+      if (paned->last_allocation > 0)
+	{
+	  if (paned->child1_resize && !paned->child2_resize)
+	    paned->child1_size += allocation - paned->last_allocation;
+	  else if (!(!paned->child1_resize && paned->child2_resize))
+	    paned->child1_size = allocation * ((gdouble) paned->child1_size / (paned->last_allocation));
+	}
+    }
+
+  paned->child1_size = CLAMP (paned->child1_size,
+			      paned->min_position,
+			      paned->max_position);
+
+  paned->last_allocation = allocation;
+}
diff --git a/widgets/e-paned/e-paned.h b/widgets/e-paned/e-paned.h
new file mode 100644
index 0000000000..2b07a24bda
--- /dev/null
+++ b/widgets/e-paned/e-paned.h
@@ -0,0 +1,124 @@
+/* EPaned - A slightly more advanced paned widget.
+ * Copyright (C) 2000 Helix Code, Inc.
+ *
+ * Author: Christopher James Lahey <clahey@helixcode.com>
+ *
+ * based on GtkPaned from Gtk+.  Gtk+ Copyright notice follows.
+ */
+
+/* GTK - The GIMP Toolkit
+ * Copyright (C) 1995-1997 Peter Mattis, Spencer Kimball and Josh MacDonald
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library 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
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+ * Boston, MA 02111-1307, USA.
+ */
+
+/*
+ * Modified by the GTK+ Team and others 1997-2000.  See the AUTHORS
+ * file for a list of people on the GTK+ Team.  See the ChangeLog
+ * files for a list of changes.  These files are distributed with
+ * GTK+ at ftp://ftp.gtk.org/pub/gtk/. 
+ */
+
+#ifndef __E_PANED_H__
+#define __E_PANED_H__
+
+#include <gtk/gtkcontainer.h>
+
+#ifdef __cplusplus
+extern "C" {
+#endif /* __cplusplus */
+
+
+#define E_TYPE_PANED                  (e_paned_get_type ())
+#define E_PANED(obj)                  (GTK_CHECK_CAST ((obj), E_TYPE_PANED, EPaned))
+#define E_PANED_CLASS(klass)          (GTK_CHECK_CLASS_CAST ((klass), E_TYPE_PANED, EPanedClass))
+#define E_IS_PANED(obj)               (GTK_CHECK_TYPE ((obj), E_TYPE_PANED))
+#define E_IS_PANED_CLASS(klass)       (GTK_CHECK_CLASS_TYPE ((klass), E_TYPE_PANED))
+#define E_PANED_GET_CLASS(obj)        (GTK_CHECK_GET_CLASS ((obj), E_TYPE_PANED, EPanedClass))
+
+
+typedef struct _EPaned      EPaned;
+typedef struct _EPanedClass EPanedClass;
+
+struct _EPaned
+{
+  GtkContainer container;
+  
+  GtkWidget *child1;
+  GtkWidget *child2;
+  
+  GdkWindow *handle;
+  GdkGC *xor_gc;
+  GdkCursorType cursor_type;
+  
+  /*< public >*/
+  guint16 handle_size;
+  
+  /*< private >*/
+  guint16 handle_width;
+  guint16 handle_height;
+
+  gint child1_size;
+  gint last_allocation;
+  gint min_position;
+  gint max_position;
+
+  guint position_set : 1;
+  guint in_drag : 1;
+  guint child1_shrink : 1;
+  guint child1_resize : 1;
+  guint child2_shrink : 1;
+  guint child2_resize : 1;
+
+  gint16 handle_xpos;
+  gint16 handle_ypos;
+};
+
+struct _EPanedClass
+{
+  GtkContainerClass parent_class;
+};
+
+
+GtkType e_paned_get_type        (void);
+void    e_paned_add1            (EPaned    *paned,
+				 GtkWidget *child);
+void    e_paned_add2            (EPaned    *paned,
+				 GtkWidget *child);
+void    e_paned_pack1           (EPaned    *paned,
+				 GtkWidget *child,
+				 gboolean   resize,
+				 gboolean   shrink);
+void    e_paned_pack2           (EPaned    *paned,
+				 GtkWidget *child,
+				 gboolean   resize,
+				 gboolean   shrink);
+gint    e_paned_get_position    (EPaned    *paned);
+void    e_paned_set_position    (EPaned    *paned,
+				 gint       position);
+void    e_paned_set_handle_size (EPaned    *paned,
+				 guint16    size);
+
+/* Internal function */
+void    e_paned_compute_position (EPaned   *paned,
+				  gint      allocation,
+				  gint      child1_req,
+				  gint      child2_req);
+#ifdef __cplusplus
+}
+#endif /* __cplusplus */
+
+#endif /* __E_PANED_H__ */
diff --git a/widgets/e-paned/e-vpaned.c b/widgets/e-paned/e-vpaned.c
new file mode 100644
index 0000000000..9a71b9acd9
--- /dev/null
+++ b/widgets/e-paned/e-vpaned.c
@@ -0,0 +1,403 @@
+/* EPaned - A slightly more advanced paned widget.
+ * Copyright (C) 2000 Helix Code, Inc.
+ *
+ * Author: Christopher James Lahey <clahey@helixcode.com>
+ *
+ * based on GtkPaned from Gtk+.  Gtk+ Copyright notice follows.
+ */
+
+/* GTK - The GIMP Toolkit
+ * Copyright (C) 1995-1997 Peter Mattis, Spencer Kimball and Josh MacDonald
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library 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
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+ * Boston, MA 02111-1307, USA.
+ */
+
+/*
+ * Modified by the GTK+ Team and others 1997-1999.  See the AUTHORS
+ * file for a list of people on the GTK+ Team.  See the ChangeLog
+ * files for a list of changes.  These files are distributed with
+ * GTK+ at ftp://ftp.gtk.org/pub/gtk/. 
+ */
+
+#include "e-vpaned.h"
+
+static void     e_vpaned_class_init     (EVPanedClass   *klass);
+static void     e_vpaned_init           (EVPaned        *vpaned);
+static void     e_vpaned_size_request   (GtkWidget      *widget,
+					 GtkRequisition *requisition);
+static void     e_vpaned_size_allocate  (GtkWidget      *widget,
+					 GtkAllocation  *allocation);
+static void     e_vpaned_draw           (GtkWidget      *widget,
+					 GdkRectangle   *area);
+static void     e_vpaned_xor_line       (EPaned         *paned);
+static gboolean e_vpaned_button_press   (GtkWidget      *widget,
+					 GdkEventButton *event);
+static gboolean e_vpaned_button_release (GtkWidget      *widget,
+					 GdkEventButton *event);
+static gboolean e_vpaned_motion         (GtkWidget      *widget,
+					 GdkEventMotion *event);
+
+GtkType
+e_vpaned_get_type (void)
+{
+  static GtkType vpaned_type = 0;
+
+  if (!vpaned_type)
+    {
+      static const GtkTypeInfo vpaned_info =
+      {
+	"EVPaned",
+	sizeof (EVPaned),
+	sizeof (EVPanedClass),
+	(GtkClassInitFunc) e_vpaned_class_init,
+	(GtkObjectInitFunc) e_vpaned_init,
+	/* reserved_1 */ NULL,
+	/* reserved_2 */ NULL,
+	(GtkClassInitFunc) NULL,
+      };
+
+      vpaned_type = gtk_type_unique (E_TYPE_PANED, &vpaned_info);
+    }
+
+  return vpaned_type;
+}
+
+static void
+e_vpaned_class_init (EVPanedClass *class)
+{
+  GtkWidgetClass *widget_class;
+
+  widget_class = (GtkWidgetClass *) class;
+
+  widget_class->size_request = e_vpaned_size_request;
+  widget_class->size_allocate = e_vpaned_size_allocate;
+  widget_class->draw = e_vpaned_draw;
+  widget_class->button_press_event = e_vpaned_button_press;
+  widget_class->button_release_event = e_vpaned_button_release;
+  widget_class->motion_notify_event = e_vpaned_motion;
+}
+
+static void
+e_vpaned_init (EVPaned *vpaned)
+{
+  EPaned *paned;
+
+  g_return_if_fail (vpaned != NULL);
+  g_return_if_fail (E_IS_PANED (vpaned));
+
+  paned = E_PANED (vpaned);
+
+  paned->cursor_type = GDK_SB_V_DOUBLE_ARROW;
+}
+
+GtkWidget *
+e_vpaned_new (void)
+{
+  EVPaned *vpaned;
+
+  vpaned = gtk_type_new (E_TYPE_VPANED);
+
+  return GTK_WIDGET (vpaned);
+}
+
+static void
+e_vpaned_size_request (GtkWidget      *widget,
+			 GtkRequisition *requisition)
+{
+  EPaned *paned;
+  GtkRequisition child_requisition;
+
+  g_return_if_fail (widget != NULL);
+  g_return_if_fail (E_IS_VPANED (widget));
+  g_return_if_fail (requisition != NULL);
+
+  paned = E_PANED (widget);
+  requisition->width = 0;
+  requisition->height = 0;
+
+  if (paned->child1 && GTK_WIDGET_VISIBLE (paned->child1))
+    {
+      gtk_widget_size_request (paned->child1, &child_requisition);
+
+      requisition->height = child_requisition.height;
+      requisition->width = child_requisition.width;
+    }
+
+  if (paned->child2 && GTK_WIDGET_VISIBLE (paned->child2))
+    {
+      gtk_widget_size_request (paned->child2, &child_requisition);
+
+      requisition->width = MAX (requisition->width, child_requisition.width);
+      requisition->height += child_requisition.height;
+    }
+
+  requisition->height += GTK_CONTAINER (paned)->border_width * 2 + paned->handle_size;
+  requisition->width += GTK_CONTAINER (paned)->border_width * 2;
+}
+
+static void
+e_vpaned_size_allocate (GtkWidget     *widget,
+			  GtkAllocation *allocation)
+{
+  EPaned *paned;
+  GtkRequisition child1_requisition;
+  GtkRequisition child2_requisition;
+  GtkAllocation child1_allocation;
+  GtkAllocation child2_allocation;
+  gint border_width;
+
+  g_return_if_fail (widget != NULL);
+  g_return_if_fail (E_IS_VPANED (widget));
+  g_return_if_fail (allocation != NULL);
+  
+  widget->allocation = *allocation;
+  paned = E_PANED (widget);
+  border_width = GTK_CONTAINER (widget)->border_width;
+
+  if (paned->child1)
+    gtk_widget_get_child_requisition (paned->child1, &child1_requisition);
+  else
+    child1_requisition.height = 0;
+
+  if (paned->child2)
+    gtk_widget_get_child_requisition (paned->child2, &child2_requisition);
+  else
+    child2_requisition.height = 0;
+    
+  e_paned_compute_position (paned,
+			      MAX (1, (gint) widget->allocation.height
+				   - (gint) paned->handle_size
+				   - 2 * border_width),
+			      child1_requisition.height,
+			      child2_requisition.height);
+
+  /* Move the handle before the children so we don't get extra expose events */
+
+  paned->handle_xpos = border_width;
+  paned->handle_ypos = paned->child1_size + border_width;
+  paned->handle_width = MAX (1, (gint) widget->allocation.width - 2 * border_width);
+  paned->handle_height = paned->handle_size;
+
+  if (GTK_WIDGET_REALIZED(widget))
+    {
+      gdk_window_move_resize (widget->window,
+			      allocation->x, allocation->y,
+			      allocation->width,
+			      allocation->height);
+
+      gdk_window_move_resize (paned->handle,
+			      paned->handle_xpos,
+			      paned->handle_ypos,
+			      paned->handle_width,
+			      paned->handle_size);
+    }
+
+  child1_allocation.width = child2_allocation.width = MAX (1, (gint) allocation->width - border_width * 2);
+  child1_allocation.height = paned->child1_size;
+  child1_allocation.x = child2_allocation.x = border_width;
+  child1_allocation.y = border_width;
+
+  child2_allocation.y = child1_allocation.y + child1_allocation.height + paned->handle_height;
+  child2_allocation.height = MAX(1, (gint) allocation->height - child2_allocation.y - border_width);
+
+  /* Now allocate the childen, making sure, when resizing not to
+   * overlap the windows */
+  if (GTK_WIDGET_MAPPED (widget) &&
+      paned->child1 && GTK_WIDGET_VISIBLE (paned->child1) &&
+      paned->child1->allocation.height < child1_allocation.height)
+    {
+      if (paned->child2 && GTK_WIDGET_VISIBLE (paned->child2))
+	gtk_widget_size_allocate(paned->child2, &child2_allocation);
+      gtk_widget_size_allocate(paned->child1, &child1_allocation);
+    }
+  else
+    {
+      if (paned->child1 && GTK_WIDGET_VISIBLE (paned->child1))
+	gtk_widget_size_allocate(paned->child1, &child1_allocation);
+      if (paned->child2 && GTK_WIDGET_VISIBLE (paned->child2))
+	gtk_widget_size_allocate(paned->child2, &child2_allocation);
+    }
+}
+
+static void
+e_vpaned_draw (GtkWidget    *widget,
+		 GdkRectangle *area)
+{
+  EPaned *paned;
+  GdkRectangle handle_area, child_area;
+  guint16 border_width;
+
+  g_return_if_fail (widget != NULL);
+  g_return_if_fail (E_IS_PANED (widget));
+
+  if (GTK_WIDGET_VISIBLE (widget) && GTK_WIDGET_MAPPED (widget))
+    {
+      paned = E_PANED (widget);
+      border_width = GTK_CONTAINER (paned)->border_width;
+
+      gdk_window_clear_area (widget->window,
+			     area->x, area->y, area->width,
+			     area->height);
+
+      handle_area.x = paned->handle_xpos;
+      handle_area.y = paned->handle_ypos;
+      handle_area.width = paned->handle_width;
+      handle_area.height = paned->handle_size;
+
+      if (gdk_rectangle_intersect (&handle_area, area, &child_area))
+	{
+	  child_area.x -= paned->handle_xpos;
+	  child_area.y -= paned->handle_ypos;
+
+	  gtk_paint_handle (widget->style,
+			    paned->handle,
+			    GTK_STATE_NORMAL,
+			    GTK_SHADOW_NONE,
+			    &child_area,
+			    widget,
+			    "paned",
+			    0, 0, -1, -1,
+			    GTK_ORIENTATION_HORIZONTAL);
+
+	}
+      /* Redraw the children
+       */
+      if (paned->child1 && gtk_widget_intersect (paned->child1, area, &child_area))
+	gtk_widget_draw (paned->child1, &child_area);
+      if (paned->child2 && gtk_widget_intersect (paned->child2, area, &child_area))
+	gtk_widget_draw (paned->child2, &child_area);
+    }
+}
+
+static void
+e_vpaned_xor_line (EPaned *paned)
+{
+  GtkWidget *widget;
+  GdkGCValues values;
+  guint16 ypos;
+
+  widget = GTK_WIDGET (paned);
+
+  if (!paned->xor_gc)
+    {
+      values.function = GDK_INVERT;
+      values.subwindow_mode = GDK_INCLUDE_INFERIORS;
+      paned->xor_gc = gdk_gc_new_with_values (widget->window,
+					      &values,
+					      GDK_GC_FUNCTION | GDK_GC_SUBWINDOW);
+    }
+
+  gdk_gc_set_line_attributes (paned->xor_gc, 2, GDK_LINE_SOLID,
+			      GDK_CAP_NOT_LAST, GDK_JOIN_BEVEL);
+
+  ypos = paned->child1_size
+    + GTK_CONTAINER (paned)->border_width + paned->handle_size / 2;
+
+  gdk_draw_line (widget->window, paned->xor_gc,
+		 0,
+		 ypos,
+		 widget->allocation.width - 1,
+		 ypos);
+}
+
+static gboolean
+e_vpaned_button_press (GtkWidget      *widget,
+			 GdkEventButton *event)
+{
+  EPaned *paned;
+
+  g_return_val_if_fail (widget != NULL, FALSE);
+  g_return_val_if_fail (E_IS_PANED (widget), FALSE);
+
+  paned = E_PANED (widget);
+
+  if (!paned->in_drag &&
+      (event->window == paned->handle) && (event->button == 1))
+    {
+      paned->in_drag = TRUE;
+      /* We need a server grab here, not gtk_grab_add(), since
+       * we don't want to pass events on to the widget's children */
+      gdk_pointer_grab (paned->handle, FALSE,
+			GDK_POINTER_MOTION_HINT_MASK
+			| GDK_BUTTON1_MOTION_MASK
+			| GDK_BUTTON_RELEASE_MASK, NULL, NULL,
+			event->time);
+      paned->child1_size += event->y - paned->handle_size / 2;
+      paned->child1_size = CLAMP (paned->child1_size, 0,
+				  widget->allocation.height -
+				  paned->handle_size -
+				  2 * GTK_CONTAINER (paned)->border_width);
+      e_vpaned_xor_line(paned);
+
+      return TRUE;
+    }
+
+  return FALSE;
+}
+
+static gboolean
+e_vpaned_button_release (GtkWidget      *widget,
+			   GdkEventButton *event)
+{
+  EPaned *paned;
+
+  g_return_val_if_fail (widget != NULL, FALSE);
+  g_return_val_if_fail (E_IS_PANED (widget), FALSE);
+
+  paned = E_PANED (widget);
+
+  if (paned->in_drag && (event->button == 1))
+    {
+      e_vpaned_xor_line (paned);
+      paned->in_drag = FALSE;
+      paned->position_set = TRUE;
+      gdk_pointer_ungrab (event->time);
+      gtk_widget_queue_resize (GTK_WIDGET (paned));
+
+      return TRUE;
+    }
+
+  return FALSE;
+}
+
+static gboolean
+e_vpaned_motion (GtkWidget      *widget,
+		   GdkEventMotion *event)
+{
+  EPaned *paned;
+  gint y;
+
+  g_return_val_if_fail (widget != NULL, FALSE);
+  g_return_val_if_fail (E_IS_PANED (widget), FALSE);
+
+  if (event->is_hint || event->window != widget->window)
+    gtk_widget_get_pointer (widget, NULL, &y);
+  else
+    y = event->y;
+
+  paned = E_PANED (widget);
+
+  if (paned->in_drag)
+    {
+      gint size = y - GTK_CONTAINER(paned)->border_width - paned->handle_size / 2;
+
+      e_vpaned_xor_line (paned);
+      paned->child1_size = CLAMP (size, paned->min_position, paned->max_position);
+      e_vpaned_xor_line(paned);
+    }
+
+  return TRUE;
+}
diff --git a/widgets/e-paned/e-vpaned.h b/widgets/e-paned/e-vpaned.h
new file mode 100644
index 0000000000..1c247472fd
--- /dev/null
+++ b/widgets/e-paned/e-vpaned.h
@@ -0,0 +1,72 @@
+/* EPaned - A slightly more advanced paned widget.
+ * Copyright (C) 2000 Helix Code, Inc.
+ *
+ * Author: Christopher James Lahey <clahey@helixcode.com>
+ *
+ * based on GtkPaned from Gtk+.  Gtk+ Copyright notice follows.
+ */
+
+/* GTK - The GIMP Toolkit
+ * Copyright (C) 1995-1997 Peter Mattis, Spencer Kimball and Josh MacDonald
+ *
+ * This library is free software; you can redistribute it and/or
+ * modify it under the terms of the GNU Library General Public
+ * License as published by the Free Software Foundation; either
+ * version 2 of the License, or (at your option) any later version.
+ *
+ * This library 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
+ * Library General Public License for more details.
+ *
+ * You should have received a copy of the GNU Library General Public
+ * License along with this library; if not, write to the
+ * Free Software Foundation, Inc., 59 Temple Place - Suite 330,
+ * Boston, MA 02111-1307, USA.
+ */
+
+/*
+ * Modified by the GTK+ Team and others 1997-2000.  See the AUTHORS
+ * file for a list of people on the GTK+ Team.  See the ChangeLog
+ * files for a list of changes.  These files are distributed with
+ * GTK+ at ftp://ftp.gtk.org/pub/gtk/. 
+ */
+
+#ifndef __E_VPANED_H__
+#define __E_VPANED_H__
+
+#include <widgets/e-paned/e-paned.h>
+
+#ifdef __cplusplus
+extern "C" {
+#endif /* __cplusplus */
+
+#define E_TYPE_VPANED            (e_vpaned_get_type ())
+#define E_VPANED(obj)            (GTK_CHECK_CAST ((obj), E_TYPE_VPANED, EVPaned))
+#define E_VPANED_CLASS(klass)    (GTK_CHECK_CLASS_CAST ((klass), E_TYPE_VPANED, EVPanedClass))
+#define E_IS_VPANED(obj)         (GTK_CHECK_TYPE ((obj), E_TYPE_VPANED))
+#define E_IS_VPANED_CLASS(klass) (GTK_CHECK_CLASS_TYPE ((klass), E_TYPE_VPANED))
+#define E_VPANED_GET_CLASS(obj)  (GTK_CHECK_GET_CLASS ((obj), E_TYPE_VPANED, EVPanedClass))
+
+
+typedef struct _EVPaned      EVPaned;
+typedef struct _EVPanedClass EVPanedClass;
+
+struct _EVPaned
+{
+  EPaned paned;
+};
+
+struct _EVPanedClass
+{
+  EPanedClass parent_class;
+};
+
+GtkType    e_vpaned_get_type (void);
+GtkWidget *e_vpaned_new      (void);
+
+#ifdef __cplusplus
+}
+#endif /* __cplusplus */
+
+#endif /* __E_VPANED_H__ */