# Tests break because tye YAML is invalid...?
# -dcp
-use Best [
- [ qw[YAML::Syck YAML] ],
- [ qw[Load Dump] ]
-];
-
-our $VERSION = '0.20';
-our $AUTHORITY = 'cpan:STEVAN';
-
requires 'pack';
requires 'unpack';
sub thaw {
my ( $class, $yaml, @args ) = @_;
- $class->unpack( Load($yaml), @args );
+ require YAML::Any;
+ $class->unpack( YAML::Any::Load($yaml), @args );
}
sub freeze {
my ( $self, @args ) = @_;
+ require YAML::Any;
Dump( $self->pack(@args) );
}