take a few more things literally

[infobot.git] / src / Modules / scramble.pl

diff --git a/src/Modules/scramble.pl b/src/Modules/scramble.pl
index fbe91c500810cf94881c55fdeb690cbcc545462d..63161482979c6aae3c31f3b9ac24974ca47cde31 100644 (file)
--- a/src/Modules/scramble.pl
+++ b/src/Modules/scramble.pl
@@ -44,7 +44,7 @@ sub scramble
       }
 
       # shuffle the middle letters
-      $new_middle = join "", List::Util::shuffle(split //, $middle);
+      $new_middle = join '', List::Util::shuffle(split //, $middle);
     }
     while (($cnt < 10) && ($middle eq $new_middle));
 
@@ -56,7 +56,7 @@ sub scramble
   # been included in the original string
   $scrambled =~ s/\s+$//;
 
-  &::performStrictReply($scrambled||"Unknown Error Condition");
+  &::performStrictReply($scrambled||'Unknown Error Condition');
 }
 
 1;