From da2a9c3d5688de930284ece98ee238561eb1fdab Mon Sep 17 00:00:00 2001
From: Ben Jackson <ben@ben.com>
Date: Sat, 5 Mar 2011 22:12:50 -0800
Subject: [PATCH] func.sh: Fix a potential infinite loop in
 mendel_readsym_target

---
 func.sh | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/func.sh b/func.sh
index 118d651..e59b7a5 100755
--- a/func.sh
+++ b/func.sh
@@ -283,7 +283,7 @@ mendel_readsym_target() {
 	local val=$(mendel_readsym "$sym")
 	if [ -n "$val" ]
 	then
-		perl -e '@a = qw/X Y Z E F/; $c = 0; while (length $ARGV[0]) { $ARGV[0] =~ s#^(..)(..)(..)(..)##; printf "%s: %d\n", $a[$c], hex "0x$4$3$2$1"; $c++; }' "$val"
+		perl -e '@a = qw/X Y Z E F/; $c = 0; while (length $ARGV[0]) { last unless $ARGV[0] =~ s#^(..)(..)(..)(..)##; printf "%s: %d\n", $a[$c], hex "0x$4$3$2$1"; $c++; }' "$val"
 	fi
 }