From 82544b57e5f8796420bee9f2f27d473bcde508df Mon Sep 17 00:00:00 2001
From: Bert <ber.t@gmx.com>
Date: Fri, 13 Aug 2010 22:04:04 +0200
Subject: [PATCH] *-select: fixed unused keys scrolling; more doc

---
 README.md       |  2 +-
 clipboard       |  2 +-
 keyboard-select |  2 --
 url-select      | 25 ++++++++++---------------
 4 files changed, 12 insertions(+), 19 deletions(-)

diff --git a/README.md b/README.md
index bbf1a64..877bf4d 100644
--- a/README.md
+++ b/README.md
@@ -69,7 +69,7 @@ Requires xsel to be installed!
 
 After installing, put the folling lines in your .Xdefaults:
 
-    URxvt.perl-ext-common: clipboard
+    URxvt.perl-ext-common: ...,clipboard
     URxvt.keysym.M-c:   perl:clipboard:copy
     URxvt.keysym.M-v:   perl:clipboard:paste
     URxvt.keysym.M-C-v: perl:clipboard:paste_escaped
diff --git a/clipboard b/clipboard
index 11cba7e..cfcb304 100644
--- a/clipboard
+++ b/clipboard
@@ -8,7 +8,7 @@
 # Requires xsel to be installed!
 
 # Usage: put the following lines in your .Xdefaults:
-#   URxvt.perl-ext-common: clipboard
+#   URxvt.perl-ext-common: ...,clipboard
 #   URxvt.keysym.M-c:   perl:clipboard:copy
 #   URxvt.keysym.M-v:   perl:clipboard:paste
 #   URxvt.keysym.M-C-v: perl:clipboard:paste_escaped
diff --git a/keyboard-select b/keyboard-select
index d963813..1a8493d 100644
--- a/keyboard-select
+++ b/keyboard-select
@@ -67,8 +67,6 @@ sub key_press {
 		move_cursor($self, 'left');
 	} elsif ($char eq 'l' || $keysym == 0xff53) {
 		move_cursor($self, 'right');
-	} else {
-		return;
 	}
 
 	return 1;
diff --git a/url-select b/url-select
index bd1c500..407ac36 100644
--- a/url-select
+++ b/url-select
@@ -10,19 +10,19 @@
 # it also makes URLs clickable with the middle mouse button.
 
 # Usage: put the following lines in your .Xdefaults:
-# - URxvt.perl-ext-common: url-select
-# - URxvt.keysym.M-u: perl:url-select:select_next
+#   URxvt.perl-ext-common: ...,url-select
+#   URxvt.keysym.M-u: perl:url-select:select_next
 
 # Use Meta-u to activate URL selection mode, then use the following keys:
-# - 'k':    select next upward URL (also with Meta-u)
-# - 'j':    select next downward URL
-# - Return: open selected URL in browser and quit selection mode
-# - 'y':    copy (yank) selected URL and quit selection mode
-# - Escape: cancel URL selection mode
+#   k:      select next upward URL (also with Meta-u)
+#   j:      select next downward URL
+#   Return: open selected URL in browser and quit selection mode
+#   y:      copy (yank) selected URL and quit selection mode
+#   Escape: cancel URL selection mode
 
 # Options:
-# - URxvt.urlLauncher:   browser/command to open selected URL with
-# - URxvt.underlineURLs: if set to true, all URLs get underlined
+#   URxvt.urlLauncher:   browser/command to open selected URL with
+#   URxvt.underlineURLs: if set to true, all URLs get underlined
 
 
 use strict;
@@ -98,26 +98,21 @@ sub key_press {
 	if ($keysym == 0xff1b) {
 		# escape
 		deactivate($self);
-		return 1;
 	} elsif ($keysym == 0xff0d) {
 		# return
 		$self->exec_async($self->{browser}, ${$self->{found}[$self->{n}]}[4]);
 		deactivate($self);
-		return 1;
 	} elsif ($char eq 'y') {
 		$self->selection(${$self->{found}[$self->{n}]}[4]);
 		$self->selection_grab($event->{time});
 		deactivate($self);
-		return 1;
 	} elsif ($char eq 'k') {
 		select_next($self, -1);
-		return 1;
 	} elsif ($char eq 'j') {
 		select_next($self, 1);
-		return 1;
 	}
 
-	()
+	return 1;
 }