perl/modules/W3C/LinkChecker/bin checklink,4.74,4.75

Update of /sources/public/perl/modules/W3C/LinkChecker/bin
In directory hutz:/tmp/cvs-serv28672

Modified Files:
	checklink 
Log Message:
Telling caches in the middle we want fresh copies of retrieved documents (Bug 4998)

Index: checklink
===================================================================
RCS file: /sources/public/perl/modules/W3C/LinkChecker/bin/checklink,v
retrieving revision 4.74
retrieving revision 4.75
diff -u -d -r4.74 -r4.75
--- checklink	18 Sep 2007 07:18:46 -0000	4.74
+++ checklink	18 Sep 2007 16:24:13 -0000	4.75
@@ -1159,6 +1159,9 @@
   # Set referer
   $request->referer($referer) if (!$Opts{No_Referer} && $referer);
 
+  # Telling caches in the middle we want a fresh copy (Bug 4998)
+  $request->header(Cache_Control => "max-age=0");
+
   # Do the query
   my $response = $ua->request($request);
 

Received on Tuesday, 18 September 2007 16:24:19 UTC