X-Git-Url: http://git.vpit.fr/?p=perl%2Fmodules%2Fwith.git;a=blobdiff_plain;f=lib%2Fwith.pm;fp=lib%2Fwith.pm;h=878f8f6e1fc30c3338814512e57c4a4b869ba3d1;hp=54d00c3c4d548bb19a50040424292e6ab3ab7cf4;hb=0546f5a2c8201fddeef412c0d8d75eaccf454f41;hpb=4f38d9bf7a6e01d2b6ffb500ea71171fc3c3d7f2

diff --git a/lib/with.pm b/lib/with.pm
index 54d00c3..878f8f6 100644
--- a/lib/with.pm
+++ b/lib/with.pm
@@ -47,7 +47,7 @@ our $VERSION = '0.02';
      use with \$deuce;
      hlagh;        # Deuce::hlagh 1
      Pants::hlagh; # Pants::hlagh
- 
+
      {
       use with \Deuce->new(2);
       hlagh;       # Deuce::hlagh 2
@@ -95,7 +95,7 @@ my $extractor = [
 
 my %skip;
 $skip{$_} = 1 for qw/my our local sub do eval goto return
-                     if else elsif unless given when or and 
+                     if else elsif unless given when or and
                      while until for foreach next redo last continue
                      eq ne lt gt le ge cmp
                      map grep system exec sort print say
@@ -315,7 +315,7 @@ When the script is executed, deferred calls first fetch the default object back
 A call will never be dispatched to a method whose name is one of :
 
     my our local sub do eval goto return
-    if else elsif unless given when or and 
+    if else elsif unless given when or and
     while until for foreach next redo last continue
     eq ne lt gt le ge cmp
     map grep system exec sort print say