Remove superfluous casts and fix whitespace sillyness.
[pspp-builds.git] / lib / gtksheet / gtksheet.c
index b96bb32291f2d71ad3a48d681ddb9dbc2e1f8c9c..bc4c9e359bda9297a8413b144960338edd89cf96 100644 (file)
@@ -1,5 +1,11 @@
-/* This version of GtkSheet has been *heavily* modified, for the specific
-   requirements of PSPPIRE. */
+/*
+ * Copyright (C) 2006, 2008 Free Software Foundation
+ *
+ * This version of GtkSheet has been *heavily* modified, for the specific
+ * requirements of PSPPIRE.  The changes are copyright by the
+ * Free Software Foundation.  The copyright notice for the original work is
+ * below.
+*/
 
 /* GtkSheet widget for Gtk+.
  * Copyright (C) 1999-2001 Adrian E. Feiguin <adrian@ifir.ifir.edu.ar>
 /* sheet flags */
 enum
   {
-    GTK_SHEET_IS_LOCKED = 1 << 0,
     GTK_SHEET_IS_FROZEN = 1 << 1,
     GTK_SHEET_IN_XDRAG = 1 << 2,
     GTK_SHEET_IN_YDRAG = 1 << 3,
     GTK_SHEET_IN_DRAG = 1 << 4,
     GTK_SHEET_IN_SELECTION = 1 << 5,
     GTK_SHEET_IN_RESIZE = 1 << 6,
-    GTK_SHEET_IN_CLIP = 1 << 7,
-    GTK_SHEET_REDRAW_PENDING = 1 << 8,
+    GTK_SHEET_REDRAW_PENDING = 1 << 7,
   };
 
 #define GTK_SHEET_FLAGS(sheet) (GTK_SHEET (sheet)->flags)
 #define GTK_SHEET_SET_FLAGS(sheet,flag) (GTK_SHEET_FLAGS (sheet) |= (flag))
 #define GTK_SHEET_UNSET_FLAGS(sheet,flag) (GTK_SHEET_FLAGS (sheet) &= ~ (flag))
 
-#define GTK_SHEET_IS_LOCKED(sheet) (GTK_SHEET_FLAGS (sheet) & GTK_SHEET_IS_LOCKED)
-
-
 #define GTK_SHEET_IS_FROZEN(sheet) (GTK_SHEET_FLAGS (sheet) & GTK_SHEET_IS_FROZEN)
 #define GTK_SHEET_IN_XDRAG(sheet) (GTK_SHEET_FLAGS (sheet) & GTK_SHEET_IN_XDRAG)
 #define GTK_SHEET_IN_YDRAG(sheet) (GTK_SHEET_FLAGS (sheet) & GTK_SHEET_IN_YDRAG)
 #define GTK_SHEET_IN_DRAG(sheet) (GTK_SHEET_FLAGS (sheet) & GTK_SHEET_IN_DRAG)
 #define GTK_SHEET_IN_SELECTION(sheet) (GTK_SHEET_FLAGS (sheet) & GTK_SHEET_IN_SELECTION)
 #define GTK_SHEET_IN_RESIZE(sheet) (GTK_SHEET_FLAGS (sheet) & GTK_SHEET_IN_RESIZE)
-#define GTK_SHEET_IN_CLIP(sheet) (GTK_SHEET_FLAGS (sheet) & GTK_SHEET_IN_CLIP)
 #define GTK_SHEET_REDRAW_PENDING(sheet) (GTK_SHEET_FLAGS (sheet) & GTK_SHEET_REDRAW_PENDING)
 
 #define CELL_SPACING 1
 #define DRAG_WIDTH 6
-#define TIMEOUT_FLASH 200
 #define TIMEOUT_HOVER 300
 #define TIME_INTERVAL 8
 #define COLUMN_MIN_WIDTH 10
@@ -106,6 +105,9 @@ enum
 #define DEFAULT_COLUMN_WIDTH 80
 
 
+static void gtk_sheet_update_primary_selection (GtkSheet *sheet);
+
+
 static void gtk_sheet_column_title_button_draw (GtkSheet *sheet, gint column);
 
 static void gtk_sheet_row_title_button_draw (GtkSheet *sheet, gint row);
@@ -136,10 +138,13 @@ guint DEFAULT_ROW_HEIGHT (GtkWidget *widget)
        pango_context_get_metrics (context,
                                   widget->style->font_desc,
                                   pango_context_get_language (context));
+
       guint val = pango_font_metrics_get_descent (metrics) +
        pango_font_metrics_get_ascent (metrics);
+
       pango_font_metrics_unref (metrics);
-      return PANGO_PIXELS (val)+2 * CELLOFFSET;
+
+      return PANGO_PIXELS (val) + 2 * CELLOFFSET;
     }
 }
 
@@ -172,7 +177,7 @@ guint STRING_WIDTH (GtkWidget *widget,
 
   pango_layout_get_extents (layout, NULL, &rect);
 
-  g_object_unref (G_OBJECT (layout));
+  g_object_unref (layout);
   return PANGO_PIXELS (rect.width);
 }
 
@@ -449,7 +454,7 @@ yyy_set_row_height (GtkSheet *sheet, gint row, gint height)
 /* returns the total width of the sheet */
 static inline gint SHEET_WIDTH (GtkSheet *sheet)
 {
-  gint i,cx;
+  gint i, cx;
 
   cx = ( sheet->row_titles_visible ? sheet->row_title_area.width : 0);
 
@@ -504,7 +509,7 @@ POSSIBLE_YDRAG (const GtkSheet *sheet, gint y, gint *drag_row)
   row = ROW_FROM_YPIXEL (sheet, y);
   *drag_row = row;
 
-  ydrag = ROW_TOP_YPIXEL (sheet,row)+CELL_SPACING;
+  ydrag = ROW_TOP_YPIXEL (sheet, row)+CELL_SPACING;
   if (y <= ydrag + DRAG_WIDTH / 2 && row != 0)
     {
       while (!yyy_row_is_visible (sheet, row - 1) && row > 0) row--;
@@ -539,7 +544,7 @@ POSSIBLE_DRAG (const GtkSheet *sheet, gint x, gint y,
       x <= COLUMN_LEFT_XPIXEL (sheet, sheet->range.coli) +
       xxx_column_width (sheet, sheet->range.coli) + DRAG_WIDTH / 2)
     {
-      ydrag = ROW_TOP_YPIXEL (sheet,sheet->range.row0);
+      ydrag = ROW_TOP_YPIXEL (sheet, sheet->range.row0);
       if (y >= ydrag - DRAG_WIDTH / 2 && y <= ydrag + DRAG_WIDTH / 2)
        {
          *drag_row = sheet->range.row0;
@@ -587,10 +592,10 @@ POSSIBLE_RESIZE (const GtkSheet *sheet, gint x, gint y,
        sheet->range.col0 < 0 || sheet->range.coli < 0 )
     return FALSE;
 
-  xdrag = COLUMN_LEFT_XPIXEL (sheet,sheet->range.coli)+
+  xdrag = COLUMN_LEFT_XPIXEL (sheet, sheet->range.coli)+
     xxx_column_width (sheet, sheet->range.coli);
 
-  ydrag = ROW_TOP_YPIXEL (sheet,sheet->range.rowi)+
+  ydrag = ROW_TOP_YPIXEL (sheet, sheet->range.rowi)+
     yyy_row_height (sheet, sheet->range.rowi);
 
   if (sheet->state == GTK_SHEET_COLUMN_SELECTED)
@@ -599,8 +604,8 @@ POSSIBLE_RESIZE (const GtkSheet *sheet, gint x, gint y,
   if (sheet->state == GTK_SHEET_ROW_SELECTED)
     xdrag = COLUMN_LEFT_XPIXEL (sheet, MIN_VISIBLE_COLUMN (sheet));
 
-  *drag_column = COLUMN_FROM_XPIXEL (sheet,x);
-  *drag_row = ROW_FROM_YPIXEL (sheet,y);
+  *drag_column = COLUMN_FROM_XPIXEL (sheet, x);
+  *drag_row = ROW_FROM_YPIXEL (sheet, y);
 
   if (x >= xdrag - DRAG_WIDTH / 2 && x <= xdrag + DRAG_WIDTH / 2 &&
       y >= ydrag - DRAG_WIDTH / 2 && y <= ydrag + DRAG_WIDTH / 2) return TRUE;
@@ -646,14 +651,10 @@ static void gtk_sheet_size_allocate                (GtkWidget * widget,
 
 /* Sheet queries */
 
-static gint gtk_sheet_range_isvisible           (GtkSheet * sheet,
-                                                 GtkSheetRange range);
-static gint gtk_sheet_cell_isvisible            (GtkSheet * sheet,
-                                                 gint row, gint column);
-/* Clipped Range */
-
-static gint gtk_sheet_flash                     (gpointer data);
-
+static gboolean gtk_sheet_range_isvisible (const GtkSheet * sheet,
+                                          GtkSheetRange range);
+static gboolean gtk_sheet_cell_isvisible  (GtkSheet * sheet,
+                                          gint row, gint column);
 /* Drawing Routines */
 
 /* draw cell background and frame */
@@ -724,8 +725,7 @@ static void draw_xor_vline                   (GtkSheet * sheet);
 static void draw_xor_hline                      (GtkSheet * sheet);
 static void draw_xor_rectangle                  (GtkSheet *sheet,
                                                  GtkSheetRange range);
-static void gtk_sheet_draw_flashing_range       (GtkSheet *sheet,
-                                                 GtkSheetRange range);
+
 static guint new_column_width                   (GtkSheet * sheet,
                                                  gint column,
                                                  gint * x);
@@ -761,12 +761,11 @@ static void init_attributes                        (const GtkSheet *sheet, gint col,
 
 /* Memory allocation routines */
 static void gtk_sheet_real_range_clear                  (GtkSheet *sheet,
-                                                 const GtkSheetRange *range,
-                                                 gboolean delete);
+                                                 const GtkSheetRange *range);
+
 static void gtk_sheet_real_cell_clear           (GtkSheet *sheet,
                                                  gint row,
-                                                 gint column,
-                                                 gboolean delete);
+                                                 gint column);
 
 
 /* Container Functions */
@@ -798,8 +797,9 @@ enum
     SELECT_COLUMN,
     DOUBLE_CLICK_ROW,
     DOUBLE_CLICK_COLUMN,
+    BUTTON_EVENT_ROW,
+    BUTTON_EVENT_COLUMN,
     SELECT_RANGE,
-    CLIP_RANGE,
     RESIZE_RANGE,
     MOVE_RANGE,
     TRAVERSE,
@@ -935,7 +935,7 @@ gtk_sheet_class_init (GtkSheetClass * klass)
 
 
   /**
-   * GtkSheet::double - click - row
+   * GtkSheet::double-click-row
    * @sheet: the sheet widget that emitted the signal
    * @row: the row that was double clicked.
    *
@@ -954,7 +954,7 @@ gtk_sheet_class_init (GtkSheetClass * klass)
 
 
   /**
-   * GtkSheet::double - click - column
+   * GtkSheet::double-click-column
    * @sheet: the sheet widget that emitted the signal
    * @column: the column that was double clicked.
    *
@@ -972,29 +972,60 @@ gtk_sheet_class_init (GtkSheetClass * klass)
                  G_TYPE_INT);
 
 
-  sheet_signals[SELECT_RANGE] =
-    g_signal_new ("select-range",
+  /**
+   * GtkSheet::button-event-column
+   * @sheet: the sheet widget that emitted the signal
+   * @column: the column on which the event occured.
+   *
+   * A button event occured on a column title button
+   */
+  sheet_signals[BUTTON_EVENT_COLUMN] =
+    g_signal_new ("button-event-column",
                  G_TYPE_FROM_CLASS (object_class),
                  G_SIGNAL_RUN_LAST,
-                 offsetof (GtkSheetClass, select_range),
+                 0,
                  NULL, NULL,
-                 gtkextra_VOID__BOXED,
+                 gtkextra_VOID__INT_POINTER,
                  G_TYPE_NONE,
-                 1,
-                 GTK_TYPE_SHEET_RANGE);
+                 2,
+                 G_TYPE_INT,
+                 G_TYPE_POINTER
+                 );
+
+
+  /**
+   * GtkSheet::button-event-row
+   * @sheet: the sheet widget that emitted the signal
+   * @column: the column on which the event occured.
+   *
+   * A button event occured on a row title button
+   */
+  sheet_signals[BUTTON_EVENT_ROW] =
+    g_signal_new ("button-event-row",
+                 G_TYPE_FROM_CLASS (object_class),
+                 G_SIGNAL_RUN_LAST,
+                 0,
+                 NULL, NULL,
+                 gtkextra_VOID__INT_POINTER,
+                 G_TYPE_NONE,
+                 2,
+                 G_TYPE_INT,
+                 G_TYPE_POINTER
+                 );
 
 
-  sheet_signals[CLIP_RANGE] =
-    g_signal_new ("clip-range",
+  sheet_signals[SELECT_RANGE] =
+    g_signal_new ("select-range",
                  G_TYPE_FROM_CLASS (object_class),
                  G_SIGNAL_RUN_LAST,
-                 offsetof (GtkSheetClass, clip_range),
+                 offsetof (GtkSheetClass, select_range),
                  NULL, NULL,
                  gtkextra_VOID__BOXED,
                  G_TYPE_NONE,
                  1,
                  GTK_TYPE_SHEET_RANGE);
 
+
   sheet_signals[RESIZE_RANGE] =
     g_signal_new ("resize-range",
                  G_TYPE_FROM_CLASS (object_class),
@@ -1130,7 +1161,6 @@ gtk_sheet_class_init (GtkSheetClass * klass)
   klass->select_row = NULL;
   klass->select_column = NULL;
   klass->select_range = NULL;
-  klass->clip_range = NULL;
   klass->resize_range = NULL;
   klass->move_range = NULL;
   klass->traverse = NULL;
@@ -1210,7 +1240,7 @@ gtk_sheet_init (GtkSheet *sheet)
   gdk_color_alloc (gdk_colormap_get_system (), &sheet->grid_color);
   sheet->show_grid = TRUE;
 
-  sheet->motion_events = 0;
+  sheet->motion_timer = 0;
 }
 
 
@@ -1295,6 +1325,15 @@ range_update_callback (GSheetModel *m, gint row0, gint col0,
   range.rowi = rowi;
   range.coli = coli;
 
+  if ( MAX_VISIBLE_ROW (sheet) >
+       g_sheet_model_get_row_count (sheet->model)
+       ||
+       MAX_VISIBLE_COLUMN (sheet) >
+       g_sheet_model_get_column_count (sheet->model))
+    {
+      gtk_sheet_move_query (sheet, 0, 0);
+    }
+
   if ( ( row0 < 0 && col0 < 0 ) || ( rowi < 0 && coli < 0 ) )
     {
       gint i;
@@ -1415,7 +1454,7 @@ column_titles_changed (GtkWidget *w, gint first, gint n_columns, gpointer data)
       for ( i = first ; i <= first + n_columns ; ++i )
        {
          gtk_sheet_column_title_button_draw (sheet, i);
-         g_signal_emit (G_OBJECT (sheet), sheet_signals[CHANGED], 0, -1, i);
+         g_signal_emit (sheet, sheet_signals[CHANGED], 0, -1, i);
        }
     }
 
@@ -1511,7 +1550,7 @@ gtk_sheet_change_entry (GtkSheet *sheet, GtkType entry_type)
   if (state == GTK_SHEET_NORMAL)
     {
       gtk_sheet_show_active_cell (sheet);
-      g_signal_connect (G_OBJECT (gtk_sheet_get_entry (sheet)),
+      g_signal_connect (gtk_sheet_get_entry (sheet),
                        "changed",
                        G_CALLBACK (gtk_sheet_entry_changed),
                        sheet);
@@ -1696,23 +1735,6 @@ gtk_sheet_autoscroll (GtkSheet *sheet)
   return sheet->autoscroll;
 }
 
-void
-gtk_sheet_set_clip_text (GtkSheet *sheet, gboolean clip_text)
-{
-  g_return_if_fail (sheet != NULL);
-  g_return_if_fail (GTK_IS_SHEET (sheet));
-
-  sheet->clip_text = clip_text;
-}
-
-gboolean
-gtk_sheet_clip_text (GtkSheet *sheet)
-{
-  g_return_val_if_fail (sheet != NULL, FALSE);
-  g_return_val_if_fail (GTK_IS_SHEET (sheet), FALSE);
-
-  return sheet->clip_text;
-}
 
 void
 gtk_sheet_set_justify_entry (GtkSheet *sheet, gboolean justify)
@@ -1732,40 +1754,6 @@ gtk_sheet_justify_entry (GtkSheet *sheet)
   return sheet->justify_entry;
 }
 
-void
-gtk_sheet_set_locked (GtkSheet *sheet, gboolean locked)
-{
-  g_return_if_fail (sheet != NULL);
-  g_return_if_fail (GTK_IS_SHEET (sheet));
-
-  if ( locked )
-    {
-      GTK_SHEET_SET_FLAGS (sheet,GTK_SHEET_IS_LOCKED);
-      gtk_widget_hide (sheet->sheet_entry);
-      gtk_widget_unmap (sheet->sheet_entry);
-    }
-  else
-    {
-      GTK_SHEET_UNSET_FLAGS (sheet,GTK_SHEET_IS_LOCKED);
-      if (GTK_WIDGET_MAPPED (GTK_WIDGET (sheet)))
-       {
-         gtk_widget_show (sheet->sheet_entry);
-         gtk_widget_map (sheet->sheet_entry);
-       }
-    }
-
-  gtk_editable_set_editable (GTK_EDITABLE (sheet->sheet_entry), locked);
-
-}
-
-gboolean
-gtk_sheet_locked (const GtkSheet *sheet)
-{
-  g_return_val_if_fail (sheet != NULL, FALSE);
-  g_return_val_if_fail (GTK_IS_SHEET (sheet), FALSE);
-
-  return GTK_SHEET_IS_LOCKED (sheet);
-}
 
 /* This routine has problems with gtk+- 1.2 related with the
    label / button drawing - I think it's a bug in gtk+- 1.2 */
@@ -1820,10 +1808,10 @@ gtk_sheet_thaw (GtkSheet *sheet)
   sheet->old_hadjustment = -1.;
 
   if (sheet->hadjustment)
-    g_signal_emit_by_name (G_OBJECT (sheet->hadjustment),
+    g_signal_emit_by_name (sheet->hadjustment,
                           "value_changed");
   if (sheet->vadjustment)
-    g_signal_emit_by_name (G_OBJECT (sheet->vadjustment),
+    g_signal_emit_by_name (sheet->vadjustment,
                           "value_changed");
 
   if (sheet->state == GTK_STATE_NORMAL)
@@ -1846,7 +1834,7 @@ gtk_sheet_set_row_titles_width (GtkSheet *sheet, guint width)
 
   sheet->old_hadjustment = -1.;
   if (sheet->hadjustment)
-    g_signal_emit_by_name (G_OBJECT (sheet->hadjustment),
+    g_signal_emit_by_name (sheet->hadjustment,
                           "value_changed");
   size_allocate_global_button (sheet);
 }
@@ -1862,7 +1850,7 @@ gtk_sheet_set_column_titles_height (GtkSheet *sheet, guint height)
 
   sheet->old_vadjustment = -1.;
   if (sheet->vadjustment)
-    g_signal_emit_by_name (G_OBJECT (sheet->vadjustment),
+    g_signal_emit_by_name (sheet->vadjustment,
                           "value_changed");
   size_allocate_global_button (sheet);
 }
@@ -1901,7 +1889,7 @@ gtk_sheet_show_column_titles (GtkSheet *sheet)
 
   sheet->old_vadjustment = -1.;
   if (sheet->vadjustment)
-    g_signal_emit_by_name (G_OBJECT (sheet->vadjustment),
+    g_signal_emit_by_name (sheet->vadjustment,
                           "value_changed");
   size_allocate_global_button (sheet);
 }
@@ -1943,7 +1931,7 @@ gtk_sheet_show_row_titles (GtkSheet *sheet)
 
   sheet->old_hadjustment = -1.;
   if (sheet->hadjustment)
-    g_signal_emit_by_name (G_OBJECT (sheet->hadjustment),
+    g_signal_emit_by_name (sheet->hadjustment,
                           "value_changed");
   size_allocate_global_button (sheet);
 }
@@ -1979,7 +1967,7 @@ gtk_sheet_hide_column_titles (GtkSheet *sheet)
 
   sheet->old_vadjustment = -1.;
   if (sheet->vadjustment)
-    g_signal_emit_by_name (G_OBJECT (sheet->vadjustment),
+    g_signal_emit_by_name (sheet->vadjustment,
                           "value_changed");
 }
 
@@ -2014,7 +2002,7 @@ gtk_sheet_hide_row_titles (GtkSheet *sheet)
 
   sheet->old_hadjustment = -1.;
   if (sheet->hadjustment)
-    g_signal_emit_by_name (G_OBJECT (sheet->hadjustment),
+    g_signal_emit_by_name (sheet->hadjustment,
                           "value_changed");
 }
 
@@ -2060,21 +2048,22 @@ gtk_sheet_moveto (GtkSheet *sheet,
   width = sheet->sheet_window_width;
 
   /* adjust vertical scrollbar */
-  if (row >= 0 && row_align >= 0.)
+  if (row >= 0 && row_align >= 0.0)
     {
       y = ROW_TOP_YPIXEL (sheet, row) - sheet->voffset
-       - (gint) ( row_align*height + (1. - row_align)
+       - (gint) ( row_align * height + (1.0 - row_align)
                   * yyy_row_height (sheet, row));
 
       /* This forces the sheet to scroll when you don't see the entire cell */
       min_row = row;
       adjust = 0;
-      if (row_align == 1.)
+      if (row_align >= 1.0)
        {
          while (min_row >= 0 && min_row > MIN_VISIBLE_ROW (sheet))
            {
              if (yyy_row_is_visible (sheet, min_row))
                adjust += yyy_row_height (sheet, min_row);
+
              if (adjust >= height)
                {
                  break;
@@ -2082,6 +2071,9 @@ gtk_sheet_moveto (GtkSheet *sheet,
              min_row--;
            }
          min_row = MAX (min_row, 0);
+
+         min_row ++;
+
          y = ROW_TOP_YPIXEL (sheet, min_row) - sheet->voffset +
            yyy_row_height (sheet, min_row) - 1;
        }
@@ -2092,23 +2084,22 @@ gtk_sheet_moveto (GtkSheet *sheet,
        sheet->vadjustment->value = y;
 
       sheet->old_vadjustment = -1.;
-      g_signal_emit_by_name (G_OBJECT (sheet->vadjustment),
+      g_signal_emit_by_name (sheet->vadjustment,
                             "value_changed");
 
     }
 
   /* adjust horizontal scrollbar */
-  if (column >= 0 && col_align >= 0.)
+  if (column >= 0 && col_align >= 0.0)
     {
       x = COLUMN_LEFT_XPIXEL (sheet, column) - sheet->hoffset
-       - (gint) ( col_align*width + (1.- col_align)*
+       - (gint) ( col_align*width + (1.- col_align)*
                   xxx_column_width (sheet, column));
 
-
       /* This forces the sheet to scroll when you don't see the entire cell */
       min_col = column;
       adjust = 0;
-      if (col_align == 1.)
+      if (col_align == 1.0)
        {
          while (min_col >= 0 && min_col > MIN_VISIBLE_COLUMN (sheet))
            {
@@ -2132,9 +2123,8 @@ gtk_sheet_moveto (GtkSheet *sheet,
        sheet->hadjustment->value = x;
 
       sheet->old_vadjustment = -1.;
-      g_signal_emit_by_name (G_OBJECT (sheet->hadjustment),
+      g_signal_emit_by_name (sheet->hadjustment,
                             "value_changed");
-
     }
 }
 
@@ -2204,7 +2194,7 @@ gtk_sheet_select_row (GtkSheet * sheet,
   sheet->active_cell.row = row;
   sheet->active_cell.col = 0;
 
-  g_signal_emit (G_OBJECT (sheet), sheet_signals[SELECT_ROW], 0, row);
+  g_signal_emit (sheet, sheet_signals[SELECT_ROW], 0, row);
   gtk_sheet_real_select_range (sheet, NULL);
 }
 
@@ -2235,193 +2225,15 @@ gtk_sheet_select_column (GtkSheet * sheet, gint column)
   sheet->active_cell.row = 0;
   sheet->active_cell.col = column;
 
-  g_signal_emit (G_OBJECT (sheet), sheet_signals[SELECT_COLUMN], 0, column);
+  g_signal_emit (sheet, sheet_signals[SELECT_COLUMN], 0, column);
   gtk_sheet_real_select_range (sheet, NULL);
 }
 
 
 
-void
-gtk_sheet_clip_range (GtkSheet *sheet, const GtkSheetRange *range)
-{
-
-  g_return_if_fail (sheet != NULL);
-  g_return_if_fail (GTK_IS_SHEET (sheet));
-
-  if (GTK_SHEET_IN_CLIP (sheet)) return;
-
-  GTK_SHEET_SET_FLAGS (sheet, GTK_SHEET_IN_CLIP);
-
-  if (range == NULL)
-    sheet->clip_range = sheet->range;
-  else
-    sheet->clip_range=*range;
-
-  sheet->interval = 0;
-  sheet->clip_timer = g_timeout_add (TIMEOUT_FLASH, gtk_sheet_flash, sheet);
-
-  g_signal_emit (G_OBJECT (sheet), sheet_signals[CLIP_RANGE], 0,
-                &sheet->clip_range);
-}
-
-void
-gtk_sheet_unclip_range (GtkSheet *sheet)
-{
-
-  g_return_if_fail (sheet != NULL);
-  g_return_if_fail (GTK_IS_SHEET (sheet));
-
-  if (!GTK_SHEET_IN_CLIP (sheet)) return;
-
-  GTK_SHEET_UNSET_FLAGS (sheet, GTK_SHEET_IN_CLIP);
-
-  g_source_remove  (sheet->clip_timer);
-  gtk_sheet_range_draw (sheet, &sheet->clip_range);
-
-  if (gtk_sheet_range_isvisible (sheet, sheet->range))
-    gtk_sheet_range_draw (sheet, &sheet->range);
-}
-
-gboolean
-gtk_sheet_in_clip (GtkSheet *sheet)
-{
-  g_return_val_if_fail (sheet != NULL, FALSE);
-  g_return_val_if_fail (GTK_IS_SHEET (sheet), FALSE);
-
-  return GTK_SHEET_IN_CLIP (sheet);
-}
-
-static gint
-gtk_sheet_flash (gpointer data)
-{
-  GtkSheet *sheet;
-  gint x,y,width,height;
-  GdkRectangle clip_area;
-
-  sheet = GTK_SHEET (data);
-
-  if (!GTK_WIDGET_REALIZED (GTK_WIDGET (sheet))) return TRUE;
-  if (!GTK_WIDGET_DRAWABLE (GTK_WIDGET (sheet))) return TRUE;
-  if (!gtk_sheet_range_isvisible (sheet, sheet->clip_range)) return TRUE;
-  if (GTK_SHEET_IN_XDRAG (sheet)) return TRUE;
-  if (GTK_SHEET_IN_YDRAG (sheet)) return TRUE;
-
-  GDK_THREADS_ENTER ();
-
-  x = COLUMN_LEFT_XPIXEL (sheet,sheet->clip_range.col0)+1;
-  y = ROW_TOP_YPIXEL (sheet,sheet->clip_range.row0)+1;
-  width = COLUMN_LEFT_XPIXEL (sheet,sheet->clip_range.coli)- x+
-    xxx_column_width (sheet, sheet->clip_range.coli) - 1;
-  height = ROW_TOP_YPIXEL (sheet,sheet->clip_range.rowi)- y+
-    yyy_row_height (sheet, sheet->clip_range.rowi)- 1;
-
-  clip_area.x = COLUMN_LEFT_XPIXEL (sheet, MIN_VISIBLE_COLUMN (sheet));
-  clip_area.y = ROW_TOP_YPIXEL (sheet, MIN_VISIBLE_ROW (sheet));
-  clip_area.width = sheet->sheet_window_width;
-  clip_area.height = sheet->sheet_window_height;
-
-  if (x < 0)
-    {
-      width += x + 1;
-      x =- 1;
-    }
-  if (width > clip_area.width) width = clip_area.width + 10;
-  if (y < 0)
-    {
-      height += y + 1;
-      y =- 1;
-    }
-  if (height > clip_area.height) height = clip_area.height + 10;
-
-  gdk_draw_pixmap (sheet->sheet_window,
-                  GTK_WIDGET (sheet)->style->fg_gc[GTK_STATE_NORMAL],
-                  sheet->pixmap,
-                  x, y,
-                  x, y,
-                  1, height);
-
-  gdk_draw_pixmap (sheet->sheet_window,
-                  GTK_WIDGET (sheet)->style->fg_gc[GTK_STATE_NORMAL],
-                  sheet->pixmap,
-                  x, y,
-                  x, y,
-                  width, 1);
-
-  gdk_draw_pixmap (sheet->sheet_window,
-                  GTK_WIDGET (sheet)->style->fg_gc[GTK_STATE_NORMAL],
-                  sheet->pixmap,
-                  x, y + height,
-                  x, y + height,
-                  width, 1);
-
-  gdk_draw_pixmap (sheet->sheet_window,
-                  GTK_WIDGET (sheet)->style->fg_gc[GTK_STATE_NORMAL],
-                  sheet->pixmap,
-                  x + width, y,
-                  x + width, y,
-                  1, height);
-
-
-  sheet->interval = sheet->interval + 1;
-  if (sheet->interval == TIME_INTERVAL) sheet->interval = 0;
-
-  gdk_gc_set_dashes (sheet->xor_gc, sheet->interval, (gint8*)"\4\4", 2);
-  gtk_sheet_draw_flashing_range (sheet,sheet->clip_range);
-  gdk_gc_set_dashes (sheet->xor_gc, 0, (gint8*)"\4\4", 2);
-
-  GDK_THREADS_LEAVE ();
-
-  return TRUE;
-}
-
-static void
-gtk_sheet_draw_flashing_range (GtkSheet *sheet, GtkSheetRange range)
-{
-  GdkRectangle clip_area;
-  gint x,y,width,height;
-
-  if (!gtk_sheet_range_isvisible (sheet, sheet->clip_range)) return;
-
-  clip_area.x = COLUMN_LEFT_XPIXEL (sheet, MIN_VISIBLE_COLUMN (sheet));
-  clip_area.y = ROW_TOP_YPIXEL (sheet, MIN_VISIBLE_ROW (sheet));
-  clip_area.width = sheet->sheet_window_width;
-  clip_area.height = sheet->sheet_window_height;
-
-  gdk_gc_set_clip_rectangle (sheet->xor_gc, &clip_area);
-
-  x = COLUMN_LEFT_XPIXEL (sheet,sheet->clip_range.col0)+1;
-  y = ROW_TOP_YPIXEL (sheet,sheet->clip_range.row0)+1;
-  width = COLUMN_LEFT_XPIXEL (sheet,sheet->clip_range.coli)- x+
-    xxx_column_width (sheet, sheet->clip_range.coli) - 1;
-  height = ROW_TOP_YPIXEL (sheet,sheet->clip_range.rowi)- y+
-    yyy_row_height (sheet, sheet->clip_range.rowi)- 1;
-
-  if (x < 0)
-    {
-      width += x + 1;
-      x =- 1;
-    }
-  if (width > clip_area.width) width = clip_area.width + 10;
-  if (y < 0)
-    {
-      height += y + 1;
-      y =- 1;
-    }
-  if (height > clip_area.height) height = clip_area.height + 10;
-
-  gdk_gc_set_line_attributes (sheet->xor_gc, 1, 1, 0, 0 );
-
-  gdk_draw_rectangle (sheet->sheet_window, sheet->xor_gc, FALSE,
-                     x, y,
-                     width, height);
-
-  gdk_gc_set_line_attributes (sheet->xor_gc, 1, 0, 0, 0);
-
-  gdk_gc_set_clip_rectangle (sheet->xor_gc, NULL);
-}
 
-static gint
-gtk_sheet_range_isvisible (GtkSheet * sheet,
+static gboolean
+gtk_sheet_range_isvisible (const GtkSheet * sheet,
                           GtkSheetRange range)
 {
   g_return_val_if_fail (sheet != NULL, FALSE);
@@ -2453,7 +2265,7 @@ gtk_sheet_range_isvisible (GtkSheet * sheet,
   return TRUE;
 }
 
-static gint
+static gboolean
 gtk_sheet_cell_isvisible (GtkSheet * sheet,
                          gint row, gint column)
 {
@@ -2516,21 +2328,21 @@ gtk_sheet_set_vadjustment (GtkSheet *sheet,
 
   if (sheet->vadjustment)
     {
-      g_signal_handlers_disconnect_matched (G_OBJECT (sheet->vadjustment),
+      g_signal_handlers_disconnect_matched (sheet->vadjustment,
                                            G_SIGNAL_MATCH_DATA,
                                            0, 0, 0, 0,
                                            sheet);
-      g_object_unref (G_OBJECT (sheet->vadjustment));
+      g_object_unref (sheet->vadjustment);
     }
 
   sheet->vadjustment = adjustment;
 
   if (sheet->vadjustment)
     {
-      g_object_ref (G_OBJECT (sheet->vadjustment));
-      g_object_ref_sink (G_OBJECT (sheet->vadjustment));
+      g_object_ref (sheet->vadjustment);
+      g_object_ref_sink (sheet->vadjustment);
 
-      g_signal_connect (G_OBJECT (sheet->vadjustment), "value_changed",
+      g_signal_connect (sheet->vadjustment, "value_changed",
                        G_CALLBACK (vadjustment_value_changed),
                        sheet);
     }
@@ -2562,21 +2374,21 @@ gtk_sheet_set_hadjustment (GtkSheet *sheet,
 
   if (sheet->hadjustment)
     {
-      g_signal_handlers_disconnect_matched (G_OBJECT (sheet->hadjustment),
+      g_signal_handlers_disconnect_matched (sheet->hadjustment,
                                            G_SIGNAL_MATCH_DATA,
                                            0, 0, 0, 0,
                                            sheet);
-      g_object_unref (G_OBJECT (sheet->hadjustment));
+      g_object_unref (sheet->hadjustment);
     }
 
   sheet->hadjustment = adjustment;
 
   if (sheet->hadjustment)
     {
-      g_object_ref (G_OBJECT (sheet->hadjustment));
-      g_object_ref_sink (G_OBJECT (sheet->hadjustment));
+      g_object_ref (sheet->hadjustment);
+      g_object_ref_sink (sheet->hadjustment);
 
-      g_signal_connect (G_OBJECT (sheet->hadjustment), "value_changed",
+      g_signal_connect (sheet->hadjustment, "value_changed",
                        G_CALLBACK (hadjustment_value_changed),
                        sheet);
     }
@@ -2612,10 +2424,6 @@ gtk_sheet_finalize (GObject * object)
 
   sheet = GTK_SHEET (object);
 
-  /* get rid of all the cells */
-  gtk_sheet_range_clear (sheet, NULL);
-  gtk_sheet_range_delete (sheet, NULL);
-
   if (sheet->name)
     {
       g_free (sheet->name);
@@ -2651,32 +2459,26 @@ gtk_sheet_destroy (GtkObject * object)
       sheet->button = NULL;
     }
 
-  if (sheet->clip_timer)
-    {
-      g_source_remove (sheet->clip_timer);
-      sheet->clip_timer = 0;
-    }
-
   /* unref adjustments */
   if (sheet->hadjustment)
     {
-      g_signal_handlers_disconnect_matched (G_OBJECT (sheet->hadjustment),
+      g_signal_handlers_disconnect_matched (sheet->hadjustment,
                                            G_SIGNAL_MATCH_DATA,
                                            0, 0, 0, 0,
                                            sheet);
 
-      g_object_unref (G_OBJECT (sheet->hadjustment));
+      g_object_unref (sheet->hadjustment);
       sheet->hadjustment = NULL;
     }
 
   if (sheet->vadjustment)
     {
-      g_signal_handlers_disconnect_matched (G_OBJECT (sheet->vadjustment),
+      g_signal_handlers_disconnect_matched (sheet->vadjustment,
                                            G_SIGNAL_MATCH_DATA,
                                            0, 0, 0, 0,
                                            sheet);
 
-      g_object_unref (G_OBJECT (sheet->vadjustment));
+      g_object_unref (sheet->vadjustment);
 
       sheet->vadjustment = NULL;
     }
@@ -2875,6 +2677,8 @@ gtk_sheet_realize (GtkWidget * widget)
 
       gtk_sheet_realize_child (sheet, child);
     }
+
+  gtk_sheet_update_primary_selection (sheet);
 }
 
 static void
@@ -2882,7 +2686,7 @@ create_global_button (GtkSheet *sheet)
 {
   sheet->button = gtk_button_new_with_label (" ");
 
-  g_signal_connect (G_OBJECT (sheet->button),
+  g_signal_connect (sheet->button,
                    "pressed",
                    G_CALLBACK (global_button_clicked),
                    sheet);
@@ -2988,7 +2792,6 @@ gtk_sheet_map (GtkWidget * widget)
        }
 
       if (!GTK_WIDGET_MAPPED (sheet->sheet_entry)
-         && ! gtk_sheet_locked (sheet)
          && sheet->active_cell.row >= 0
          && sheet->active_cell.col >= 0 )
        {
@@ -3105,8 +2908,8 @@ gtk_sheet_cell_draw_default (GtkSheet *sheet, gint row, gint col)
   fg_gc = sheet->fg_gc;
   bg_gc = sheet->bg_gc;
 
-  area.x = COLUMN_LEFT_XPIXEL (sheet,col);
-  area.y = ROW_TOP_YPIXEL (sheet,row);
+  area.x = COLUMN_LEFT_XPIXEL (sheet, col);
+  area.y = ROW_TOP_YPIXEL (sheet, row);
   area.width= xxx_column_width (sheet, col);
   area.height = yyy_row_height (sheet, row);
 
@@ -3136,7 +2939,7 @@ static void
 gtk_sheet_cell_draw_label (GtkSheet *sheet, gint row, gint col)
 {
   GtkWidget *widget;
-  GdkRectangle area, clip_area;
+  GdkRectangle area;
   gint i;
   gint text_width, text_height, y;
   gint xoffset = 0;
@@ -3180,12 +2983,11 @@ gtk_sheet_cell_draw_label (GtkSheet *sheet, gint row, gint col)
   fg_gc = sheet->fg_gc;
   bg_gc = sheet->bg_gc;
 
-  area.x = COLUMN_LEFT_XPIXEL (sheet,col);
-  area.y = ROW_TOP_YPIXEL (sheet,row);
+  area.x = COLUMN_LEFT_XPIXEL (sheet, col);
+  area.y = ROW_TOP_YPIXEL (sheet, row);
   area.width = xxx_column_width (sheet, col);
   area.height = yyy_row_height (sheet, row);
 
-  clip_area = area;
 
   layout = gtk_widget_create_pango_layout (GTK_WIDGET (sheet), label);
   dispose_string (sheet, label);
@@ -3227,7 +3029,6 @@ gtk_sheet_cell_draw_label (GtkSheet *sheet, gint row, gint col)
     case GTK_JUSTIFY_RIGHT:
       size = area.width;
       area.x +=area.width;
-      if (!gtk_sheet_clip_text (sheet))
        {
          for (i = col - 1; i >= MIN_VISIBLE_COLUMN (sheet); i--)
            {
@@ -3248,7 +3049,6 @@ gtk_sheet_cell_draw_label (GtkSheet *sheet, gint row, gint col)
       sizel = area.width / 2;
       sizer = area.width / 2;
       area.x += area.width / 2;
-      if (!gtk_sheet_clip_text (sheet))
        {
          for (i = col + 1; i <= MAX_VISIBLE_COLUMN (sheet); i++)
            {
@@ -3278,7 +3078,6 @@ gtk_sheet_cell_draw_label (GtkSheet *sheet, gint row, gint col)
     case GTK_JUSTIFY_LEFT:
     default:
       size = area.width;
-      if (!gtk_sheet_clip_text (sheet))
        {
          for (i = col + 1; i <= MAX_VISIBLE_COLUMN (sheet); i++)
            {
@@ -3297,8 +3096,7 @@ gtk_sheet_cell_draw_label (GtkSheet *sheet, gint row, gint col)
       break;
     }
 
-  if (!gtk_sheet_clip_text (sheet)) clip_area = area;
-  gdk_gc_set_clip_rectangle (fg_gc, &clip_area);
+  gdk_gc_set_clip_rectangle (fg_gc, &area);
 
 
   gdk_draw_layout (sheet->pixmap, fg_gc,
@@ -3307,7 +3105,7 @@ gtk_sheet_cell_draw_label (GtkSheet *sheet, gint row, gint col)
                   layout);
 
   gdk_gc_set_clip_rectangle (fg_gc, NULL);
-  g_object_unref (G_OBJECT (layout));
+  g_object_unref (layout);
 
   gdk_draw_pixmap (sheet->sheet_window,
                   GTK_WIDGET (sheet)->style->fg_gc[GTK_STATE_NORMAL],
@@ -3324,7 +3122,7 @@ gtk_sheet_cell_draw_label (GtkSheet *sheet, gint row, gint col)
 static void
 gtk_sheet_range_draw (GtkSheet *sheet, const GtkSheetRange *range)
 {
-  gint i,j;
+  gint i, j;
   GtkSheetRange drawing_range;
   GdkRectangle area;
 
@@ -3347,7 +3145,7 @@ gtk_sheet_range_draw (GtkSheet *sheet, const GtkSheetRange *range)
       gdk_draw_rectangle (sheet->pixmap,
                          GTK_WIDGET (sheet)->style->white_gc,
                          TRUE,
-                         0,0,
+                         0, 0,
                          sheet->sheet_window_width,
                          sheet->sheet_window_height);
     }
@@ -3372,7 +3170,7 @@ gtk_sheet_range_draw (GtkSheet *sheet, const GtkSheetRange *range)
       gdk_draw_rectangle (sheet->pixmap,
                          sheet->fg_gc,
                          TRUE,
-                         area.x,area.y,
+                         area.x, area.y,
                          sheet->sheet_window_width - area.x,
                          sheet->sheet_window_height);
 
@@ -3399,7 +3197,7 @@ gtk_sheet_range_draw (GtkSheet *sheet, const GtkSheetRange *range)
       gdk_draw_rectangle (sheet->pixmap,
                          sheet->fg_gc,
                          TRUE,
-                         area.x,area.y,
+                         area.x, area.y,
                          sheet->sheet_window_width,
                          sheet->sheet_window_height - area.y);
 
@@ -3439,7 +3237,7 @@ static void
 gtk_sheet_range_draw_selection (GtkSheet *sheet, GtkSheetRange range)
 {
   GdkRectangle area;
-  gint i,j;
+  gint i, j;
   GtkSheetRange aux;
 
   if (range.col0 > sheet->range.coli || range.coli < sheet->range.col0 ||
@@ -3470,8 +3268,8 @@ gtk_sheet_range_draw_selection (GtkSheet *sheet, GtkSheetRange range)
              xxx_column_is_visible (sheet, j) && yyy_row_is_visible (sheet, i))
            {
 
-             area.x = COLUMN_LEFT_XPIXEL (sheet,j);
-             area.y = ROW_TOP_YPIXEL (sheet,i);
+             area.x = COLUMN_LEFT_XPIXEL (sheet, j);
+             area.y = ROW_TOP_YPIXEL (sheet, i);
              area.width= xxx_column_width (sheet, j);
              area.height = yyy_row_height (sheet, i);
 
@@ -3493,8 +3291,8 @@ gtk_sheet_range_draw_selection (GtkSheet *sheet, GtkSheetRange range)
                  gdk_draw_rectangle (sheet->sheet_window,
                                      sheet->xor_gc,
                                      TRUE,
-                                     area.x + 1,area.y + 1,
-                                     area.width,area.height);
+                                     area.x + 1, area.y + 1,
+                                     area.width, area.height);
                }
            }
 
@@ -3507,11 +3305,11 @@ gtk_sheet_range_draw_selection (GtkSheet *sheet, GtkSheetRange range)
 static void
 gtk_sheet_draw_backing_pixmap (GtkSheet *sheet, GtkSheetRange range)
 {
-  gint x,y,width,height;
+  gint x, y, width, height;
 
   if (!GTK_WIDGET_REALIZED (GTK_WIDGET (sheet))) return;
 
-  x = COLUMN_LEFT_XPIXEL (sheet,range.col0);
+  x = COLUMN_LEFT_XPIXEL (sheet, range.col0);
   y = ROW_TOP_YPIXEL (sheet, range.row0);
   width = COLUMN_LEFT_XPIXEL (sheet, range.coli) - x +
     xxx_column_width (sheet, range.coli);
@@ -3649,7 +3447,7 @@ gtk_sheet_set_cell (GtkSheet *sheet, gint row, gint col,
     }
 
   if ( changed )
-    g_signal_emit (G_OBJECT (sheet), sheet_signals[CHANGED], 0, row, col);
+    g_signal_emit (sheet, sheet_signals[CHANGED], 0, row, col);
 
 }
 
@@ -3671,30 +3469,7 @@ gtk_sheet_cell_clear (GtkSheet *sheet, gint row, gint column)
   range.col0 = MIN_VISIBLE_COLUMN (sheet);
   range.coli = MAX_VISIBLE_COLUMN (sheet);
 
-  gtk_sheet_real_cell_clear (sheet, row, column, FALSE);
-
-  if (!GTK_SHEET_IS_FROZEN (sheet))
-    {
-      gtk_sheet_range_draw (sheet, &range);
-    }
-}
-
-void
-gtk_sheet_cell_delete (GtkSheet *sheet, gint row, gint column)
-{
-  GtkSheetRange range;
-
-  g_return_if_fail (sheet != NULL);
-  g_return_if_fail (GTK_IS_SHEET (sheet));
-  if (column >= xxx_column_count (sheet) || row >= yyy_row_count (sheet)) return;
-  if (column < 0 || row < 0) return;
-
-  range.row0 = row;
-  range.rowi = row;
-  range.col0 = MIN_VISIBLE_COLUMN (sheet);
-  range.coli = MAX_VISIBLE_COLUMN (sheet);
-
-  gtk_sheet_real_cell_clear (sheet, row, column, TRUE);
+  gtk_sheet_real_cell_clear (sheet, row, column);
 
   if (!GTK_SHEET_IS_FROZEN (sheet))
     {
@@ -3703,7 +3478,7 @@ gtk_sheet_cell_delete (GtkSheet *sheet, gint row, gint column)
 }
 
 static void
-gtk_sheet_real_cell_clear (GtkSheet *sheet, gint row, gint column, gboolean delete)
+gtk_sheet_real_cell_clear (GtkSheet *sheet, gint row, gint column)
 {
   GSheetModel *model = gtk_sheet_get_model (sheet);
 
@@ -3713,8 +3488,8 @@ gtk_sheet_real_cell_clear (GtkSheet *sheet, gint row, gint column, gboolean dele
     {
       g_sheet_model_datum_clear (model, row, column);
 
-      if (GTK_IS_OBJECT (sheet) && G_OBJECT (sheet)->ref_count > 0)
-       g_signal_emit (G_OBJECT (sheet), sheet_signals[CLEAR_CELL], 0,
+      if (G_OBJECT (sheet)->ref_count > 0)
+       g_signal_emit (sheet, sheet_signals[CLEAR_CELL], 0,
                       row, column);
     }
 
@@ -3727,22 +3502,11 @@ gtk_sheet_range_clear (GtkSheet *sheet, const GtkSheetRange *range)
   g_return_if_fail (sheet != NULL);
   g_return_if_fail (GTK_IS_SHEET (sheet));
 
-  gtk_sheet_real_range_clear (sheet, range, FALSE);
-}
-
-void
-gtk_sheet_range_delete (GtkSheet *sheet, const GtkSheetRange *range)
-{
-  g_return_if_fail (sheet != NULL);
-  g_return_if_fail (GTK_IS_SHEET (sheet));
-
-  gtk_sheet_real_range_clear (sheet, range, TRUE);
+  gtk_sheet_real_range_clear (sheet, range);
 }
 
-
 static void
-gtk_sheet_real_range_clear (GtkSheet *sheet, const GtkSheetRange *range,
-                           gboolean delete)
+gtk_sheet_real_range_clear (GtkSheet *sheet, const GtkSheetRange *range)
 {
   gint i, j;
   GtkSheetRange clear;
@@ -3765,7 +3529,7 @@ gtk_sheet_real_range_clear (GtkSheet *sheet, const GtkSheetRange *range,
   for (i = clear.row0; i <= clear.rowi; i++)
     for (j = clear.col0; j <= clear.coli; j++)
       {
-       gtk_sheet_real_cell_clear (sheet, i, j, delete);
+       gtk_sheet_real_cell_clear (sheet, i, j);
       }
 
   gtk_sheet_range_draw (sheet, NULL);
@@ -3968,7 +3732,7 @@ static void
 gtk_sheet_entry_changed (GtkWidget *widget, gpointer data)
 {
   GtkSheet *sheet;
-  gint row,col;
+  gint row, col;
   const char *text;
   GtkJustification justification;
   GtkSheetCellAttr attributes;
@@ -3986,8 +3750,8 @@ gtk_sheet_entry_changed (GtkWidget *widget, gpointer data)
 
   if (row < 0 || col < 0) return;
 
-  sheet->active_cell.row =1;
-  sheet->active_cell.col =1;
+  sheet->active_cell.row = -1;
+  sheet->active_cell.col = -1;
 
   text = gtk_entry_get_text (GTK_ENTRY (gtk_sheet_get_entry (sheet)));
 
@@ -4019,7 +3783,7 @@ gtk_sheet_deactivate_cell (GtkSheet *sheet)
   if (!GTK_WIDGET_REALIZED (GTK_WIDGET (sheet))) return FALSE;
   if (sheet->state != GTK_SHEET_NORMAL) return FALSE;
 
-  _gtkextra_signal_emit (GTK_OBJECT (sheet),sheet_signals[DEACTIVATE],
+  _gtkextra_signal_emit (GTK_OBJECT (sheet), sheet_signals[DEACTIVATE],
                         sheet->active_cell.row,
                         sheet->active_cell.col, &veto);
 
@@ -4028,7 +3792,7 @@ gtk_sheet_deactivate_cell (GtkSheet *sheet)
   if ( sheet->active_cell.row == -1 || sheet->active_cell.col == -1 )
     return TRUE;
 
-  g_signal_handlers_disconnect_by_func (G_OBJECT (gtk_sheet_get_entry (sheet)),
+  g_signal_handlers_disconnect_by_func (gtk_sheet_get_entry (sheet),
                                        G_CALLBACK (gtk_sheet_entry_changed),
                                        sheet);
 
@@ -4049,7 +3813,7 @@ static void
 gtk_sheet_hide_active_cell (GtkSheet *sheet)
 {
   const char *text;
-  gint row,col;
+  gint row, col;
   GtkJustification justification;
   GtkSheetCellAttr attributes;
 
@@ -4068,16 +3832,6 @@ gtk_sheet_hide_active_cell (GtkSheet *sheet)
   gtk_sheet_get_attributes (sheet, row, col, &attributes);
   justification = attributes.justification;
 
-  if (text && strlen (text) != 0)
-    {
-      gtk_sheet_set_cell (sheet, row, col, justification, text);
-      g_signal_emit (G_OBJECT (sheet),sheet_signals[SET_CELL], 0, row, col);
-    }
-  else
-    {
-      gtk_sheet_cell_clear (sheet, row, col);
-    }
-
   row = sheet->active_cell.row;
   col = sheet->active_cell.col;
 
@@ -4088,10 +3842,10 @@ gtk_sheet_hide_active_cell (GtkSheet *sheet)
     gdk_draw_pixmap (sheet->sheet_window,
                     GTK_WIDGET (sheet)->style->fg_gc[GTK_STATE_NORMAL],
                     sheet->pixmap,
-                    COLUMN_LEFT_XPIXEL (sheet,col)- 1,
-                    ROW_TOP_YPIXEL (sheet,row)- 1,
-                    COLUMN_LEFT_XPIXEL (sheet,col)- 1,
-                    ROW_TOP_YPIXEL (sheet,row)- 1,
+                    COLUMN_LEFT_XPIXEL (sheet, col)- 1,
+                    ROW_TOP_YPIXEL (sheet, row)- 1,
+                    COLUMN_LEFT_XPIXEL (sheet, col)- 1,
+                    ROW_TOP_YPIXEL (sheet, row)- 1,
                     xxx_column_width (sheet, col) + 4,
                     yyy_row_height (sheet, row)+4);
 
@@ -4110,12 +3864,9 @@ gtk_sheet_activate_cell (GtkSheet *sheet, gint row, gint col)
   g_return_val_if_fail (GTK_IS_SHEET (sheet), FALSE);
 
   if (row < 0 || col < 0) return FALSE;
-  if (row >= yyy_row_count (sheet) || col >= xxx_column_count (sheet))
-    return FALSE;
 
-  /* _gtkextra_signal_emit (GTK_OBJECT (sheet),sheet_signals[ACTIVATE], row, col, &veto);
-     if (!GTK_WIDGET_REALIZED (GTK_WIDGET (sheet))) return veto;
-  */
+  if ( row > yyy_row_count (sheet) || col > xxx_column_count (sheet))
+    return FALSE;
 
   if (!veto) return FALSE;
   if (sheet->state != GTK_SHEET_NORMAL)
@@ -4137,13 +3888,12 @@ gtk_sheet_activate_cell (GtkSheet *sheet, gint row, gint col)
 
   gtk_sheet_show_active_cell (sheet);
 
-
-  g_signal_connect (G_OBJECT (gtk_sheet_get_entry (sheet)),
+  g_signal_connect (gtk_sheet_get_entry (sheet),
                    "changed",
                    G_CALLBACK (gtk_sheet_entry_changed),
                    sheet);
 
-  _gtkextra_signal_emit (GTK_OBJECT (sheet),sheet_signals[ACTIVATE], row, col, &veto);
+  _gtkextra_signal_emit (GTK_OBJECT (sheet), sheet_signals [ACTIVATE], row, col, &veto);
 
   return TRUE;
 }
@@ -4189,10 +3939,6 @@ gtk_sheet_show_active_cell (GtkSheet *sheet)
 
   gtk_entry_set_visibility (GTK_ENTRY (sheet_entry), attributes.is_visible);
 
-  if (gtk_sheet_locked (sheet) || !attributes.is_editable)
-    gtk_editable_set_editable (GTK_EDITABLE (sheet_entry), FALSE);
-  else
-    gtk_editable_set_editable (GTK_EDITABLE (sheet_entry), TRUE);
 
   /*** Added by John Gotts. Mar 25, 2005 *********/
   old_text = gtk_entry_get_text (GTK_ENTRY (sheet_entry));
@@ -4218,6 +3964,7 @@ static void
 gtk_sheet_draw_active_cell (GtkSheet *sheet)
 {
   gint row, col;
+  GtkSheetRange range;
 
   if (!GTK_WIDGET_DRAWABLE (GTK_WIDGET (sheet))) return;
   if (!GTK_WIDGET_REALIZED (GTK_WIDGET (sheet))) return;
@@ -4229,7 +3976,10 @@ gtk_sheet_draw_active_cell (GtkSheet *sheet)
 
   if (!gtk_sheet_cell_isvisible (sheet, row, col)) return;
 
-  gtk_sheet_draw_border (sheet, sheet->range);
+  range.col0 = range.coli = col;
+  range.row0 = range.rowi = row;
+
+  gtk_sheet_draw_border (sheet, range);
 }
 
 
@@ -4273,9 +4023,9 @@ gtk_sheet_make_backing_pixmap (GtkSheet *sheet, guint width, guint height)
 static void
 gtk_sheet_new_selection (GtkSheet *sheet, GtkSheetRange *range)
 {
-  gint i,j, mask1, mask2;
+  gint i, j, mask1, mask2;
   gint state, selected;
-  gint x,y,width,height;
+  gint x, y, width, height;
   GtkSheetRange new_range, aux_range;
 
   g_return_if_fail (sheet != NULL);
@@ -4328,7 +4078,7 @@ gtk_sheet_new_selection (GtkSheet *sheet, GtkSheetRange *range)
 
              if (mask1 != mask2)
                {
-                 x = COLUMN_LEFT_XPIXEL (sheet,j);
+                 x = COLUMN_LEFT_XPIXEL (sheet, j);
                  y = ROW_TOP_YPIXEL (sheet, i);
                  width = COLUMN_LEFT_XPIXEL (sheet, j)- x+
                    xxx_column_width (sheet, j);
@@ -4359,7 +4109,7 @@ gtk_sheet_new_selection (GtkSheet *sheet, GtkSheetRange *range)
 
                  if (i != sheet->active_cell.row || j != sheet->active_cell.col)
                    {
-                     x = COLUMN_LEFT_XPIXEL (sheet,j);
+                     x = COLUMN_LEFT_XPIXEL (sheet, j);
                      y = ROW_TOP_YPIXEL (sheet, i);
                      width = COLUMN_LEFT_XPIXEL (sheet, j)- x+
                        xxx_column_width (sheet, j);
@@ -4382,8 +4132,8 @@ gtk_sheet_new_selection (GtkSheet *sheet, GtkSheetRange *range)
                      gdk_draw_rectangle (sheet->sheet_window,
                                          sheet->xor_gc,
                                          TRUE,
-                                         x + 1,y + 1,
-                                         width,height);
+                                         x + 1, y + 1,
+                                         width, height);
                    }
                }
            }
@@ -4403,7 +4153,7 @@ gtk_sheet_new_selection (GtkSheet *sheet, GtkSheetRange *range)
              xxx_column_is_visible (sheet, j) && yyy_row_is_visible (sheet, i))
            {
 
-             x = COLUMN_LEFT_XPIXEL (sheet,j);
+             x = COLUMN_LEFT_XPIXEL (sheet, j);
              y = ROW_TOP_YPIXEL (sheet, i);
              width = COLUMN_LEFT_XPIXEL (sheet, j)- x+ xxx_column_width (sheet, j);
              height = ROW_TOP_YPIXEL (sheet, i)- y + yyy_row_height (sheet, i);
@@ -4448,7 +4198,7 @@ gtk_sheet_new_selection (GtkSheet *sheet, GtkSheetRange *range)
              (i != sheet->active_cell.row || j != sheet->active_cell.col))
            {
 
-             x = COLUMN_LEFT_XPIXEL (sheet,j);
+             x = COLUMN_LEFT_XPIXEL (sheet, j);
              y = ROW_TOP_YPIXEL (sheet, i);
              width = COLUMN_LEFT_XPIXEL (sheet, j)- x+ xxx_column_width (sheet, j);
              height = ROW_TOP_YPIXEL (sheet, i)- y + yyy_row_height (sheet, i);
@@ -4469,8 +4219,8 @@ gtk_sheet_new_selection (GtkSheet *sheet, GtkSheetRange *range)
              gdk_draw_rectangle (sheet->sheet_window,
                                  sheet->xor_gc,
                                  TRUE,
-                                 x + 1,y + 1,
-                                 width,height);
+                                 x + 1, y + 1,
+                                 width, height);
 
            }
 
@@ -4498,7 +4248,7 @@ gtk_sheet_new_selection (GtkSheet *sheet, GtkSheetRange *range)
              mask2 = j == new_range.coli ? mask2 + 8 : mask2;
              if (mask2 != mask1 || (mask2 == mask1 && state != GTK_STATE_SELECTED))
                {
-                 x = COLUMN_LEFT_XPIXEL (sheet,j);
+                 x = COLUMN_LEFT_XPIXEL (sheet, j);
                  y = ROW_TOP_YPIXEL (sheet, i);
                  width = xxx_column_width (sheet, j);
                  height = yyy_row_height (sheet, i);
@@ -4506,31 +4256,31 @@ gtk_sheet_new_selection (GtkSheet *sheet, GtkSheetRange *range)
                    gdk_draw_rectangle (sheet->sheet_window,
                                        sheet->xor_gc,
                                        TRUE,
-                                       x + 1,y - 1,
-                                       width,3);
+                                       x + 1, y - 1,
+                                       width, 3);
 
 
                  if (mask2 & 2)
                    gdk_draw_rectangle (sheet->sheet_window,
                                        sheet->xor_gc,
                                        TRUE,
-                                       x + 1,y + height - 1,
-                                       width,3);
+                                       x + 1, y + height - 1,
+                                       width, 3);
 
                  if (mask2 & 4)
                    gdk_draw_rectangle (sheet->sheet_window,
                                        sheet->xor_gc,
                                        TRUE,
-                                       x - 1,y + 1,
-                                       3,height);
+                                       x - 1, y + 1,
+                                       3, height);
 
 
                  if (mask2 & 8)
                    gdk_draw_rectangle (sheet->sheet_window,
                                        sheet->xor_gc,
                                        TRUE,
-                                       x + width - 1,y + 1,
-                                       3,height);
+                                       x + width - 1, y + 1,
+                                       3, height);
 
 
 
@@ -4557,8 +4307,8 @@ gtk_sheet_draw_border (GtkSheet *sheet, GtkSheetRange new_range)
 
   widget = GTK_WIDGET (sheet);
 
-  x = COLUMN_LEFT_XPIXEL (sheet,new_range.col0);
-  y = ROW_TOP_YPIXEL (sheet,new_range.row0);
+  x = COLUMN_LEFT_XPIXEL (sheet, new_range.col0);
+  y = ROW_TOP_YPIXEL (sheet, new_range.row0);
   width = COLUMN_LEFT_XPIXEL (sheet, new_range.coli) - x +
     xxx_column_width (sheet, new_range.coli);
 
@@ -4585,7 +4335,7 @@ gtk_sheet_draw_border (GtkSheet *sheet, GtkSheetRange new_range)
 
   gdk_gc_set_clip_rectangle (sheet->xor_gc, &area);
 
-  for (i =1; i <= 1; ++i)
+  for (i = -1; i <= 1; ++i)
     gdk_draw_rectangle (sheet->sheet_window,
                        sheet->xor_gc,
                        FALSE,
@@ -4603,13 +4353,13 @@ gtk_sheet_draw_border (GtkSheet *sheet, GtkSheetRange new_range)
 static void
 gtk_sheet_draw_corners (GtkSheet *sheet, GtkSheetRange range)
 {
-  gint x,y;
+  gint x, y;
   guint width = 1;
 
   if (gtk_sheet_cell_isvisible (sheet, range.row0, range.col0))
     {
-      x = COLUMN_LEFT_XPIXEL (sheet,range.col0);
-      y = ROW_TOP_YPIXEL (sheet,range.row0);
+      x = COLUMN_LEFT_XPIXEL (sheet, range.col0);
+      y = ROW_TOP_YPIXEL (sheet, range.row0);
       gdk_draw_pixmap (sheet->sheet_window,
                       GTK_WIDGET (sheet)->style->fg_gc[GTK_STATE_NORMAL],
                       sheet->pixmap,
@@ -4622,16 +4372,16 @@ gtk_sheet_draw_corners (GtkSheet *sheet, GtkSheetRange range)
       gdk_draw_rectangle (sheet->sheet_window,
                          sheet->xor_gc,
                          TRUE,
-                         x - 1,y - 1,
-                         3,3);
+                         x - 1, y - 1,
+                         3, 3);
     }
 
   if (gtk_sheet_cell_isvisible (sheet, range.row0, range.coli) ||
       sheet->state == GTK_SHEET_COLUMN_SELECTED)
     {
-      x = COLUMN_LEFT_XPIXEL (sheet,range.coli)+
+      x = COLUMN_LEFT_XPIXEL (sheet, range.coli)+
        xxx_column_width (sheet, range.coli);
-      y = ROW_TOP_YPIXEL (sheet,range.row0);
+      y = ROW_TOP_YPIXEL (sheet, range.row0);
       width = 1;
       if (sheet->state == GTK_SHEET_COLUMN_SELECTED)
        {
@@ -4650,15 +4400,15 @@ gtk_sheet_draw_corners (GtkSheet *sheet, GtkSheetRange range)
       gdk_draw_rectangle (sheet->sheet_window,
                          sheet->xor_gc,
                          TRUE,
-                         x - width + width / 2,y - width + width / 2,
-                         2 + width,2 + width);
+                         x - width + width / 2, y - width + width / 2,
+                         2 + width, 2 + width);
     }
 
   if (gtk_sheet_cell_isvisible (sheet, range.rowi, range.col0) ||
       sheet->state == GTK_SHEET_ROW_SELECTED)
     {
-      x = COLUMN_LEFT_XPIXEL (sheet,range.col0);
-      y = ROW_TOP_YPIXEL (sheet,range.rowi)+
+      x = COLUMN_LEFT_XPIXEL (sheet, range.col0);
+      y = ROW_TOP_YPIXEL (sheet, range.rowi)+
        yyy_row_height (sheet, range.rowi);
       width = 1;
       if (sheet->state == GTK_SHEET_ROW_SELECTED)
@@ -4678,15 +4428,15 @@ gtk_sheet_draw_corners (GtkSheet *sheet, GtkSheetRange range)
       gdk_draw_rectangle (sheet->sheet_window,
                          sheet->xor_gc,
                          TRUE,
-                         x - width + width / 2,y - width + width / 2,
-                         2 + width,2 + width);
+                         x - width + width / 2, y - width + width / 2,
+                         2 + width, 2 + width);
     }
 
   if (gtk_sheet_cell_isvisible (sheet, range.rowi, range.coli))
     {
-      x = COLUMN_LEFT_XPIXEL (sheet,range.coli)+
+      x = COLUMN_LEFT_XPIXEL (sheet, range.coli)+
        xxx_column_width (sheet, range.coli);
-      y = ROW_TOP_YPIXEL (sheet,range.rowi)+
+      y = ROW_TOP_YPIXEL (sheet, range.rowi)+
        yyy_row_height (sheet, range.rowi);
       width = 1;
       if (sheet->state == GTK_SHEET_RANGE_SELECTED) width = 3;
@@ -4703,8 +4453,8 @@ gtk_sheet_draw_corners (GtkSheet *sheet, GtkSheetRange range)
       gdk_draw_rectangle (sheet->sheet_window,
                          sheet->xor_gc,
                          TRUE,
-                         x - width + width / 2,y - width + width / 2,
-                         2 + width,2 + width);
+                         x - width + width / 2, y - width + width / 2,
+                         2 + width, 2 + width);
 
     }
 
@@ -4739,7 +4489,9 @@ gtk_sheet_real_select_range (GtkSheet * sheet,
       gtk_sheet_range_draw_selection (sheet, sheet->range);
     }
 
-  g_signal_emit (G_OBJECT (sheet), sheet_signals[SELECT_RANGE], 0, &sheet->range);
+  gtk_sheet_update_primary_selection (sheet);
+
+  g_signal_emit (sheet, sheet_signals[SELECT_RANGE], 0, &sheet->range);
 }
 
 
@@ -4763,8 +4515,6 @@ gtk_sheet_select_range (GtkSheet * sheet, const GtkSheetRange *range)
   if (range->col0 < 0 || range->coli < 0) return;
 
 
-  if ( gtk_sheet_locked (sheet)) return ;
-
   if (sheet->state != GTK_SHEET_NORMAL)
     gtk_sheet_real_unselect_range (sheet, NULL);
   else
@@ -4793,6 +4543,7 @@ gtk_sheet_unselect_range (GtkSheet * sheet)
 {
   gtk_sheet_real_unselect_range (sheet, NULL);
   sheet->state = GTK_STATE_NORMAL;
+
   gtk_sheet_activate_cell (sheet,
                           sheet->active_cell.row, sheet->active_cell.col);
 }
@@ -4811,6 +4562,9 @@ gtk_sheet_real_unselect_range (GtkSheet * sheet,
   if (range->row0 < 0 || range->rowi < 0) return;
   if (range->col0 < 0 || range->coli < 0) return;
 
+  g_signal_emit (sheet, sheet_signals[SELECT_COLUMN], 0, -1);
+  g_signal_emit (sheet, sheet_signals[SELECT_ROW], 0, -1);
+
   if (gtk_sheet_range_isvisible (sheet, *range))
     gtk_sheet_draw_backing_pixmap (sheet, *range);
 
@@ -4914,21 +4668,37 @@ gtk_sheet_button_press (GtkWidget * widget,
 
   sheet = GTK_SHEET (widget);
 
-  if ( event->type == GDK_2BUTTON_PRESS)
+  /* Cancel any pending tooltips */
+  if (sheet->motion_timer)
     {
-      gtk_widget_get_pointer (widget, &x, &y);
-      gtk_sheet_get_pixel_info (sheet, x, y, &row, &column);
+      g_source_remove (sheet->motion_timer);
+      sheet->motion_timer = 0;
+    }
 
-      if (event->window == sheet->column_title_window)
-       {
-         g_signal_emit (G_OBJECT (sheet),
-                        sheet_signals[DOUBLE_CLICK_COLUMN], 0, column);
-       }
-      else if (event->window == sheet->row_title_window)
-       {
-         g_signal_emit (G_OBJECT (sheet),
-                        sheet_signals[DOUBLE_CLICK_ROW], 0, row);
-       }
+  gtk_widget_get_pointer (widget, &x, &y);
+  gtk_sheet_get_pixel_info (sheet, x, y, &row, &column);
+
+
+  if (event->window == sheet->column_title_window)
+    {
+      g_signal_emit (sheet,
+                    sheet_signals[BUTTON_EVENT_COLUMN], 0,
+                    column, event);
+
+      if ( event->type == GDK_2BUTTON_PRESS && event->button == 1)
+       g_signal_emit (sheet,
+                      sheet_signals[DOUBLE_CLICK_COLUMN], 0, column);
+
+    }
+  else if (event->window == sheet->row_title_window)
+    {
+      g_signal_emit (sheet,
+                    sheet_signals[BUTTON_EVENT_ROW], 0,
+                    row, event);
+
+      if ( event->type == GDK_2BUTTON_PRESS && event->button == 1)
+       g_signal_emit (sheet,
+                      sheet_signals[DOUBLE_CLICK_ROW], 0, row);
     }
 
 
@@ -5034,7 +4804,6 @@ gtk_sheet_button_press (GtkWidget * widget,
       else if (sheet->cursor_drag->type == GDK_TOP_LEFT_ARROW &&
               !GTK_SHEET_IN_SELECTION (sheet)
               && ! GTK_SHEET_IN_DRAG (sheet)
-              && ! gtk_sheet_locked (sheet)
               && sheet->active_cell.row >= 0
               && sheet->active_cell.col >= 0
               )
@@ -5099,38 +4868,6 @@ gtk_sheet_button_press (GtkWidget * widget,
   return TRUE;
 }
 
-#if 0
-static gint
-gtk_sheet_scroll (gpointer data)
-{
-  GtkSheet *sheet;
-  gint x,y,row,column;
-  gint move;
-
-  sheet = GTK_SHEET (data);
-
-  GDK_THREADS_ENTER ();
-
-  gtk_widget_get_pointer (GTK_WIDGET (sheet), &x, &y);
-  gtk_sheet_get_pixel_info (sheet, x, y, &row, &column);
-
-  move = TRUE;
-
-  if (GTK_SHEET_IN_SELECTION (sheet))
-    gtk_sheet_extend_selection (sheet, row, column);
-
-  if (GTK_SHEET_IN_DRAG (sheet) || GTK_SHEET_IN_RESIZE (sheet))
-    {
-      move = gtk_sheet_move_query (sheet, row, column);
-      if (move) draw_xor_rectangle (sheet, sheet->drag_range);
-    }
-
-  GDK_THREADS_LEAVE ();
-
-  return TRUE;
-}
-#endif
-
 static void
 gtk_sheet_click_cell (GtkSheet *sheet, gint row, gint column, gboolean *veto)
 {
@@ -5179,7 +4916,7 @@ gtk_sheet_click_cell (GtkSheet *sheet, gint row, gint column, gboolean *veto)
       return;
     }
 
-  if (row == - 1 && column == - 1)
+  if (row == -1 && column == -1)
     {
       sheet->range.row0 = 0;
       sheet->range.col0 = 0;
@@ -5205,6 +4942,7 @@ gtk_sheet_click_cell (GtkSheet *sheet, gint row, gint column, gboolean *veto)
              *veto = FALSE;
              return;
            }
+         gtk_sheet_activate_cell (sheet, row, column);
        }
 
       if (gtk_sheet_autoscroll (sheet))
@@ -5233,7 +4971,7 @@ gtk_sheet_button_release (GtkWidget * widget,
                          GdkEventButton * event)
 {
   GtkSheet *sheet;
-  gint x,y;
+  gint x, y;
 
   sheet = GTK_SHEET (widget);
 
@@ -5249,7 +4987,7 @@ gtk_sheet_button_release (GtkWidget * widget,
       gtk_sheet_set_column_width (sheet, sheet->drag_cell.col,
                                  new_column_width (sheet, sheet->drag_cell.col, &x));
       sheet->old_hadjustment = -1.;
-      g_signal_emit_by_name (G_OBJECT (sheet->hadjustment), "value_changed");
+      g_signal_emit_by_name (sheet->hadjustment, "value_changed");
       return TRUE;
     }
 
@@ -5263,7 +5001,7 @@ gtk_sheet_button_release (GtkWidget * widget,
 
       gtk_sheet_set_row_height (sheet, sheet->drag_cell.row, new_row_height (sheet, sheet->drag_cell.row, &y));
       sheet->old_vadjustment = -1.;
-      g_signal_emit_by_name (G_OBJECT (sheet->vadjustment), "value_changed");
+      g_signal_emit_by_name (sheet->vadjustment, "value_changed");
       return TRUE;
     }
 
@@ -5288,7 +5026,7 @@ gtk_sheet_button_release (GtkWidget * widget,
       old_range = sheet->range;
       sheet->range = sheet->drag_range;
       sheet->drag_range = old_range;
-      g_signal_emit (G_OBJECT (sheet), sheet_signals[MOVE_RANGE], 0,
+      g_signal_emit (sheet, sheet_signals[MOVE_RANGE], 0,
                     &sheet->drag_range, &sheet->range);
       gtk_sheet_select_range (sheet, &sheet->range);
     }
@@ -5319,7 +5057,7 @@ gtk_sheet_button_release (GtkWidget * widget,
       sheet->drag_range = old_range;
 
       if (sheet->state == GTK_STATE_NORMAL) sheet->state = GTK_SHEET_RANGE_SELECTED;
-      g_signal_emit (G_OBJECT (sheet), sheet_signals[RESIZE_RANGE], 0,
+      g_signal_emit (sheet, sheet_signals[RESIZE_RANGE], 0,
                     &sheet->drag_range, &sheet->range);
       gtk_sheet_select_range (sheet, &sheet->range);
     }
@@ -5457,39 +5195,36 @@ static gboolean
 motion_timeout_callback (gpointer data)
 {
   GtkSheet *sheet = GTK_SHEET (data);
-  if ( --sheet->motion_events == 0 )
+  gint x, y;
+  gint row, column;
+  gtk_widget_get_pointer (GTK_WIDGET (sheet), &x, &y);
+
+  if ( gtk_sheet_get_pixel_info (sheet, x, y, &row, &column) )
     {
-      gint x, y;
-      gint row, column;
-      gtk_widget_get_pointer (GTK_WIDGET (sheet), &x, &y);
+      if ( column == -1 && row == -1 )
+       return FALSE;
 
-      if ( gtk_sheet_get_pixel_info (sheet, x, y, &row, &column) )
+      if ( column == -1)
        {
-         if ( column == -1 && row == -1 )
-           return FALSE;
+         GSheetRow *row_geo = sheet->row_geometry;
+         gchar *text;
 
-         if ( column == -1)
-           {
-             GSheetRow *row_geo = sheet->row_geometry;
-             gchar *text;
-
-             text = g_sheet_row_get_subtitle (row_geo, row);
+         text = g_sheet_row_get_subtitle (row_geo, row);
 
-             show_subtitle (sheet, row, column, text);
-             g_free (text);
-           }
+         show_subtitle (sheet, row, column, text);
+         g_free (text);
+       }
 
-         if ( row == -1)
-           {
-             GSheetColumn *col_geo = sheet->column_geometry;
-             gchar *text;
+      if ( row == -1)
+       {
+         GSheetColumn *col_geo = sheet->column_geometry;
+         gchar *text;
 
-             text = g_sheet_column_get_subtitle (col_geo, column);
+         text = g_sheet_column_get_subtitle (col_geo, column);
 
-             show_subtitle (sheet, row, column, text );
+         show_subtitle (sheet, row, column, text );
 
-             g_free (text);
-           }
+         g_free (text);
        }
     }
 
@@ -5518,8 +5253,9 @@ gtk_sheet_motion (GtkWidget * widget,
 
   if (!sheet->hover_window || ! GTK_WIDGET_VISIBLE (sheet->hover_window->window))
     {
-      sheet->motion_events++;
-      g_timeout_add (TIMEOUT_HOVER, motion_timeout_callback, sheet);
+      if ( sheet->motion_timer > 0 )
+       g_source_remove (sheet->motion_timer);
+      sheet->motion_timer = g_timeout_add (TIMEOUT_HOVER, motion_timeout_callback, sheet);
     }
   else
     {
@@ -5570,7 +5306,7 @@ gtk_sheet_motion (GtkWidget * widget,
       gtk_sheet_rows_resizable (sheet))
     {
       gtk_widget_get_pointer (widget, &x, &y);
-      if (!GTK_SHEET_IN_SELECTION (sheet) && POSSIBLE_YDRAG (sheet,y, &column))
+      if (!GTK_SHEET_IN_SELECTION (sheet) && POSSIBLE_YDRAG (sheet, y, &column))
        {
          new_cursor = GDK_SB_V_DOUBLE_ARROW;
          if (new_cursor != sheet->cursor_drag->type)
@@ -5608,13 +5344,13 @@ gtk_sheet_motion (GtkWidget * widget,
 
   new_cursor = GDK_TOP_LEFT_ARROW;
   if ( event->window == sheet->sheet_window &&
-       ! (POSSIBLE_RESIZE (sheet,x,y,&row,&column) || GTK_SHEET_IN_RESIZE (sheet)) && (POSSIBLE_DRAG (sheet, x,y,&row,&column) || GTK_SHEET_IN_DRAG (sheet)) &&
+       ! (POSSIBLE_RESIZE (sheet, x, y, &row, &column) || GTK_SHEET_IN_RESIZE (sheet)) && (POSSIBLE_DRAG (sheet, x, y, &row, &column) || GTK_SHEET_IN_DRAG (sheet)) &&
 
        new_cursor != sheet->cursor_drag->type)
     {
       gdk_cursor_destroy (sheet->cursor_drag);
       sheet->cursor_drag = gdk_cursor_new (GDK_TOP_LEFT_ARROW);
-      gdk_window_set_cursor (sheet->sheet_window,sheet->cursor_drag);
+      gdk_window_set_cursor (sheet->sheet_window, sheet->cursor_drag);
     }
 
   new_cursor = GDK_SIZING;
@@ -5627,7 +5363,7 @@ gtk_sheet_motion (GtkWidget * widget,
     {
       gdk_cursor_destroy (sheet->cursor_drag);
       sheet->cursor_drag = gdk_cursor_new (GDK_SIZING);
-      gdk_window_set_cursor (sheet->sheet_window,sheet->cursor_drag);
+      gdk_window_set_cursor (sheet->sheet_window, sheet->cursor_drag);
     }
 
 
@@ -5671,8 +5407,8 @@ gtk_sheet_motion (GtkWidget * widget,
   if (GTK_SHEET_IN_DRAG (sheet))
     {
       GtkSheetRange aux;
-      column = COLUMN_FROM_XPIXEL (sheet,x)- sheet->drag_cell.col;
-      row = ROW_FROM_YPIXEL (sheet,y)- sheet->drag_cell.row;
+      column = COLUMN_FROM_XPIXEL (sheet, x)- sheet->drag_cell.col;
+      row = ROW_FROM_YPIXEL (sheet, y)- sheet->drag_cell.row;
       if (sheet->state == GTK_SHEET_COLUMN_SELECTED) row = 0;
       if (sheet->state == GTK_SHEET_ROW_SELECTED) column = 0;
       sheet->x_drag = x;
@@ -5702,18 +5438,18 @@ gtk_sheet_motion (GtkWidget * widget,
       gint v_h, current_col, current_row, col_threshold, row_threshold;
       v_h = 1;
 
-      if (abs (x - COLUMN_LEFT_XPIXEL (sheet,sheet->drag_cell.col)) >
-         abs (y - ROW_TOP_YPIXEL (sheet,sheet->drag_cell.row))) v_h = 2;
+      if (abs (x - COLUMN_LEFT_XPIXEL (sheet, sheet->drag_cell.col)) >
+         abs (y - ROW_TOP_YPIXEL (sheet, sheet->drag_cell.row))) v_h = 2;
 
-      current_col = COLUMN_FROM_XPIXEL (sheet,x);
-      current_row = ROW_FROM_YPIXEL (sheet,y);
+      current_col = COLUMN_FROM_XPIXEL (sheet, x);
+      current_row = ROW_FROM_YPIXEL (sheet, y);
       column = current_col - sheet->drag_cell.col;
       row = current_row - sheet->drag_cell.row;
 
       /*use half of column width resp. row height as threshold to
        expand selection*/
-      col_threshold = COLUMN_LEFT_XPIXEL (sheet,current_col) +
-       xxx_column_width (sheet,current_col) / 2;
+      col_threshold = COLUMN_LEFT_XPIXEL (sheet, current_col) +
+       xxx_column_width (sheet, current_col) / 2;
       if (column > 0)
        {
          if (x < col_threshold)
@@ -5724,7 +5460,7 @@ gtk_sheet_motion (GtkWidget * widget,
          if (x > col_threshold)
            column +=1;
        }
-      row_threshold = ROW_TOP_YPIXEL (sheet,current_row) +
+      row_threshold = ROW_TOP_YPIXEL (sheet, current_row) +
        yyy_row_height (sheet, current_row)/2;
       if (row > 0)
        {
@@ -5793,8 +5529,8 @@ gtk_sheet_move_query (GtkSheet *sheet, gint row, gint column)
 
   row_move = FALSE;
   column_move = FALSE;
-  row_align =1.;
-  col_align =1.;
+  row_align = -1.;
+  col_align = -1.;
 
   height = sheet->sheet_window_height;
   width = sheet->sheet_window_width;
@@ -5802,7 +5538,7 @@ gtk_sheet_move_query (GtkSheet *sheet, gint row, gint column)
   if (row >= MAX_VISIBLE_ROW (sheet) && sheet->state != GTK_SHEET_COLUMN_SELECTED)
     {
       row_align = 1.;
-      new_row = MIN (yyy_row_count (sheet), row + 1);
+      new_row = MIN (yyy_row_count (sheet) - 1, row + 1);
       row_move = TRUE;
       if (MAX_VISIBLE_ROW (sheet) == yyy_row_count (sheet) - 1 &&
          ROW_TOP_YPIXEL (sheet, yyy_row_count (sheet)- 1) +
@@ -5849,7 +5585,7 @@ gtk_sheet_extend_selection (GtkSheet *sheet, gint row, gint column)
 {
   GtkSheetRange range;
   gint state;
-  gint r,c;
+  gint r, c;
 
   if (row == sheet->selection_cell.row && column == sheet->selection_cell.col)
     return;
@@ -5882,10 +5618,10 @@ gtk_sheet_extend_selection (GtkSheet *sheet, gint row, gint column)
       gdk_draw_pixmap (sheet->sheet_window,
                       GTK_WIDGET (sheet)->style->fg_gc[GTK_STATE_NORMAL],
                       sheet->pixmap,
-                      COLUMN_LEFT_XPIXEL (sheet,c)- 1,
-                      ROW_TOP_YPIXEL (sheet,r)- 1,
-                      COLUMN_LEFT_XPIXEL (sheet,c)- 1,
-                      ROW_TOP_YPIXEL (sheet,r)- 1,
+                      COLUMN_LEFT_XPIXEL (sheet, c)- 1,
+                      ROW_TOP_YPIXEL (sheet, r)- 1,
+                      COLUMN_LEFT_XPIXEL (sheet, c)- 1,
+                      ROW_TOP_YPIXEL (sheet, r)- 1,
                       xxx_column_width (sheet, c)+4,
                       yyy_row_height (sheet, r)+4);
       gtk_sheet_range_draw_selection (sheet, sheet->range);
@@ -5896,10 +5632,10 @@ gtk_sheet_extend_selection (GtkSheet *sheet, gint row, gint column)
   sheet->selection_cell.row = row;
   sheet->selection_cell.col = column;
 
-  range.col0 = MIN (column,sheet->active_cell.col);
-  range.coli = MAX (column,sheet->active_cell.col);
-  range.row0 = MIN (row,sheet->active_cell.row);
-  range.rowi = MAX (row,sheet->active_cell.row);
+  range.col0 = MIN (column, sheet->active_cell.col);
+  range.coli = MAX (column, sheet->active_cell.col);
+  range.row0 = MIN (row, sheet->active_cell.row);
+  range.rowi = MAX (row, sheet->active_cell.row);
 
   if (range.row0 != sheet->range.row0 || range.rowi != sheet->range.rowi ||
       range.col0 != sheet->range.col0 || range.coli != sheet->range.coli ||
@@ -5913,7 +5649,7 @@ gtk_sheet_entry_key_press (GtkWidget *widget,
                           GdkEventKey *key)
 {
   gboolean focus;
-  g_signal_emit_by_name (G_OBJECT (widget), "key_press_event", key, &focus);
+  g_signal_emit_by_name (widget, "key_press_event", key, &focus);
   return focus;
 }
 
@@ -6026,7 +5762,7 @@ gtk_sheet_key_press (GtkWidget *widget,
        col = MIN_VISIBLE_COLUMN (sheet);
       row = row - scroll;
       while (!yyy_row_is_visible (sheet, row) && row > 0) row--;
-      row = MAX (0,row);
+      row = MAX (0, row);
       gtk_sheet_click_cell (sheet, row, col, &veto);
       extend_selection = FALSE;
       break;
@@ -6143,12 +5879,12 @@ gtk_sheet_key_press (GtkWidget *widget,
       break;
     case GDK_Home:
       row = 0;
-      while (!yyy_row_is_visible (sheet, row) && row < yyy_row_count (sheet)- 1) row++;
+      while (!yyy_row_is_visible (sheet, row) && row < yyy_row_count (sheet) - 1) row++;
       gtk_sheet_click_cell (sheet, row, sheet->active_cell.col, &veto);
       extend_selection = FALSE;
       break;
     case GDK_End:
-      row = yyy_row_count (sheet)- 1;
+      row = yyy_row_count (sheet) - 1;
       while (!yyy_row_is_visible (sheet, row) && row > 0) row--;
       gtk_sheet_click_cell (sheet, row, sheet->active_cell.col, &veto);
       extend_selection = FALSE;
@@ -6309,7 +6045,7 @@ static void
 size_allocate_column_title_buttons (GtkSheet * sheet)
 {
   gint i;
-  gint x,width;
+  gint x, width;
 
   if (!sheet->column_titles_visible) return;
   if (!GTK_WIDGET_REALIZED (sheet))
@@ -6338,7 +6074,7 @@ size_allocate_column_title_buttons (GtkSheet * sheet)
 
   if (MAX_VISIBLE_COLUMN (sheet) == xxx_column_count (sheet) - 1)
     gdk_window_clear_area (sheet->column_title_window,
-                          0,0,
+                          0, 0,
                           sheet->column_title_area.width,
                           sheet->column_title_area.height);
 
@@ -6379,7 +6115,7 @@ size_allocate_row_title_buttons (GtkSheet * sheet)
     }
   if (MAX_VISIBLE_ROW (sheet) == yyy_row_count (sheet)- 1)
     gdk_window_clear_area (sheet->row_title_window,
-                          0,0,
+                          0, 0,
                           sheet->row_title_area.width,
                           sheet->row_title_area.height);
 
@@ -6448,6 +6184,7 @@ gtk_sheet_size_allocate_entry (GtkSheet *sheet)
              style->fg[GTK_STATE_ACTIVE] = previous_style->fg[GTK_STATE_ACTIVE];
            }
          gtk_widget_set_style (GTK_WIDGET (sheet_entry), style);
+          g_object_unref (style);
        }
     }
 
@@ -6464,13 +6201,13 @@ gtk_sheet_size_allocate_entry (GtkSheet *sheet)
   column_width = xxx_column_width (sheet, sheet->active_cell.col);
 
   size = MIN (text_size, max_size);
-  size = MAX (size,column_width - 2 * CELLOFFSET);
+  size = MAX (size, column_width - 2 * CELLOFFSET);
 
   row = sheet->active_cell.row;
   col = sheet->active_cell.col;
 
-  shentry_allocation.x = COLUMN_LEFT_XPIXEL (sheet,sheet->active_cell.col);
-  shentry_allocation.y = ROW_TOP_YPIXEL (sheet,sheet->active_cell.row);
+  shentry_allocation.x = COLUMN_LEFT_XPIXEL (sheet, sheet->active_cell.col);
+  shentry_allocation.y = ROW_TOP_YPIXEL (sheet, sheet->active_cell.row);
   shentry_allocation.width = column_width;
   shentry_allocation.height = yyy_row_height (sheet, sheet->active_cell.row);
 
@@ -6478,10 +6215,7 @@ gtk_sheet_size_allocate_entry (GtkSheet *sheet)
     {
       shentry_allocation.height -= 2 * CELLOFFSET;
       shentry_allocation.y += CELLOFFSET;
-      if (gtk_sheet_clip_text (sheet))
-       shentry_allocation.width = column_width - 2 * CELLOFFSET;
-      else
-       shentry_allocation.width = size;
+      shentry_allocation.width = size;
 
       switch (GTK_ITEM_ENTRY (sheet_entry)->justification)
        {
@@ -6517,14 +6251,14 @@ gtk_sheet_entry_set_max_size (GtkSheet *sheet)
   gint i;
   gint size = 0;
   gint sizel = 0, sizer = 0;
-  gint row,col;
+  gint row, col;
   GtkJustification justification;
   gchar *s = NULL;
 
   row = sheet->active_cell.row;
   col = sheet->active_cell.col;
 
-  if ( ! GTK_IS_ITEM_ENTRY (sheet->sheet_entry) || gtk_sheet_clip_text (sheet))
+  if ( ! GTK_IS_ITEM_ENTRY (sheet->sheet_entry) )
     return;
 
   justification = GTK_ITEM_ENTRY (sheet->sheet_entry)->justification;
@@ -6640,7 +6374,7 @@ create_sheet_entry (GtkSheet *sheet)
       gtk_widget_realize (sheet->sheet_entry);
     }
 
-  g_signal_connect_swapped (G_OBJECT (entry), "key_press_event",
+  g_signal_connect_swapped (entry, "key_press_event",
                            G_CALLBACK (gtk_sheet_entry_key_press),
                            sheet);
 
@@ -6835,7 +6569,7 @@ gtk_sheet_button_draw (GtkSheet *sheet, GdkWindow *window,
                                    "label",
                                    real_x, real_y,
                                    layout);
-                 g_object_unref (G_OBJECT (layout));
+                 g_object_unref (layout);
 
                  real_y += text_height + 2;
 
@@ -6891,7 +6625,7 @@ gtk_sheet_column_title_button_draw (GtkSheet *sheet, gint column)
 {
   GdkWindow *window = NULL;
   GdkRectangle allocation;
-  GtkSheetButton *button = NULL;
+
   gboolean is_sensitive = FALSE;
 
   if (!GTK_WIDGET_REALIZED (GTK_WIDGET (sheet))) return;
@@ -6920,7 +6654,7 @@ gtk_sheet_column_title_button_draw (GtkSheet *sheet, gint column)
     }
   else
     {
-      button = xxx_column_button (sheet, column);
+      GtkSheetButton *button = xxx_column_button (sheet, column);
       allocation.x = COLUMN_LEFT_XPIXEL (sheet, column) + CELL_SPACING;
       if (sheet->row_titles_visible)
        allocation.x -= sheet->row_title_area.width;
@@ -6930,6 +6664,12 @@ gtk_sheet_column_title_button_draw (GtkSheet *sheet, gint column)
       is_sensitive = xxx_column_is_sensitive (sheet, column);
       gtk_sheet_button_draw (sheet, window, button,
                             is_sensitive, allocation);
+
+      /* FIXME: Not freeing this button is correct (sort of),
+      because in PSPP the model always returns a static copy */
+
+      /* gtk_sheet_button_free (button); */
+
     }
 }
 
@@ -6980,7 +6720,7 @@ adjust_scrollbars (GtkSheet * sheet)
       sheet->vadjustment->step_increment = DEFAULT_ROW_HEIGHT (GTK_WIDGET (sheet));
       sheet->vadjustment->lower = 0;
       sheet->vadjustment->upper = SHEET_HEIGHT (sheet) + 80;
-      g_signal_emit_by_name (G_OBJECT (sheet->vadjustment), "changed");
+      g_signal_emit_by_name (sheet->vadjustment, "changed");
 
     }
 
@@ -6991,7 +6731,7 @@ adjust_scrollbars (GtkSheet * sheet)
       sheet->hadjustment->step_increment = DEFAULT_COLUMN_WIDTH;
       sheet->hadjustment->lower = 0;
       sheet->hadjustment->upper = SHEET_WIDTH (sheet)+ 80;
-      g_signal_emit_by_name (G_OBJECT (sheet->hadjustment), "changed");
+      g_signal_emit_by_name (sheet->hadjustment, "changed");
 
     }
 }
@@ -7013,14 +6753,14 @@ vadjustment_value_changed (GtkAdjustment * adjustment,
 
   if (GTK_SHEET_IS_FROZEN (sheet)) return;
 
-  row = ROW_FROM_YPIXEL (sheet,sheet->column_title_area.height + CELL_SPACING);
+  row = ROW_FROM_YPIXEL (sheet, sheet->column_title_area.height + CELL_SPACING);
   if (!sheet->column_titles_visible)
     row = ROW_FROM_YPIXEL (sheet, CELL_SPACING);
 
   old_value = - sheet->voffset;
 
   new_row = g_sheet_row_pixel_to_row (sheet->row_geometry,
-                                     adjustment->value,sheet);
+                                     adjustment->value, sheet);
 
   y = g_sheet_row_start_pixel (sheet->row_geometry, new_row, sheet);
 
@@ -7118,7 +6858,7 @@ hadjustment_value_changed (GtkAdjustment * adjustment,
 
   if (GTK_SHEET_IS_FROZEN (sheet)) return;
 
-  column = COLUMN_FROM_XPIXEL (sheet,sheet->row_title_area.width + CELL_SPACING);
+  column = COLUMN_FROM_XPIXEL (sheet, sheet->row_title_area.width + CELL_SPACING);
   if (!sheet->row_titles_visible)
     column = COLUMN_FROM_XPIXEL (sheet, CELL_SPACING);
 
@@ -7287,7 +7027,7 @@ draw_xor_rectangle (GtkSheet *sheet, GtkSheetRange range)
 
   gdk_gc_set_clip_rectangle (sheet->xor_gc, &clip_area);
 
-  for (i =1; i <= 1; ++i)
+  for (i = -1; i <= 1; ++i)
     gdk_draw_rectangle (sheet->sheet_window,
                        sheet->xor_gc,
                        FALSE,
@@ -7394,8 +7134,8 @@ gtk_sheet_set_column_width (GtkSheet * sheet,
       gtk_sheet_range_draw (sheet, NULL);
     }
 
-  g_signal_emit (G_OBJECT (sheet), sheet_signals[CHANGED], 0, -1, column);
-  g_signal_emit (G_OBJECT (sheet), sheet_signals[NEW_COL_WIDTH], 0,
+  g_signal_emit (sheet, sheet_signals[CHANGED], 0, -1, column);
+  g_signal_emit (sheet, sheet_signals[NEW_COL_WIDTH], 0,
                 column, width);
 }
 
@@ -7427,8 +7167,8 @@ gtk_sheet_set_row_height (GtkSheet * sheet,
       gtk_sheet_range_draw (sheet, NULL);
     }
 
-  g_signal_emit (G_OBJECT (sheet), sheet_signals[CHANGED], 0, row, - 1);
-  g_signal_emit (G_OBJECT (sheet), sheet_signals[NEW_ROW_HEIGHT], 0,
+  g_signal_emit (sheet, sheet_signals[CHANGED], 0, row, - 1);
+  g_signal_emit (sheet, sheet_signals[NEW_ROW_HEIGHT], 0,
                 row, height);
 
 }
@@ -7829,11 +7569,14 @@ gtk_sheet_column_size_request (GtkSheet *sheet,
 {
   GtkRequisition button_requisition;
   GList *children;
+  GtkSheetButton *button = xxx_column_button (sheet, col);
 
   gtk_sheet_button_size_request (sheet,
-                                xxx_column_button (sheet, col),
+                                button,
                                 &button_requisition);
 
+  gtk_sheet_button_free (button);
+
   *requisition = button_requisition.width;
 
   children = sheet->children;
@@ -8183,3 +7926,148 @@ gtk_sheet_button_free (GtkSheetButton *button)
   g_free (button->label);
   g_free (button);
 }
+
+
+static GString *
+range_to_text (const GtkSheet *sheet)
+{
+  gchar *celltext = NULL;
+  gint r, c;
+  GString *string;
+
+  if ( !gtk_sheet_range_isvisible (sheet, sheet->range))
+    return NULL;
+
+  string = g_string_sized_new (80);
+
+  for (r = sheet->range.row0; r <= sheet->range.rowi; ++r)
+    {
+      for (c = sheet->range.col0; c < sheet->range.coli; ++c)
+       {
+         celltext = gtk_sheet_cell_get_text (sheet, r, c);
+         g_string_append (string, celltext);
+         g_string_append (string, "\t");
+         g_free (celltext);
+       }
+      celltext = gtk_sheet_cell_get_text (sheet, r, c);
+      g_string_append (string, celltext);
+      if ( r < sheet->range.rowi)
+       g_string_append (string, "\n");
+      g_free (celltext);
+    }
+
+  return string;
+}
+
+static GString *
+range_to_html (const GtkSheet *sheet)
+{
+  gchar *celltext = NULL;
+  gint r, c;
+  GString *string;
+
+  if ( !gtk_sheet_range_isvisible (sheet, sheet->range))
+    return NULL;
+
+  string = g_string_sized_new (480);
+
+  g_string_append (string, "<html>\n");
+  g_string_append (string, "<body>\n");
+  g_string_append (string, "<table>\n");
+  for (r = sheet->range.row0; r <= sheet->range.rowi; ++r) 
+    {
+      g_string_append (string, "<tr>\n");
+      for (c = sheet->range.col0; c <= sheet->range.coli; ++c)
+       {
+         g_string_append (string, "<td>");
+         celltext = gtk_sheet_cell_get_text (sheet, r, c);
+         g_string_append (string, celltext);
+         g_string_append (string, "</td>\n");
+         g_free (celltext);
+       }
+      g_string_append (string, "</tr>\n");
+    }
+  g_string_append (string, "</table>\n");
+  g_string_append (string, "</body>\n");
+  g_string_append (string, "</html>\n");
+
+  return string;
+}
+
+enum {
+  SELECT_FMT_NULL,
+  SELECT_FMT_TEXT,
+  SELECT_FMT_HTML
+};
+
+static void
+primary_get_cb (GtkClipboard     *clipboard,
+               GtkSelectionData *selection_data,
+               guint             info,
+               gpointer          data)
+{
+  GtkSheet *sheet = GTK_SHEET (data);
+  GString *string = NULL;
+
+  switch (info)
+  {
+  case SELECT_FMT_TEXT:
+    string = range_to_text (sheet);
+    break;
+  case SELECT_FMT_HTML:
+    string = range_to_html (sheet);
+    break;
+  default:
+    g_assert_not_reached ();
+  }
+
+  gtk_selection_data_set (selection_data, selection_data->target,
+                         8,
+                         (const guchar *) string->str, string->len);
+  g_string_free (string, TRUE);
+}
+
+static void
+primary_clear_cb (GtkClipboard *clipboard,
+                 gpointer      data)
+{
+  GtkSheet *sheet = GTK_SHEET (data);
+  gtk_sheet_real_unselect_range (sheet, NULL);
+}
+
+static void
+gtk_sheet_update_primary_selection (GtkSheet *sheet)
+{
+  static const GtkTargetEntry targets[] = {
+    { "UTF8_STRING",   0, SELECT_FMT_TEXT },
+    { "STRING",        0, SELECT_FMT_TEXT },
+    { "TEXT",          0, SELECT_FMT_TEXT }, 
+    { "COMPOUND_TEXT", 0, SELECT_FMT_TEXT },
+    { "text/plain;charset=utf-8", 0, SELECT_FMT_TEXT }, 
+    { "text/plain",    0, SELECT_FMT_TEXT },
+    { "text/html",     0, SELECT_FMT_HTML }
+  };
+  
+  GtkClipboard *clipboard;
+
+  if (!GTK_WIDGET_REALIZED (sheet))
+    return;
+
+  clipboard = gtk_widget_get_clipboard (GTK_WIDGET (sheet),
+                                       GDK_SELECTION_PRIMARY);
+
+  if (gtk_sheet_range_isvisible (sheet, sheet->range))
+    {
+      if (!gtk_clipboard_set_with_owner (clipboard, targets,
+                                        G_N_ELEMENTS (targets),
+                                        primary_get_cb, primary_clear_cb,
+                                        G_OBJECT (sheet)))
+       primary_clear_cb (clipboard, sheet);
+    }
+  else
+    {
+      if (gtk_clipboard_get_owner (clipboard) == G_OBJECT (sheet))
+       gtk_clipboard_clear (clipboard);
+    }
+}
+