Subject: | ControlStructures::ProhibitCascadingIfElse pod typo |
There's a typo in the example code. I also include one whitespace change
for aesthetic while I'm at it. Patch included inline as well as uploaded
as an attachment.
--- ProhibitCascadingIfElse.pm.orig 2007-04-12 04:31:15.000000000 -0400
+++ ProhibitCascadingIfElse.pm 2007-04-17 18:48:44.704099000 -0400
@@ -83,7 +83,7 @@
if ($condition1) { #ok
$foo = 1;
}
- elseif ($condition2) { #ok
+ elsif ($condition2) { #ok
$foo = 2;
}
elsif ($condition3) { #ok
@@ -92,7 +92,7 @@
elsif ($condition4) { #too many!
$foo = 4;
}
- else{ #ok
+ else { #ok
$foo = $default;
}
Subject: | perl-critic-pod.patch |
--- ProhibitCascadingIfElse.pm.orig 2007-04-12 04:31:15.000000000 -0400
+++ ProhibitCascadingIfElse.pm 2007-04-17 18:48:44.704099000 -0400
@@ -83,7 +83,7 @@
if ($condition1) { #ok
$foo = 1;
}
- elseif ($condition2) { #ok
+ elsif ($condition2) { #ok
$foo = 2;
}
elsif ($condition3) { #ok
@@ -92,7 +92,7 @@
elsif ($condition4) { #too many!
$foo = 4;
}
- else{ #ok
+ else { #ok
$foo = $default;
}