From 4370d339310435cafdf8185c54526f4d7ceaa2c5 Mon Sep 17 00:00:00 2001
From: jluehrs2 <jluehrs2@uiuc.edu>
Date: Thu, 31 Jan 2008 16:29:16 -0500
Subject: don't chomp words we don't care about

---
 lib/Games/Word.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/lib/Games/Word.pm b/lib/Games/Word.pm
index ac7932e..88d3d56 100644
--- a/lib/Games/Word.pm
+++ b/lib/Games/Word.pm
@@ -21,9 +21,9 @@ sub random_word {
 
     open my $fh, '<', $word_list or die "Opening $word_list failed";
     while (<$fh>) {
-        chomp;
         $word = $_ if int(rand($.)) == 0;
     }
+    chomp $word;
 
     return $word;
 }
-- 
cgit v1.2.3-54-g00ecf