loncom/xml/lonxml.pm - diff

Return to lonxml.pm CVS log

Up to [LON-CAPA] / loncom / xml

-version 1.494.4.1, 2009/08/13 04:30:56
+version 1.494.4.2, 2009/10/04 03:40:13
  Line 1706  sub handler {
  	$request->set_last_modified(&Apache::lonnet::metadata($request->uri,
  							      'lastrevisiondate'));
      }
+     # Embedded Flash movies (e.g., from Camtasia) served from https will not display in IE
+     #   if XML config file has expired from cache.
+     if ($ENV{'SERVER_PORT'} == 443) {
+         if ($request->uri =~ /\.xml$/) {
+             my ($httpbrowser,$clientbrowser) =
+                 &Apache::loncommon::decode_user_agent($request);
+             if ($clientbrowser =~ /^explorer$/i) {
+                 delete $request->headers_out->{'Cache-control'};
+                 delete $request->headers_out->{'Pragma'};
+                 my $expiration = time + 60;
+                 my $date=strftime("%a, %d %b %Y %H:%M:%S GMT",gmtime($expiration));
+                 $request->headers_out->set("Expires" => $date);
+             }
+         }
+     }
      $request->send_http_header;
      return OK if $request->header_only;