[open-ils-commits] r9346 - branches/acq-experiment/Open-ILS/src/perlmods/OpenILS/Application

[svn at svn.open-ils.org]

Author: erickson
Date: 2008-04-14 13:57:08 -0400 (Mon, 14 Apr 2008)
New Revision: 9346

Modified:
   branches/acq-experiment/Open-ILS/src/perlmods/OpenILS/Application/Actor.pm
Log:
fixed method name typo

Modified: branches/acq-experiment/Open-ILS/src/perlmods/OpenILS/Application/Actor.pm
===================================================================
--- branches/acq-experiment/Open-ILS/src/perlmods/OpenILS/Application/Actor.pm	2008-04-14 17:38:59 UTC (rev 9345)
+++ branches/acq-experiment/Open-ILS/src/perlmods/OpenILS/Application/Actor.pm	2008-04-14 17:57:08 UTC (rev 9346)
@@ -1354,7 +1354,7 @@
 
     # build a list of org trees
     return get_org_descendants($self, $conn, $orglist)
-        if $self->api_name =~ /org_tree_set/;
+        if $self->api_name =~ /org_tree_list/;
 
     my @list;
     push(@list, @{$U->get_org_descendants($_)}) for @$orglist;