[MARKSTOS - Fri Jul 15 14:57:45 2005]:
Show quoted text> YAML support would be cool.
>
> Mark
I wrote some basic tests for you. They passed, without modifications to
the code.
diff -rN -u old-config-auto/t/config/test.yaml
new-config-auto/t/config/test.yaml
--- old-config-auto/t/config/test.yaml 1969-12-31 19:00:00.000000000
-0500
+++ new-config-auto/t/config/test.yaml 2005-08-11 17:51:25.000000000
-0500
@@ -0,0 +1,7 @@
+--- #YAML:1.0
+apple: good
+favorite colors:
+ - red
+ - white
+ - blue
+
diff -rN -u old-config-auto/t/yaml.t new-config-auto/t/yaml.t
--- old-config-auto/t/yaml.t 1969-12-31 19:00:00.000000000 -0500
+++ new-config-auto/t/yaml.t 2005-08-11 17:52:07.000000000 -0500
@@ -0,0 +1,13 @@
+use Test::More q/no_plan/;
+use strict;
+use File::Spec::Functions;
+
+use_ok('Config::Auto');
+
+my $config = Config::Auto::parse('test.yaml',path =>
catdir('t','config'));
+
+is($Config::Auto::Format,'yaml','Config file yaml formatted');
+is(ref($config->{'favorite colors'}),'ARRAY','Data structure');
+is($config->{'favorite colors'}[0],'red','favorite colors work');
+is($config->{'apple'},'good','apple good');
+