--- trunk/lib/WebPAC/Config.pm	2006/09/24 17:24:59	685
+++ trunk/lib/WebPAC/Config.pm	2006/09/25 12:51:33	700
@@ -14,11 +14,11 @@
 
 =head1 VERSION
 
-Version 0.01
+Version 0.02
 
 =cut
 
-our $VERSION = '0.01';
+our $VERSION = '0.02';
 
 =head1 SYNOPSIS
 
@@ -136,10 +136,13 @@
 =head2 iterate_inputs
 
   $config->iterate_inputs( sub {
-  	my $input = shift;
+  	my ($input, $database, $database_config_hash) = @_;
 	# ... do something with input config hash
   } );
 
+This function will also modify C<< $input->{normalize} >> to
+be C<ARRAY>, even with just one element.
+
 =cut
 
 sub iterate_inputs {
@@ -162,7 +165,10 @@
 
 		foreach my $input (@inputs) {
 			$log->debug("iterating over input ", dump($input));
-			$code_ref->($input);
+			if ( defined( $input->{normalize} ) && ref($input->{normalize}) ne 'ARRAY' ) {
+				$input->{normalize} = [ $input->{normalize} ];
+			}
+			$code_ref->($input, $database, $db_config);
 		}
 	}