From: Jason Boyer <jboyer@library.in.gov>
Date: Tue, 9 May 2017 15:07:46 +0000 (-0400)
Subject: LP1689576: Fix ALARM -> ALRM Typo
X-Git-Url: https://old-git.evergreen-ils.org/?a=commitdiff_plain;h=71d57f10c48c31f2329166f5c98beceef1712073;p=Evergreen.git

LP1689576: Fix ALARM -> ALRM Typo

In Biblio.pm, when trying to set a timeout handler for $SIG{ALARM}
when retrieving cached facets as part of a catalog search,
a warning is dropped in the logs to this effect:
"No such signal: SIGALARM at
/usr/local/share/perl/5.18.2/OpenILS/Application/Search/Biblio.pm
line 1411"
When using $SIG{ALRM} instead the handler is set as expected.

Signed-off-by: Jason Boyer <jboyer@library.in.gov>
Signed-off-by: Galen Charlton <gmc@equinoxinitiative.org>
---

diff --git a/Open-ILS/src/perlmods/lib/OpenILS/Application/Search/Biblio.pm b/Open-ILS/src/perlmods/lib/OpenILS/Application/Search/Biblio.pm
index 014d250716..670076b89f 100644
--- a/Open-ILS/src/perlmods/lib/OpenILS/Application/Search/Biblio.pm
+++ b/Open-ILS/src/perlmods/lib/OpenILS/Application/Search/Biblio.pm
@@ -1408,7 +1408,7 @@ sub retrieve_cached_facets {
     return undef unless ($key and $key =~ /_facets$/);
 
     eval {
-        local $SIG{ALARM} = sub {die};
+        local $SIG{ALRM} = sub {die};
         alarm(2); # we'll sleep for as much as 2s
         do {
             die if $cache->get_cache($key . '_COMPLETE');