add comment about YAML::LibYAML
Chris Prather [Mon, 4 Jun 2007 09:18:13 +0000 (09:18 +0000)]
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!

lib/MooseX/Storage/Format/YAML.pm
t/020_basic_yaml.t

index 69033c4..08bc3c4 100644 (file)
@@ -2,6 +2,10 @@
 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] ]
@@ -13,8 +17,8 @@ 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 {
index ab37909..826e663 100644 (file)
@@ -1,5 +1,5 @@
 #!/usr/bin/perl
-
+$|++;
 use strict;
 use warnings;