[LON-CAPA-cvs] cvs: loncom /cgi plot.gif

[musolffc]

musolffc		Wed Oct 12 18:50:02 2016 EDT

  Modified files:              
    /loncom/cgi	plot.gif 
  Log:
  Reverting to 1.14
  
  Acquiring the content-length would hurt performance for large dynamically 
  generated images.
  
  The issue that 1.15 was trying to address seems to have been resolved with
  the latest release of Chrome (v53).  See bug #6837.
  
  
Index: loncom/cgi/plot.gif
diff -u loncom/cgi/plot.gif:1.15 loncom/cgi/plot.gif:1.16
--- loncom/cgi/plot.gif:1.15	Fri Aug 19 05:15:21 2016
+++ loncom/cgi/plot.gif	Wed Oct 12 18:50:02 2016
@@ -1,6 +1,6 @@
 #!/usr/bin/perl
 #
-# $Id: plot.gif,v 1.15 2016/08/19 05:15:21 musolffc Exp $
+# $Id: plot.gif,v 1.16 2016/10/12 18:50:02 musolffc Exp $
 #
 # Copyright Michigan State University Board of Trustees
 #
@@ -25,7 +25,6 @@
 # http://www.lon-capa.org/
 #
 use strict;
-use bytes;
 
 $|=1;
 
@@ -49,17 +48,14 @@
 
 if ($output eq 'gif' || $output eq 'png') {
     open(my $plot, "gnuplot $filename |");
-    my $image_content= '';
-    while (my $line = <$plot>) {
-        $image_content .= $line;
-    }
-    my $length = bytes::length($image_content);
+
     print <<"END";
 Content-type: image/$output
-Content-length: $length
 
-$image_content
 END
+    while (my $line = <$plot>) {
+	print($line);
+    }
 
 } elsif ($output eq 'eps') {
     print <<"END";