From 412f705af77ebd9ffa6ec6042ac5cee318d7ab59 Mon Sep 17 00:00:00 2001
From: Bert <ber.t@gmx.com>
Date: Wed, 4 Aug 2010 11:44:33 +0200
Subject: [PATCH] url-select: bug-fix: ignore all unused keys

---
 url-select | 8 +++++++-
 1 file changed, 7 insertions(+), 1 deletion(-)

diff --git a/url-select b/url-select
index 64c2f81..81b465c 100644
--- a/url-select
+++ b/url-select
@@ -228,6 +228,11 @@ sub refresh {
 }
 
 
+sub tt_write {
+	return 1;
+}
+
+
 sub activate {
 	my ($self) = @_;
 
@@ -242,6 +247,7 @@ sub activate {
 		key_press     => \&key_press,
 		refresh_begin => \&refresh,
 		refresh_end   => \&refresh,
+		tt_write      => \&tt_write,
 	);
 
 	()
@@ -251,7 +257,7 @@ sub activate {
 sub deactivate {
 	my ($self) = @_;
 
-	$self->disable("key_press", "refresh_begin", "refresh_end");
+	$self->disable("key_press", "refresh_begin", "refresh_end", "tt_write");
 	$self->view_start($self->{view_start});
 	$self->pty_ev_events($self->{pty_ev_events});