diff src/http/modules/perl/nginx.pm @ 1178:a77f6980de50

rename $r->rflush to $r->flush
author Igor Sysoev <igor@sysoev.ru>
date Sat, 21 Apr 2007 07:43:23 +0000
parents ff0195dfbe0c
children e63a4d449398
line wrap: on
line diff
--- a/src/http/modules/perl/nginx.pm
+++ b/src/http/modules/perl/nginx.pm
@@ -92,6 +92,13 @@ use constant HTTP_GATEWAY_TIME_OUT      
 use constant HTTP_INSUFFICIENT_STORAGE      => 507;
 
 
+sub rflush {
+    my $r = shift;
+
+    $r->flush;
+}
+
+
 1;
 __END__