summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorGianni Ceccarelli <gianni.ceccarelli@broadbean.com>2022-07-07 15:33:55 +0100
committerGianni Ceccarelli <gianni.ceccarelli@broadbean.com>2022-07-07 15:33:55 +0100
commite5878318d0d2dbb02b426b1b5ee0fa8901f453f0 (patch)
treeaf0dfe2556bac26f29ecd43c0b709c271257461c
parentdeps & version (diff)
downloadURLQueue-gtk3.tar.gz
URLQueue-gtk3.tar.bz2
URLQueue-gtk3.zip
apparently *not* asking for URLs gives us URLs…gtk3
-rw-r--r--lib/URLQueue/MainController.pm10
-rw-r--r--lib/URLQueue/main3.glade1
2 files changed, 5 insertions, 6 deletions
diff --git a/lib/URLQueue/MainController.pm b/lib/URLQueue/MainController.pm
index cd360a1..6f6a76d 100644
--- a/lib/URLQueue/MainController.pm
+++ b/lib/URLQueue/MainController.pm
@@ -1,5 +1,5 @@
package URLQueue::MainController;
-use v5.32;
+use v5.26;
use Moo;
use experimental 'signatures';
use Gtk3;
@@ -41,20 +41,18 @@ sub set_icon($self,$icon) {
sub BUILD($self,$args) {
my $target_list=Gtk3::TargetList->new();
- $target_list->add_uri_targets(1);
+ #$target_list->add_uri_targets(1);
$target_list->add_text_targets(2);
$self->input->drag_dest_set(
- 'all',
+ ['all'],
[],
- [qw(default copy move link private ask)],
+ [qw(link)],
);
$self->input->drag_dest_set_target_list($target_list);
$self->set_icon('green');
}
sub drag_motion($self, $widget, $context, $x, $y, $time, @) {
- #$context->status($context->get_suggested_action,$time);
-
if (!$self->_dragging) {
$self->set_icon('open');
$self->_dragging(1);
diff --git a/lib/URLQueue/main3.glade b/lib/URLQueue/main3.glade
index a70c6d4..80b917d 100644
--- a/lib/URLQueue/main3.glade
+++ b/lib/URLQueue/main3.glade
@@ -24,6 +24,7 @@
<signal name="drag-data-received" handler="drag_data_received" swapped="no"/>
<signal name="drag-leave" handler="drag_leave" swapped="no"/>
<signal name="drag-motion" handler="drag_motion" swapped="no"/>
+ <!-- signal name="drag-drop" handler="drag_drop" swapped="no"/ -->
</object>
</child>
</object>