X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=lib%2FMooseX%2FStorage%2FEngine.pm;h=11774696f4e441850627a710d37b7dbc48e0f84c;hb=a6ebb4c885376ccba57d836327035a0343f01e72;hp=430634ac74c2badee95e959fd468e649bd965081;hpb=ea1890074d79bfd64aaf3e9c9571c0708f684772;p=gitmo%2FMooseX-Storage.git diff --git a/lib/MooseX/Storage/Engine.pm b/lib/MooseX/Storage/Engine.pm index 430634a..1177469 100644 --- a/lib/MooseX/Storage/Engine.pm +++ b/lib/MooseX/Storage/Engine.pm @@ -26,7 +26,7 @@ has 'class' => (is => 'rw', isa => 'Str'); ## this is the API used by other modules ... sub collapse_object { - my $self = shift; + my ( $self, @args ) = @_; # NOTE: # mark the root object as seen ...