From 2aeb32e564fcaf1d6341dd5c97618c9c531e8184 Mon Sep 17 00:00:00 2001
From: Igor Sysoev <igor@sysoev.ru>
Date: Wed, 25 Oct 2006 13:56:32 +0000
Subject: $r->allow_ranges

---
 src/http/modules/perl/nginx.xs | 13 +++++++++++++
 1 file changed, 13 insertions(+)

(limited to 'src')

diff --git a/src/http/modules/perl/nginx.xs b/src/http/modules/perl/nginx.xs
index f65bbf093..d337edbd8 100644
--- a/src/http/modules/perl/nginx.xs
+++ b/src/http/modules/perl/nginx.xs
@@ -718,6 +718,19 @@ internal_redirect(r, uri)
     }
 
 
+void
+allow_ranges(r)
+    CODE:
+
+    ngx_http_request_t  *r;
+
+    ngx_http_perl_set_request(r);
+
+    r->allow_ranges = 1;
+
+    XSRETURN_EMPTY;
+
+
 void
 unescape(r, text, type = 0)
     CODE:
-- 
cgit