From 0b58f41883b320a4bb6b8399a51c76620c0c221d Mon Sep 17 00:00:00 2001 From: dakkar Date: Wed, 17 Jun 2009 16:14:28 +0200 Subject: middle-click paste works again --- lib/URLQueue/MainController.pm | 9 ++++++--- lib/URLQueue/main.glade | 4 +++- 2 files changed, 9 insertions(+), 4 deletions(-) diff --git a/lib/URLQueue/MainController.pm b/lib/URLQueue/MainController.pm index a40c922..d6fe05a 100644 --- a/lib/URLQueue/MainController.pm +++ b/lib/URLQueue/MainController.pm @@ -78,8 +78,6 @@ sub drag_data_received { warn "What is $info??"; } - $self->{input}->set_from_stock('gnome-stock-book-green','large-toolbar'); - return 1; } @@ -99,6 +97,7 @@ sub button_release { $self->{input}->set_from_stock('gnome-stock-book-yellow','large-toolbar'); my $clipboard=Gtk2::Clipboard->get(Gtk2::Gdk->SELECTION_PRIMARY); $clipboard->request_text(sub{$self->handle_text($_[1])}); + return 1; } @@ -132,14 +131,18 @@ sub handle_text { } } - my ($title)=($text =~ m{ \A ^ (.*?) $}smx); + my ($title)=($text =~ m{ \A ^ (.+?) $}smx); for ($title,$text) { s{\A \s+}{}smx; s{\s+ \z}{}smx; } + $title = 'URLQueue paste' if $title eq ''; + $self->send_email($title,$text); + + $self->{input}->set_from_stock('gnome-stock-book-green','large-toolbar'); } sub handle_uris { diff --git a/lib/URLQueue/main.glade b/lib/URLQueue/main.glade index ac0a0f4..6955651 100644 --- a/lib/URLQueue/main.glade +++ b/lib/URLQueue/main.glade @@ -6,16 +6,18 @@ 50 50 True - GDK_BUTTON_PRESS_MASK | GDK_BUTTON_RELEASE_MASK | GDK_STRUCTURE_MASK + GDK_BUTTON_PRESS_MASK | GDK_BUTTON_RELEASE_MASK | GDK_KEY_PRESS_MASK | GDK_KEY_RELEASE_MASK | GDK_STRUCTURE_MASK URLQueue stock_bookmark GDK_WINDOW_TYPE_HINT_UTILITY True False + True + GDK_BUTTON_PRESS_MASK | GDK_BUTTON_RELEASE_MASK | GDK_KEY_PRESS_MASK | GDK_KEY_RELEASE_MASK | GDK_STRUCTURE_MASK gnome-stock-book-green 3 -- cgit v1.2.3