From: Vincent Pit Date: Sat, 28 Feb 2009 19:52:26 +0000 (+0100) Subject: Remove some trailing spaces X-Git-Tag: v0.32~1 X-Git-Url: http://git.vpit.fr/?a=commitdiff_plain;h=3c3959510ad6433835274017cf8a6372c0f61303;p=perl%2Fmodules%2FVariable-Magic.git Remove some trailing spaces --- 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