added Config::General support

[catagits/Catalyst-Plugin-ConfigLoader.git] / lib / Catalyst / Plugin / ConfigLoader / XML.pm

diff --git a/lib/Catalyst/Plugin/ConfigLoader/XML.pm b/lib/Catalyst/Plugin/ConfigLoader/XML.pm
index 9fb2ab4..f44346c 100644 (file)
--- a/lib/Catalyst/Plugin/ConfigLoader/XML.pm
+++ b/lib/Catalyst/Plugin/ConfigLoader/XML.pm
@@ -16,6 +16,9 @@ Loads XML files. Example:
         <component name="Controller::Foo">\r
             <foo>bar</foo>\r
         </component>\r
+        <model name="Baz">\r
+            <qux>xyzzy</qux>\r
+        </model>\r
     </config>\r
 \r
 =head1 METHODS\r
@@ -42,12 +45,7 @@ sub load {
 \r
     require XML::Simple;\r
     XML::Simple->import;\r
-    my $config = XMLin( $file, ForceArray => [ 'component' ] );\r
-\r
-    my $components = delete $config->{ component };\r
-       foreach my $element ( keys %$components ) {\r
-            $config->{ $element } = $components->{ $element };\r
-    }\r
+    my $config = XMLin( $file, ForceArray => [ qw( component model view controller ) ] );\r
 \r
     return $config;\r
 }\r