fix cargo cult code
r22129@alice-3: perigrin | 2007-06-02 11:11:21 -0500
kill buffering so that tests and errors print out cleanly
r22184@alice-3: perigrin | 2007-06-04 03:28:14 -0500
add an example HTTPD
r22185@alice-3: perigrin | 2007-06-04 04:16:54 -0500
HTTPD: It works! It Really Works!
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] ]
requires 'unpack';
sub thaw {
- my ( $class, $json, @args ) = @_;
- $class->unpack( Load($json), @args );
+ my ( $class, $yaml, @args ) = @_;
+ $class->unpack( Load($yaml), @args );
}
sub freeze {
#!/usr/bin/perl
-
+$|++;
use strict;
use warnings;