Drag and drop from Gtk::Tree to Gtk::CList

[Johan Ankarloo <johan ankarloo volvo com>]

Hi

I am trying to get drag and drop to work between a Gtk:Tree and a
Gtk::CList.

The problem that i have is that i can get the "drag_data_get" signal to
work but not the "drag_data_received" signal and it is that signal that
should trigger the actual change in the clist.

Code:
-------------------------------------------------------------------
$tree->drag_source_set('button1_mask', ['copy', 'move'],
{target=>'STRING', flags=>0, info=>0});

$tree->signal_connect('drag_data_get',sub{
        my ($w,$context, $data, $info, $time) = @_;
        print "drag_data_get\n";
                               });
$clist->drag_dest_set('all', ['copy', 'move'],{'target' => "STRING",
'flags' => 0, 'info' => 0});
$clist->signal_connect('drag_data_received',sub{
        my ($w, $context, $data, $info, $time) = @_;

        print "drag_data_received\n";
                               },$name);
-------------------------------------------------------------------


Any idea someone?

Regards

Johan Ankarloo