var name typo w/ last commit, fixed
authorerickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Mon, 12 Apr 2010 15:08:20 +0000 (15:08 +0000)
committererickson <erickson@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Mon, 12 Apr 2010 15:08:20 +0000 (15:08 +0000)
git-svn-id: svn://svn.open-ils.org/ILS/trunk@16207 dcc99617-32d9-48b4-a31d-7c20da2025e4

Open-ILS/src/perlmods/OpenILS/Application/Circ/CopyLocations.pm

index 5cf22d8..8172d44 100644 (file)
@@ -24,15 +24,15 @@ __PACKAGE__->register_method(
                /);
 
 sub cl_retrieve_all {
-       my( $self, $client, $orgId ) = @_;
+       my( $self, $client, $org_id ) = @_;
 
-       if(!$orgId) {
+       if(!$org_id) {
                my $otree = $U->get_org_tree();
-               $orgId = $otree->id;
+               $org_id = $otree->id;
        }
 
     return new_editor()->search_asset_copy_location({
-        owning_lib => $U->get_org_full_path($org_id);
+        owning_lib => $U->get_org_full_path($org_id)
     });
 }