X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=README;fp=README;h=54b68ffbfde8a517d4c10e1eac61534fcd320d32;hb=463fb6b2306558e10e95198da1d0bbf0b5256e61;hp=b917cb2595fdcd281dc408a24ab91126dca47853;hpb=1b567146c0e93102a0e7a32cf5203a33936cea24;p=perl%2Fmodules%2FScope-Upper.git

diff --git a/README b/README
index b917cb2..54b68ff 100644
--- a/README
+++ b/README
@@ -2,14 +2,14 @@ NAME
     Scope::Upper - Act on upper scopes.
 
 VERSION
-    Version 0.14
+    Version 0.15
 
 SYNOPSIS
     "reap", "localize", "localize_elem", "localize_delete" and "WORDS" :
 
         package Scope;
 
-        use Scope::Upper qw/reap localize localize_elem localize_delete :words/;
+        use Scope::Upper qw<reap localize localize_elem localize_delete :words>;
 
         sub new {
          my ($class, $name) = @_;
@@ -72,7 +72,7 @@ SYNOPSIS
 
         package Try;
 
-        use Scope::Upper qw/unwind want_at :words/;
+        use Scope::Upper qw<unwind want_at :words>;
 
         sub try (&) {
          my @result = shift->();
@@ -84,14 +84,14 @@ SYNOPSIS
 
         sub zap {
          try {
-          my @things = qw/a b c/;
+          my @things = qw<a b c>;
           return @things; # returns to try() and then outside zap()
           # not reached
          };
          # not reached
         }
 
-        my @stuff = zap(); # @stuff contains qw/a b c/
+        my @stuff = zap(); # @stuff contains qw<a b c>
         my $stuff = zap(); # $stuff contains 3
 
 DESCRIPTION