2008-07-13  Paul Smith  <psmith@gnu.org>

	* update-alternatives (config_alternatives): Test for non-numeric
	responses BEFORE checking for valid alternative numbers.

--- /usr/sbin/update-alternatives-orig	2008-05-30 12:52:10.000000000 -0400
+++ /usr/sbin/update-alternatives	2008-07-13 22:47:04.000000000 -0400
@@ -653,8 +653,8 @@
 	return if config_message() < 0;
 	$preferred=<STDIN>;
 	chop($preferred);
-    } until $preferred eq '' || $preferred>=1 && $preferred<=$#versions+1 &&
-	($preferred =~ m/[0-9]*/);
+    } until $preferred eq '' || ($preferred !~ /\D/ &&
+                                 $preferred>=1 && $preferred<=$#versions+1);
     if ($preferred ne '') {
 	$mode = "manual";
 	$preferred--;