X-Git-Url: http://git.vpit.fr/?a=blobdiff_plain;f=samples%2Fsynopsis.pl;fp=samples%2Fsynopsis.pl;h=4b99d413ac4e73c5b0ce545cb193ce170d23b707;hb=3c3959510ad6433835274017cf8a6372c0f61303;hp=c2576be205d5629a9543fffaec0889cbe5747455;hpb=4affb8304508fab43fb2247aa6d4d842c5fb82f2;p=perl%2Fmodules%2FVariable-Magic.git

diff --git a/samples/synopsis.pl b/samples/synopsis.pl
index c2576be..4b99d41 100644
--- a/samples/synopsis.pl
+++ b/samples/synopsis.pl
@@ -20,7 +20,7 @@ use Variable::Magic qw/wizard cast VMG_OP_INFO_NAME/;
                   store    => sub { print "key $_[2] stored in $_[-1]\n" },
                   copy_key => 1,
                   op_info  => VMG_OP_INFO_NAME;
-     
+
  my %h = (_default => 0, apple => 2);
  cast %h, $wiz, '_default';
  print $h{banana}, "\n"; # "0", because the 'banana' key doesn't exist in %h