X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FSwitch.pm;h=31590b3dcc7b1832250def87ffa5e655cb706b3b;hb=0ea4badca0069846e0da75feed0fdb587e8fc275;hp=c76ac8eb1fc4b686f116e8df9a942a7b55a2c3cd;hpb=693b9afdd342d2c8a04595c97af15a9ecddcb2b8;p=p5sagit%2Fp5-mst-13.2.git diff --git a/lib/Switch.pm b/lib/Switch.pm index c76ac8e..31590b3 100644 --- a/lib/Switch.pm +++ b/lib/Switch.pm @@ -4,7 +4,7 @@ use strict; use vars qw($VERSION); use Carp; -$VERSION = '2.07'; +$VERSION = '2.09'; # LOAD FILTERING MODULE... @@ -52,7 +52,6 @@ sub filter return $status if $status<0; $_ = filter_blocks($_,$offset); $_ = "# line $offset\n" . $_ if $offset; undef $offset; - # print STDERR $_; return $status; } @@ -492,8 +491,8 @@ Switch - A switch statement for Perl =head1 VERSION -This document describes version 2.07 of Switch, -released May 15, 2002. +This document describes version 2.09 of Switch, +released June 12, 2002. =head1 SYNOPSIS