Upgrade to Switch 2.06.

p4raw-id: //depot/perl@13007

3 files changed, 36 insertions, 4 deletions

diff --git a/lib/Switch/Changes b/lib/Switch/Changes
index d741a69006..add21302bf 100755
--- a/lib/Switch/Changes
+++ b/lib/Switch/Changes
@@ -48,3 +48,14 @@ Revision history for Perl extension Switch.
 	- Changed licence for inclusion in core distribution
 
 	- Added new test file for non-fallthrough and nested switches
+
+
+2.06	Wed Nov 14 16:18:54 2001
+
+	- Fixed parsing of ternary operators in Switch'ed source code
+	  (at the expense of no longer correctly parsing ?...? regexes)
+	  (thanks Mark)
+
+	- Fixed the parsing of embedded POD (thanks Brent)
+
+	- Fixed bug encountered when -s or -m file test used (thanks Jochen)
diff --git a/lib/Switch/README b/lib/Switch/README
index 312571bbde..f2cf139d1b 100644
--- a/lib/Switch/README
+++ b/lib/Switch/README
@@ -1,5 +1,5 @@
 ==============================================================================
-                      Release of version 2.05 of Switch
+                      Release of version 2.06 of Switch
 ==============================================================================
 
 
@@ -26,12 +26,16 @@ COPYRIGHT
 
 ==============================================================================
 
-CHANGES IN VERSION 2.05
+CHANGES IN VERSION 2.06
 
 
-	- Changed licence for inclusion in core distribution
+	- Fixed parsing of ternary operators in Switch'ed source code
+	  (at the expense of no longer correctly parsing ?...? regexes)
+	  (thanks Mark)
 
-	- Added new test file for non-fallthrough and nested switches
+	- Fixed the parsing of embedded POD (thanks Brent)
+
+	- Fixed bug encountered when -s or -m file test used (thanks Jochen)
 
 
 ==============================================================================
diff --git a/lib/Switch/t/nested.t b/lib/Switch/t/nested.t
index b4aceac345..87451eda00 100755
--- a/lib/Switch/t/nested.t
+++ b/lib/Switch/t/nested.t
@@ -14,6 +14,15 @@ for my $count (1..3, 'four')
 {
 	switch ([$count])
 	{
+
+=pod
+
+=head1 Test
+
+We also test if Switch is POD-friendly here
+
+=cut
+
 		case qr/\d/ {
 				switch ($count) {
 					case 1     { print "ok 1\n" }
@@ -23,3 +32,11 @@ for my $count (1..3, 'four')
 		case 'four' { print "ok 4\n" }
 	}
 }
+
+__END__
+
+=head1 Another test
+
+Still friendly???
+
+=cut