Ticket #2057: change_to_sysseek.diff

modules/stream/handler.pl

@@ -103 +103 @@
                 );
 
 # Seek to the requested position
-    seek DATA, $start, 0;
+    sysseek DATA, $start, 0;
 
 # Print the content to the browser
     my $buffer;
@@ -115 +115 @@
             $readsize = $size = $cur_pos;
         }
     # Print the data to the browser
-        read DATA, $buffer, $readsize;
+        sysread DATA, $buffer, $readsize;
         print $buffer;
     # Time to leave?
         last if ($cur_pos + $readsize >= $size);