sydney/Autobot
1
0 Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fixed all violations.

Browse Source
This commit is contained in:
Elijah Perrault committed 2011-02-07 13:55:30 -07:00
1 parent c75309a51b
commit 62ed5af6e0
1 file changed
+1 -1
Download Patch File Download Diff File Expand all files Collapse all files
bin/critic
+1 -1
View File
@@ -22,7 +22,7 @@ if (!defined $ARGV[0]) {
if (defined $ARGV[1]) { if (defined $ARGV[1]) {
# If a different severity was passed, get it. # If a different severity was passed, get it.
my $ts = $ARGV[1]; my $ts = $ARGV[1];
$ts = lc($ts); $ts = lc $ts;
if ($ts =~ m/^(1|2|3|4|5|brutal|cruel|harsh|stern|gentle)/xsm) { if ($ts =~ m/^(1|2|3|4|5|brutal|cruel|harsh|stern|gentle)/xsm) {
# If it's valid, set severity to it. # If it's valid, set severity to it.