From a76aab8f96eb0798dfe6b307fa04d04e4e41d16b Mon Sep 17 00:00:00 2001
From: Daniel Friesel <derf@derf.homelinux.org>
Date: Fri, 22 May 2009 19:03:41 +0200
Subject: efa: --walk-speed: Use smart matches instead of regexes

---
 bin/efa | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/bin/efa b/bin/efa
index 4a779ec..7b42733 100755
--- a/bin/efa
+++ b/bin/efa
@@ -227,7 +227,7 @@ if ($restrict) {
 }
 
 if ($walk_speed) {
-	if ($walk_speed =~ /^(normal|fast|slow)$/) {
+	if ($walk_speed ~~ ['normal', 'fast', 'slow']) {
 		$post{changeSpeed} = $walk_speed;
 	} else {
 		print STDERR "--walk-speed usage: normal / fast / slow\n";
-- 
cgit v1.2.3