package MooseX::Storage::Format::YAML;
use Moose::Role;
+# When I add YAML::LibYAML
+# Tests break because tye YAML is invalid...?
+# -dcp
+
use Best [
[ qw[YAML::Syck YAML] ],
[ qw[Load Dump] ]
];
-our $VERSION = '0.02';
+our $VERSION = '0.02';
+our $AUTHORITY = 'cpan:STEVAN';
requires 'pack';
requires 'unpack';
sub thaw {
- my ( $class, $json, @args ) = @_;
- $class->unpack( Load($json), @args );
+ my ( $class, $yaml, @args ) = @_;
+ $class->unpack( Load($yaml), @args );
}
sub freeze {
=head1 NAME
-MooseX::Storage::Format::YAML
+MooseX::Storage::Format::YAML - A YAML serialization role
=head1 SYNOPSIS
=head1 COPYRIGHT AND LICENSE
-Copyright 2007 by Infinity Interactive, Inc.
+Copyright 2007-2008 by Infinity Interactive, Inc.
L<http://www.iinteractive.com>