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

diff --git a/lib/with.pm b/lib/with.pm
index f07c3e0..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
@@ -350,7 +350,7 @@ L<Sub::Prototype::Util> 0.08.
 
 Vincent Pit, C<< <perl at profvince.com> >>, L<http://www.profvince.com>.
 
-You can contact me by mail or on #perl @ FreeNode (vincent or Prof_Vince).
+You can contact me by mail or on C<irc.perl.org> (vincent).
 
 =head1 BUGS