Merge pull request #2076 from tlvb/p6-packages-foobar

[perl 6] changed code output to as stated in comments

1 files changed, 1 insertions, 2 deletions

diff --git a/perl6.html.markdown b/perl6.html.markdown
index 323bc0b3..6633b322 100644
--- a/perl6.html.markdown
+++ b/perl6.html.markdown
@@ -803,9 +803,8 @@ module Foo::Bar {
     my sub unavailable { # `my sub` is the default
       say "Can't access me from outside, I'm my !";
     }
+    say ++$n; # increment the package variable and output its value
   }
-
-  say ++$n; # lexically-scoped variables are still available
 }
 say $Foo::Bar::n; #=> 1
 Foo::Bar::inc; #=> 2