making path an array..
authorerickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Wed, 6 Sep 2006 15:06:35 +0000 (15:06 +0000)
committererickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Wed, 6 Sep 2006 15:06:35 +0000 (15:06 +0000)
git-svn-id: svn://svn.open-ils.org/ILS/trunk@5997 dcc99617-32d9-48b4-a31d-7c20da2025e4

Open-ILS/src/perlmods/OpenILS/SIP/Item.pm

index 58670bf..0ba4de5 100644 (file)
@@ -83,6 +83,8 @@ sub run_attr_script {
        my $path = $config->{implementation_config}->{scripts}->{path};
        my $item_config_script = $config->{implementation_config}->{scripts}->{item_config};
 
+       $path = ref($path) eq 'ARRAY' ? $path : [$path];
+
        syslog('LOG_DEBUG', "OILS: Script path = $path, Item config script = $item_config_script");
 
        my $runner = 
@@ -93,7 +95,7 @@ sub run_attr_script {
                        }
                );
 
-       $runner->add_path($path);
+       $runner->add_path($_) for @$path;
        $runner->load($item_config_script);
 
        unless( $self->{item_config_result} = $runner->run ) {