# HG changeset patch
# User Maxim Dounin <mdounin@mdounin.ru>
# Date 1368283736 -14400
# Node ID e530b88b088bcb2490899bc811ab4616e3797707
# Parent  2ba8bb27114efb6f9858ab0e4dd90af201e47327
Perl: extra "return" removed.

diff --git a/src/http/modules/perl/nginx.xs b/src/http/modules/perl/nginx.xs
--- a/src/http/modules/perl/nginx.xs
+++ b/src/http/modules/perl/nginx.xs
@@ -419,7 +419,7 @@ request_body(r)
 
     p = ngx_pnalloc(r->pool, len);
     if (p == NULL) {
-        return XSRETURN_UNDEF;
+        XSRETURN_UNDEF;
     }
 
     data = p;