Code

more unreffing temporary styles properly
[inkscape.git] / src / gradient-drag.cpp
index 5b3b586b241cc9f8b04e0a5dfe784bea356a9684..5801489fe0db2114dd225072547bf570da634644 100644 (file)
@@ -27,6 +27,9 @@
 #include "display/sp-ctrlline.h"
 
 #include "xml/repr.h"
+#include "svg/css-ostringstream.h"
+
+#include "svg/svg.h"
 
 #include "prefs-utils.h"
 #include "sp-item.h"
 #include "gradient-drag.h"
 #include "sp-stop.h"
 
+#include "snap.h"
+#include "sp-namedview.h"
+
+
 #define GR_KNOT_COLOR_NORMAL 0xffffff00
 #define GR_KNOT_COLOR_SELECTED 0x0000ff00
 
@@ -55,9 +62,9 @@ SPKnotShapeType gr_knot_shapes [] = {
         SP_KNOT_SHAPE_SQUARE, //POINT_LG_BEGIN
         SP_KNOT_SHAPE_CIRCLE,  //POINT_LG_END
         SP_KNOT_SHAPE_DIAMOND, //POINT_LG_MID
-        SP_KNOT_SHAPE_DIAMOND,
-        SP_KNOT_SHAPE_CIRCLE,
-        SP_KNOT_SHAPE_CIRCLE,
+        SP_KNOT_SHAPE_SQUARE,  // POINT_RG_CENTER
+        SP_KNOT_SHAPE_CIRCLE,  // POINT_RG_R1
+        SP_KNOT_SHAPE_CIRCLE,  // POINT_RG_R2
         SP_KNOT_SHAPE_CROSS, // POINT_RG_FOCUS
         SP_KNOT_SHAPE_DIAMOND, //POINT_RG_MID1
         SP_KNOT_SHAPE_DIAMOND //POINT_RG_MID2
@@ -98,7 +105,7 @@ gr_drag_sel_modified (Inkscape::Selection *selection, guint flags, gpointer data
 }
 
 /**
-When a _query_style_signal is received, check that \a property requests fill/stroke (otherwise
+When a _query_style_signal is received, check that \a property requests fill/stroke/opacity (otherwise
 skip), and fill the \a style with the averaged color of all draggables of the selected dragger, if
 any.
 */
@@ -107,7 +114,7 @@ gr_drag_style_query (SPStyle *style, int property, gpointer data)
 {
     GrDrag *drag = (GrDrag *) data;
 
-    if (property != QUERY_STYLE_PROPERTY_FILL && property != QUERY_STYLE_PROPERTY_STROKE) {
+    if (property != QUERY_STYLE_PROPERTY_FILL && property != QUERY_STYLE_PROPERTY_STROKE && property != QUERY_STYLE_PROPERTY_MASTEROPACITY) {
         return QUERY_STYLE_NOTHING;
     }
 
@@ -153,10 +160,13 @@ gr_drag_style_query (SPStyle *style, int property, gpointer data)
             style->stroke.set = TRUE;
             style->stroke.type = SP_PAINT_TYPE_COLOR;
 
-            style->fill_opacity.value = SP_SCALE24_FROM_FLOAT (cf[3]);
+            style->fill_opacity.value = SP_SCALE24_FROM_FLOAT (1.0);
             style->fill_opacity.set = TRUE;
-            style->stroke_opacity.value = SP_SCALE24_FROM_FLOAT (cf[3]);
+            style->stroke_opacity.value = SP_SCALE24_FROM_FLOAT (1.0);
             style->stroke_opacity.set = TRUE;
+
+            style->opacity.value = SP_SCALE24_FROM_FLOAT (cf[3]);
+            style->opacity.set = TRUE;
         }
 
         return ret;
@@ -195,25 +205,24 @@ gr_drag_style_set (const SPCSSAttr *css, gpointer data)
     if (css->attribute("stop-color"))
         sp_repr_css_set_property (stop, "stop-color", css->attribute("stop-color"));
 
-    // any of opacity properties, in order of increasing priority:
-    if (css->attribute("flood-opacity"))
-        sp_repr_css_set_property (stop, "stop-opacity", css->attribute("flood-color"));
-
-    if (css->attribute("opacity")) // TODO: multiply
-        sp_repr_css_set_property (stop, "stop-opacity", css->attribute("color"));
-
-    if (css->attribute("stroke-opacity")) // TODO: multiply
-        sp_repr_css_set_property (stop, "stop-opacity", css->attribute("stroke-opacity"));
-
-    if (css->attribute("fill-opacity")) // TODO: multiply
-        sp_repr_css_set_property (stop, "stop-opacity", css->attribute("fill-opacity"));
 
-    if ((css->attribute("fill") && !strcmp(css->attribute("fill"), "none")) ||
-        (css->attribute("stroke") && !strcmp(css->attribute("stroke"), "none")))
-        sp_repr_css_set_property (stop, "stop-opacity", "0"); // if set to none, don't change color, set opacity to 0
-
-    if (css->attribute("stop-opacity"))
+    if (css->attribute("stop-opacity")) { // direct setting of stop-opacity has priority
         sp_repr_css_set_property (stop, "stop-opacity", css->attribute("stop-opacity"));
+    } else {  // multiply all opacity properties:
+        gdouble accumulated = 1.0;
+        accumulated *= sp_svg_read_percentage(css->attribute("flood-opacity"), 1.0);
+        accumulated *= sp_svg_read_percentage(css->attribute("opacity"), 1.0);
+        accumulated *= sp_svg_read_percentage(css->attribute("stroke-opacity"), 1.0);
+        accumulated *= sp_svg_read_percentage(css->attribute("fill-opacity"), 1.0);
+
+        Inkscape::CSSOStringStream os;
+        os << accumulated;
+        sp_repr_css_set_property (stop, "stop-opacity", os.str().c_str());
+
+        if ((css->attribute("fill") && !strcmp(css->attribute("fill"), "none")) ||
+            (css->attribute("stroke") && !strcmp(css->attribute("stroke"), "none")))
+            sp_repr_css_set_property (stop, "stop-opacity", "0"); // if set to none, don't change color, set opacity to 0
+    }
 
     if (!stop->attributeList()) { // nothing for us here, pass it on
         sp_repr_css_attr_unref(stop);
@@ -224,11 +233,11 @@ gr_drag_style_set (const SPCSSAttr *css, gpointer data)
         GrDragger* dragger = (GrDragger*) sel->data;
         for (GSList const* i = dragger->draggables; i != NULL; i = i->next) { // for all draggables of dragger
                GrDraggable *draggable = (GrDraggable *) i->data;
-    
+
                drag->local_change = true;
                sp_item_gradient_stop_set_style (draggable->item, draggable->point_type, draggable->point_i, draggable->fill_or_stroke, stop);
         }
-    }        
+    }
 
     //sp_repr_css_print(stop);
     sp_repr_css_attr_unref(stop);
@@ -302,8 +311,8 @@ GrDrag::~GrDrag()
         desktop->gr_point_i = 0;
         desktop->gr_fill_or_stroke = true;
     }
-                          
-    deselect_all();                          
+
+    deselect_all();
     for (GList *l = this->draggers; l != NULL; l = l->next) {
         delete ((GrDragger *) l->data);
     }
@@ -354,13 +363,13 @@ snap_vector_midpoint (NR::Point p, NR::Point begin, NR::Point end, double snap)
     double length = NR::L2(end - begin);
     NR::Point be = (end - begin) / length;
     double r = NR::dot(p - begin, be);
-        
+
     if (r < 0.0) return begin;
-    if (r > length) return end;    
-    
-    double snapdist = length * snap;    
-    double r_snapped = (snap==0) ? r : floor(r/(snapdist + 0.5)) * snapdist;    
-        
+    if (r > length) return end;
+
+    double snapdist = length * snap;
+    double r_snapped = (snap==0) ? r : floor(r/(snapdist + 0.5)) * snapdist;
+
     return (begin + r_snapped * be);
 }
 
@@ -424,19 +433,26 @@ gr_knot_moved_handler(SPKnot *knot, NR::Point const *ppointer, guint state, gpoi
         }
     }
 
-   
     if (!((state & GDK_SHIFT_MASK) || ((state & GDK_CONTROL_MASK) && (state & GDK_MOD1_MASK)))) {
-        // See if we need to snap to any of the levels
-        for (guint i = 0; i < dragger->parent->hor_levels.size(); i++) {
-            if (fabs(p[NR::Y] - dragger->parent->hor_levels[i]) < snap_dist) {
-                p[NR::Y] = dragger->parent->hor_levels[i];
-                sp_knot_moveto (knot, &p);
+        // Try snapping to the grid or guides
+        SnapManager const &m = dragger->parent->desktop->namedview->snap_manager;
+        Inkscape::SnappedPoint s = m.freeSnap(Inkscape::Snapper::SNAP_POINT | Inkscape::Snapper::BBOX_POINT, p, NULL);
+        if (s.getDistance() < 1e6) {
+            p = s.getPoint();
+            sp_knot_moveto (knot, &p);
+        } else {
+            // No snapping so far, let's see if we need to snap to any of the levels
+            for (guint i = 0; i < dragger->parent->hor_levels.size(); i++) {
+                if (fabs(p[NR::Y] - dragger->parent->hor_levels[i]) < snap_dist) {
+                    p[NR::Y] = dragger->parent->hor_levels[i];
+                    sp_knot_moveto (knot, &p);
+                }
             }
-        }
-        for (guint i = 0; i < dragger->parent->vert_levels.size(); i++) {
-            if (fabs(p[NR::X] - dragger->parent->vert_levels[i]) < snap_dist) {
-                p[NR::X] = dragger->parent->vert_levels[i];
-                sp_knot_moveto (knot, &p);
+            for (guint i = 0; i < dragger->parent->vert_levels.size(); i++) {
+                if (fabs(p[NR::X] - dragger->parent->vert_levels[i]) < snap_dist) {
+                    p[NR::X] = dragger->parent->vert_levels[i];
+                    sp_knot_moveto (knot, &p);
+                }
             }
         }
     }
@@ -517,7 +533,7 @@ gr_knot_moved_handler(SPKnot *knot, NR::Point const *ppointer, guint state, gpoi
             p += move;
             sp_knot_moveto (knot, &p);
         }
-        
+
         g_slist_free(snap_vectors);
     }
 
@@ -530,11 +546,11 @@ gr_knot_moved_handler(SPKnot *knot, NR::Point const *ppointer, guint state, gpoi
     }
 
     dragger->updateDependencies(false);
-    
+
     drag->keep_selection = (bool) g_list_find(drag->selected, dragger);
 }
-                       
-                       
+
+
 /**
 Called when a midpoint knot is dragged.
 */
@@ -545,7 +561,7 @@ gr_knot_moved_midpoint_handler(SPKnot *knot, NR::Point const *ppointer, guint st
     GrDrag *drag = dragger->parent;
     // a midpoint dragger can (logically) only contain one GrDraggable
     GrDraggable *draggable = (GrDraggable *) dragger->draggables->data;
-    
+
     // FIXME: take from prefs
     double snap_fraction = 0.1;
 
@@ -557,13 +573,13 @@ gr_knot_moved_midpoint_handler(SPKnot *knot, NR::Point const *ppointer, guint st
         server = SP_OBJECT_STYLE_FILL_SERVER (draggable->item);
     else
         server = SP_OBJECT_STYLE_STROKE_SERVER (draggable->item);
-    
-    
+
+
     // get begin and end points between which dragging is allowed:
     // the draglimits are between knot(lowest_i - 1) and knot(highest_i + 1)
     GSList *moving = NULL;
     moving = g_slist_append(moving, dragger);
-    
+
     guint lowest_i = draggable->point_i;
     guint highest_i = draggable->point_i;
     GrDragger *lowest_dragger = dragger;
@@ -574,7 +590,7 @@ gr_knot_moved_midpoint_handler(SPKnot *knot, NR::Point const *ppointer, guint st
         while ( true )
         {
             d_add = drag->getDraggerFor(draggable->item, draggable->point_type, lowest_i - 1, draggable->fill_or_stroke);
-            if ( d_add && g_list_find(drag->selected, d_add) ) { 
+            if ( d_add && g_list_find(drag->selected, d_add) ) {
                 lowest_i = lowest_i - 1;
                 moving = g_slist_prepend(moving, d_add);
                 lowest_dragger = d_add;
@@ -582,11 +598,11 @@ gr_knot_moved_midpoint_handler(SPKnot *knot, NR::Point const *ppointer, guint st
                 break;
             }
         }
-        
+
         while ( true )
         {
             d_add = drag->getDraggerFor(draggable->item, draggable->point_type, highest_i + 1, draggable->fill_or_stroke);
-            if ( d_add && g_list_find(drag->selected, d_add) ) { 
+            if ( d_add && g_list_find(drag->selected, d_add) ) {
                 highest_i = highest_i + 1;
                 moving = g_slist_append(moving, d_add);
                 highest_dragger = d_add;
@@ -595,7 +611,7 @@ gr_knot_moved_midpoint_handler(SPKnot *knot, NR::Point const *ppointer, guint st
             }
         }
     }
-    
+
     if ( SP_IS_LINEARGRADIENT(server) ) {
         GrDragger *d_temp;
         if (lowest_i == 1) {
@@ -604,7 +620,7 @@ gr_knot_moved_midpoint_handler(SPKnot *knot, NR::Point const *ppointer, guint st
             d_temp = drag->getDraggerFor (draggable->item, POINT_LG_MID, lowest_i - 1, draggable->fill_or_stroke);
         }
         if (d_temp) begin = d_temp->point;
-        
+
         d_temp = drag->getDraggerFor (draggable->item, POINT_LG_MID, highest_i + 1, draggable->fill_or_stroke);
         if (d_temp == NULL) {
             d_temp = drag->getDraggerFor (draggable->item, POINT_LG_END, 0, draggable->fill_or_stroke);
@@ -618,7 +634,7 @@ gr_knot_moved_midpoint_handler(SPKnot *knot, NR::Point const *ppointer, guint st
             d_temp = drag->getDraggerFor (draggable->item, draggable->point_type, lowest_i - 1, draggable->fill_or_stroke);
         }
         if (d_temp) begin = d_temp->point;
-        
+
         d_temp = drag->getDraggerFor (draggable->item, draggable->point_type, highest_i + 1, draggable->fill_or_stroke);
         if (d_temp == NULL) {
             d_temp = drag->getDraggerFor (draggable->item, (draggable->point_type==POINT_RG_MID1) ? POINT_RG_R1 : POINT_RG_R2, 0, draggable->fill_or_stroke);
@@ -628,14 +644,14 @@ gr_knot_moved_midpoint_handler(SPKnot *knot, NR::Point const *ppointer, guint st
 
     NR::Point low_lim  = dragger->point - (lowest_dragger->point - begin);
     NR::Point high_lim = dragger->point - (highest_dragger->point - end);
-        
+
     if (state & GDK_CONTROL_MASK) {
         p = snap_vector_midpoint (p, low_lim, high_lim, snap_fraction);
     } else {
         p = snap_vector_midpoint (p, low_lim, high_lim, 0);
     }
     NR::Point displacement = p - dragger->point;
-    
+
     for (GSList const* i = moving; i != NULL; i = i->next) {
         GrDragger *drg = (GrDragger*) i->data;
         SPKnot *drgknot = drg->knot;
@@ -644,7 +660,7 @@ gr_knot_moved_midpoint_handler(SPKnot *knot, NR::Point const *ppointer, guint st
         drg->fireDraggables (false);
         drg->updateDependencies(false);
     }
-    
+
     drag->keep_selection = is_selected;
 }
 
@@ -685,13 +701,13 @@ gr_knot_ungrabbed_handler (SPKnot *knot, unsigned int state, gpointer data)
     dragger->updateDependencies(true);
 
     // we did an undoable action
-    sp_document_done (sp_desktop_document (dragger->parent->desktop), SP_VERB_CONTEXT_GRADIENT, 
+    sp_document_done (sp_desktop_document (dragger->parent->desktop), SP_VERB_CONTEXT_GRADIENT,
                       _("Move gradient handle"));
 }
 
 /**
 Called when a dragger knot is clicked; selects the dragger or deletes it depending on the
-state of the keyboard keys 
+state of the keyboard keys
 */
 static void
 gr_knot_clicked_handler(SPKnot *knot, guint state, gpointer data)
@@ -699,13 +715,13 @@ gr_knot_clicked_handler(SPKnot *knot, guint state, gpointer data)
     GrDragger *dragger = (GrDragger *) data;
     GrDraggable *draggable = (GrDraggable *) dragger->draggables->data;
     if (!draggable) return;
-    
+
     if ( (state & GDK_CONTROL_MASK) && (state & GDK_MOD1_MASK ) ) {
     // delete this knot from vector
        SPGradient *gradient = sp_item_gradient (draggable->item, draggable->fill_or_stroke);
-        gradient = sp_gradient_get_vector (gradient, false);    
+        gradient = sp_gradient_get_vector (gradient, false);
        if (gradient->vector.stops.size() > 2) { // 2 is the minimum
-               SPStop *stop;
+               SPStop *stop = NULL;
                switch (draggable->point_type) {  // if we delete first or last stop, move the next/previous to the edge
                case POINT_LG_BEGIN:
                case POINT_RG_CENTER:
@@ -736,15 +752,15 @@ gr_knot_clicked_handler(SPKnot *knot, guint state, gpointer data)
                    stop = sp_get_stop_i(gradient, draggable->point_i);
                    break;
                }
-    
+
                SP_OBJECT_REPR(gradient)->removeChild(SP_OBJECT_REPR(stop));
-               sp_document_done (SP_OBJECT_DOCUMENT (gradient), SP_VERB_CONTEXT_GRADIENT, 
+               sp_document_done (SP_OBJECT_DOCUMENT (gradient), SP_VERB_CONTEXT_GRADIENT,
                                  _("Delete gradient stop"));
        }
     } else {
     // select the dragger
         dragger->point_original = dragger->point;
-        
+
         if ( state & GDK_SHIFT_MASK ) {
             dragger->parent->setSelected (dragger, true, false);
         } else {
@@ -786,7 +802,9 @@ GrDragger::fireDraggables (bool write_repr, bool scale_radial, bool merging_focu
         // to the center, unless it's the first update upon merge when we must snap it to the point
         if (merging_focus ||
             !(draggable->point_type == POINT_RG_FOCUS && this->isA(draggable->item, POINT_RG_CENTER, draggable->point_i, draggable->fill_or_stroke)))
+        {
             sp_item_gradient_set_coords (draggable->item, draggable->point_type, draggable->point_i, this->point, draggable->fill_or_stroke, write_repr, scale_radial);
+        }
     }
 }
 
@@ -832,11 +850,11 @@ GrDraggable::mayMerge (GrDraggable *da2)
         }
     }
     // disable merging of midpoints.
-    if ( (this->point_type == POINT_LG_MID) || (da2->point_type == POINT_LG_MID) 
+    if ( (this->point_type == POINT_LG_MID) || (da2->point_type == POINT_LG_MID)
          || (this->point_type == POINT_RG_MID1) || (da2->point_type == POINT_RG_MID1)
          || (this->point_type == POINT_RG_MID2) || (da2->point_type == POINT_RG_MID2) )
         return false;
-        
+
     return true;
 }
 
@@ -970,17 +988,17 @@ GrDragger::updateMidstopDependencies (GrDraggable *draggable, bool write_repr) {
         server = SP_OBJECT_STYLE_STROKE_SERVER (draggable->item);
     guint num = SP_GRADIENT(server)->vector.stops.size();
     if (num <= 2) return;
-    
+
     if ( SP_IS_LINEARGRADIENT(server) ) {
         for ( guint i = 1; i < num - 1; i++ ) {
             this->moveOtherToDraggable (draggable->item, POINT_LG_MID, i, draggable->fill_or_stroke, write_repr);
-        } 
+        }
     } else  if ( SP_IS_RADIALGRADIENT(server) ) {
         for ( guint i = 1; i < num - 1; i++ ) {
             this->moveOtherToDraggable (draggable->item, POINT_RG_MID1, i, draggable->fill_or_stroke, write_repr);
             this->moveOtherToDraggable (draggable->item, POINT_RG_MID2, i, draggable->fill_or_stroke, write_repr);
-        } 
-    } 
+        }
+    }
 }
 
 
@@ -1005,7 +1023,7 @@ GrDragger::updateDependencies (bool write_repr)
                 {
                     // the begin point is dependent only when dragging with ctrl+shift
                     this->moveOtherToDraggable (draggable->item, POINT_LG_BEGIN, 0, draggable->fill_or_stroke, write_repr);
-    
+
                     this->updateMidstopDependencies (draggable, write_repr);
                 }
                 break;
@@ -1068,8 +1086,8 @@ GrDragger::GrDragger (GrDrag *parent, NR::Point p, GrDraggable *draggable)
     // connect knot's signals
     if ( (draggable)  // it can be NULL if a node in unsnapped (eg. focus point unsnapped from center)
                        // luckily, midstops never snap to other nodes so are never unsnapped...
-         && ( (draggable->point_type == POINT_LG_MID) 
-              || (draggable->point_type == POINT_RG_MID1) 
+         && ( (draggable->point_type == POINT_LG_MID)
+              || (draggable->point_type == POINT_RG_MID1)
               || (draggable->point_type == POINT_RG_MID2) ) )
     {
         this->handler_id = g_signal_connect (G_OBJECT (this->knot), "moved", G_CALLBACK (gr_knot_moved_midpoint_handler), this);
@@ -1162,7 +1180,7 @@ GrDragger::deselect()
 
 
 /**
-\brief Deselect all stops/draggers
+\brief Deselect all stops/draggers (private)
 */
 void
 GrDrag::deselect_all()
@@ -1172,7 +1190,18 @@ GrDrag::deselect_all()
         selected = g_list_remove(selected, selected->data);
     }
 }
+
+/**
+\brief Deselect all stops/draggers (public; emits signal)
+*/
+void
+GrDrag::deselectAll()
+{
+    deselect_all();
+    this->desktop->emitToolSubselectionChanged(NULL);
+}
+
+
 /**
 \brief Select a dragger
 \param dragger       The dragger to select
@@ -1183,7 +1212,7 @@ void
 GrDrag::setSelected (GrDragger *dragger, bool add_to_selection, bool override)
 {
     GrDragger *seldragger = NULL;
-    
+
     if (add_to_selection) {
         if (!dragger) return;
         if (override) {
@@ -1268,7 +1297,7 @@ GrDrag::addDragger (GrDraggable *draggable)
         }
     }
 
-    GrDragger *new_dragger = new GrDragger(this, p, draggable);   
+    GrDragger *new_dragger = new GrDragger(this, p, draggable);
     // fixme: draggers should be added AFTER the last one: this way tabbing through them will be from begin to end.
     this->draggers = g_list_append (this->draggers, new_dragger);
 }
@@ -1427,14 +1456,16 @@ GrDrag::updateLevels ()
 
     for (GSList const* i = this->selection->itemList(); i != NULL; i = i->next) {
         SPItem *item = SP_ITEM(i->data);
-        NR::Rect rect = sp_item_bbox_desktop (item);
-        // Remember the edges of the bbox and the center axis
-        hor_levels.push_back(rect.min()[NR::Y]);
-        hor_levels.push_back(rect.max()[NR::Y]);
-        hor_levels.push_back(0.5 * (rect.min()[NR::Y] + rect.max()[NR::Y]));
-        vert_levels.push_back(rect.min()[NR::X]);
-        vert_levels.push_back(rect.max()[NR::X]);
-        vert_levels.push_back(0.5 * (rect.min()[NR::X] + rect.max()[NR::X]));
+        NR::Maybe<NR::Rect> rect = sp_item_bbox_desktop (item);
+        if (rect) {
+            // Remember the edges of the bbox and the center axis
+            hor_levels.push_back(rect->min()[NR::Y]);
+            hor_levels.push_back(rect->max()[NR::Y]);
+            hor_levels.push_back(0.5 * (rect->min()[NR::Y] + rect->max()[NR::Y]));
+            vert_levels.push_back(rect->min()[NR::X]);
+            vert_levels.push_back(rect->max()[NR::X]);
+            vert_levels.push_back(0.5 * (rect->min()[NR::X] + rect->max()[NR::X]));
+        }
     }
 }
 
@@ -1457,7 +1488,7 @@ GrDrag::selected_move (double x, double y)
 /*
     if (selected == NULL)
         return;
-    
+
     if ( (g_list_length(selected) == 1) )
     selected->point += NR::Point (x, y);
     selected->point_original = selected->point;
@@ -1470,7 +1501,7 @@ GrDrag::selected_move (double x, double y)
     // we did an undoable action
     sp_document_done (sp_desktop_document (desktop), SP_VERB_CONTEXT_GRADIENT,
                       _("Move gradient handle"));
-*/                      
+*/
 }
 
 void
@@ -1512,6 +1543,247 @@ GrDrag::select_prev ()
 }
 
 
+// FIXME: i.m.o. an ugly function that I just made to work, but... aargh! (Johan)
+void
+GrDrag::deleteSelected (bool just_one)
+{
+    if (!selected) return;
+
+    SPDocument *document = false;
+
+    struct StructStopInfo {
+        SPStop * spstop;
+        GrDraggable * draggable;
+        SPGradient * gradient;
+        SPGradient * vector;
+    };
+
+    GSList *midstoplist = NULL;  // list of stops that must be deleted (will be deleted first)
+    GSList *endstoplist = NULL;  // list of stops that must be deleted
+    while (selected) {
+        GrDragger *dragger = (GrDragger*) selected->data;
+        for (GSList * drgble = dragger->draggables; drgble != NULL; drgble = drgble->next) {
+            GrDraggable *draggable = (GrDraggable*) drgble->data;
+            SPGradient *gradient = sp_item_gradient (draggable->item, draggable->fill_or_stroke);
+            SPGradient *vector   = sp_gradient_get_forked_vector_if_necessary (gradient, false);
+
+            switch (draggable->point_type) {
+                case POINT_LG_MID:
+                case POINT_RG_MID1:
+                case POINT_RG_MID2:
+                    {
+                        SPStop *stop = sp_get_stop_i(vector, draggable->point_i);
+                        // check if already present in list. (e.g. when both RG_MID1 and RG_MID2 were selected)
+                        bool present = false;
+                        for (GSList const * l = midstoplist; l != NULL; l = l->next) {
+                            if ( (SPStop*)l->data == stop ) {
+                                present = true;
+                                break; // no need to search further.
+                            }
+                        }
+                        if (!present)
+                            midstoplist = g_slist_append(midstoplist, stop);
+                    }
+                    break;
+                case POINT_LG_BEGIN:
+                case POINT_LG_END:
+                case POINT_RG_CENTER:
+                case POINT_RG_R1:
+                case POINT_RG_R2:
+                    {
+                        SPStop *stop = NULL;
+                        if ( (draggable->point_type == POINT_LG_BEGIN) || (draggable->point_type == POINT_RG_CENTER) ) {
+                            stop = sp_first_stop(vector);
+                        } else {
+                            stop = sp_last_stop(vector);
+                        }
+                        if (stop) {
+                            StructStopInfo *stopinfo = new StructStopInfo;
+                            stopinfo->spstop = stop;
+                            stopinfo->draggable = draggable;
+                            stopinfo->gradient = gradient;
+                            stopinfo->vector = vector;
+                            // check if already present in list. (e.g. when both R1 and R2 were selected)
+                            bool present = false;
+                            for (GSList const * l = endstoplist; l != NULL; l = l->next) {
+                                if ( ((StructStopInfo*)l->data)->spstop == stopinfo->spstop ) {
+                                    present = true;
+                                    break; // no need to search further.
+                                }
+                            }
+                            if (!present)
+                                endstoplist = g_slist_append(endstoplist, stopinfo);
+                        }
+                    }
+                    break;
+                default:
+                    break;
+            }
+        }
+        selected = g_list_remove(selected, dragger);
+        if ( just_one ) break; // iterate once if just_one is set.
+    }
+    while (midstoplist) {
+        SPStop *stop = (SPStop*) midstoplist->data;
+        document = SP_OBJECT_DOCUMENT (stop);
+        Inkscape::XML::Node * parent = SP_OBJECT_REPR(stop)->parent();
+        parent->removeChild(SP_OBJECT_REPR(stop));
+        midstoplist = g_slist_remove(midstoplist, stop);
+    }
+    while (endstoplist) {
+        StructStopInfo *stopinfo  = (StructStopInfo*) endstoplist->data;
+        document = SP_OBJECT_DOCUMENT (stopinfo->spstop);
+
+        // 2 is the minimum, cannot delete more than that without deleting the whole vector
+        // cannot use vector->vector.stops.size() because the vector might be invalidated by deletion of a midstop
+        // manually count the children, don't know if there already exists a function for this...
+        int len = 0;
+        for ( SPObject *child = sp_object_first_child(stopinfo->vector) ;
+              child != NULL ;
+              child = SP_OBJECT_NEXT(child) )
+        {
+            if ( SP_IS_STOP(child) )  len ++;
+        }
+        if (len > 2)
+        {
+            switch (stopinfo->draggable->point_type) {
+                case POINT_LG_BEGIN:
+                    {
+                        SP_OBJECT_REPR(stopinfo->vector)->removeChild(SP_OBJECT_REPR(stopinfo->spstop));
+
+                        SPLinearGradient *lg = SP_LINEARGRADIENT(stopinfo->gradient);
+                        NR::Point oldbegin = NR::Point (lg->x1.computed, lg->y1.computed);
+                        NR::Point end = NR::Point (lg->x2.computed, lg->y2.computed);
+                        SPStop *stop = sp_first_stop(stopinfo->vector);
+                        gdouble offset = stop->offset;
+                        NR::Point newbegin = oldbegin + offset * (end - oldbegin);
+                        lg->x1.computed = newbegin[NR::X];
+                        lg->y1.computed = newbegin[NR::Y];
+
+                        Inkscape::XML::Node *repr = SP_OBJECT_REPR(stopinfo->gradient);
+                        sp_repr_set_svg_double(repr, "x1", lg->x1.computed);
+                        sp_repr_set_svg_double(repr, "y1", lg->y1.computed);
+                        stop->offset = 0;
+                        sp_repr_set_css_double (SP_OBJECT_REPR (stop), "offset", 0);
+
+                        // iterate through midstops to set new offset values such that they won't move on canvas.
+                        SPStop *laststop = sp_last_stop(stopinfo->vector);
+                        stop = sp_next_stop(stop);
+                        while ( stop != laststop ) {
+                            stop->offset = (stop->offset - offset)/(1 - offset);
+                            sp_repr_set_css_double (SP_OBJECT_REPR (stop), "offset", stop->offset);
+                            stop = sp_next_stop(stop);
+                        }
+                    }
+                    break;
+                case POINT_LG_END:
+                    {
+                        SP_OBJECT_REPR(stopinfo->vector)->removeChild(SP_OBJECT_REPR(stopinfo->spstop));
+
+                        SPLinearGradient *lg = SP_LINEARGRADIENT(stopinfo->gradient);
+                        NR::Point begin = NR::Point (lg->x1.computed, lg->y1.computed);
+                        NR::Point oldend = NR::Point (lg->x2.computed, lg->y2.computed);
+                        SPStop *laststop = sp_last_stop(stopinfo->vector);
+                        gdouble offset = laststop->offset;
+                        NR::Point newend = begin + offset * (oldend - begin);
+                        lg->x2.computed = newend[NR::X];
+                        lg->y2.computed = newend[NR::Y];
+
+                        Inkscape::XML::Node *repr = SP_OBJECT_REPR(stopinfo->gradient);
+                        sp_repr_set_svg_double(repr, "x2", lg->x2.computed);
+                        sp_repr_set_svg_double(repr, "y2", lg->y2.computed);
+                        laststop->offset = 1;
+                        sp_repr_set_css_double (SP_OBJECT_REPR (laststop), "offset", 1);
+
+                        // iterate through midstops to set new offset values such that they won't move on canvas.
+                        SPStop *stop = sp_first_stop(stopinfo->vector);
+                        stop = sp_next_stop(stop);
+                        while ( stop != laststop ) {
+                            stop->offset = stop->offset / offset;
+                            sp_repr_set_css_double (SP_OBJECT_REPR (stop), "offset", stop->offset);
+                            stop = sp_next_stop(stop);
+                        }
+                    }
+                    break;
+                case POINT_RG_CENTER:
+                    {
+                        SPStop *newfirst = sp_next_stop (stopinfo->spstop);
+                        if (newfirst) {
+                            newfirst->offset = 0;
+                            sp_repr_set_css_double (SP_OBJECT_REPR (newfirst), "offset", 0);
+                        }
+                        SP_OBJECT_REPR(stopinfo->vector)->removeChild(SP_OBJECT_REPR(stopinfo->spstop));
+                    }
+                    break;
+                case POINT_RG_R1:
+                case POINT_RG_R2:
+                        SP_OBJECT_REPR(stopinfo->vector)->removeChild(SP_OBJECT_REPR(stopinfo->spstop));
+
+                        SPRadialGradient *rg = SP_RADIALGRADIENT(stopinfo->gradient);
+                        double oldradius = rg->r.computed;
+                        SPStop *laststop = sp_last_stop(stopinfo->vector);
+                        gdouble offset = laststop->offset;
+                        double newradius = offset * oldradius;
+                        rg->r.computed = newradius;
+
+                        Inkscape::XML::Node *repr = SP_OBJECT_REPR(rg);
+                        sp_repr_set_svg_double(repr, "r", rg->r.computed);
+                        laststop->offset = 1;
+                        sp_repr_set_css_double (SP_OBJECT_REPR (laststop), "offset", 1);
+
+                        // iterate through midstops to set new offset values such that they won't move on canvas.
+                        SPStop *stop = sp_first_stop(stopinfo->vector);
+                        stop = sp_next_stop(stop);
+                        while ( stop != laststop ) {
+                            stop->offset = stop->offset / offset;
+                            sp_repr_set_css_double (SP_OBJECT_REPR (stop), "offset", stop->offset);
+                            stop = sp_next_stop(stop);
+                        }
+                        break;
+            }
+        }
+        else
+        { // delete the gradient from the object. set fill to unset  FIXME: set to fill of unselected node?
+            SPCSSAttr *css = sp_repr_css_attr_new ();
+
+            // stopinfo->spstop is the selected stop
+            Inkscape::XML::Node *unselectedrepr = SP_OBJECT_REPR(stopinfo->vector)->firstChild();
+            if (unselectedrepr == SP_OBJECT_REPR(stopinfo->spstop) ) {
+                unselectedrepr = unselectedrepr->next();
+            }
+
+            if (unselectedrepr == NULL) {
+                if (stopinfo->draggable->fill_or_stroke) {
+                    sp_repr_css_unset_property (css, "fill");
+                } else {
+                    sp_repr_css_unset_property (css, "stroke");
+                }
+            } else {
+                SPCSSAttr *stopcss = sp_repr_css_attr(unselectedrepr, "style");
+                if (stopinfo->draggable->fill_or_stroke) {
+                    sp_repr_css_set_property(css, "fill", sp_repr_css_property(stopcss, "stop-color", "inkscape:unset"));
+                    sp_repr_css_set_property(css, "fill-opacity", sp_repr_css_property(stopcss, "stop-opacity", "1"));
+                } else {
+                    sp_repr_css_set_property(css, "stroke", sp_repr_css_property(stopcss, "stop-color", "inkscape:unset"));
+                    sp_repr_css_set_property(css, "stroke-opacity", sp_repr_css_property(stopcss, "stop-opacity", "1"));
+                }
+                sp_repr_css_attr_unref (stopcss);
+            }
+            
+            sp_repr_css_change (SP_OBJECT_REPR (stopinfo->draggable->item), css, "style");
+            sp_repr_css_attr_unref (css);
+        }
+
+        endstoplist = g_slist_remove(endstoplist, stopinfo);
+        delete stopinfo;
+    }
+
+    if (document) {
+        sp_document_done ( document, SP_VERB_CONTEXT_GRADIENT, _("Delete gradient stop(s)") );
+    }
+}
+
+
 /*
   Local Variables:
   mode:c++