Bug 1141440: OPTION response for CORS requests to REST doesn't allow X-Bugzilla headers

- Fixed a new hash constant error that did not fail locally due to Perl version difference

diff --git a/Bugzilla/WebService/Server/REST.pm b/Bugzilla/WebService/Server/REST.pm
index 16e0419855527a0dc27fbb8ad72b163e1af0fbb3..d646dd7959146f8b60f252b4c3e1496330e7f71b 100644 (file)
--- a/Bugzilla/WebService/Server/REST.pm
+++ b/Bugzilla/WebService/Server/REST.pm
@@ -135,7 +135,7 @@ sub response {
 
     # Access Control
     my @allowed_headers = qw(accept content-type origin x-requested-with);
-    foreach my $header (keys API_AUTH_HEADERS()) {
+    foreach my $header (keys %{ API_AUTH_HEADERS() }) {
         # We want to lowercase and replace _ with -
         my $translated_header = $header;
         $translated_header =~ tr/A-Z_/a-z\-/;