Fix a typo on line 2790 of NCIP::ILS::Evergreen.

Signed-off-by: Jason Stephenson <jason@sigio.com>

diff --git a/lib/NCIP/ILS/Evergreen.pm b/lib/NCIP/ILS/Evergreen.pm
index 8f3be5b..6bc9620 100644 (file)
--- a/lib/NCIP/ILS/Evergreen.pm
+++ b/lib/NCIP/ILS/Evergreen.pm
@@ -2787,7 +2787,7 @@ sub find_location_failover {
         $location = $request->{$message}->{InitiationHeader}->{ToAgencyId}->{AgencyId};
         if ($location) {
             # Because Auto-Graphics. (This should be configured somehow.)
         $location = $request->{$message}->{InitiationHeader}->{ToAgencyId}->{AgencyId};
         if ($location) {
             # Because Auto-Graphics. (This should be configured somehow.)

-            $location = ~ s/^[^-]+-//;
+            $location =~ s/^[^-]+-//;

             $org_unit = $self->retrieve_org_unit_by_shortname($location);
         }
     }
             $org_unit = $self->retrieve_org_unit_by_shortname($location);
         }
     }