perl/modules/W3C/LinkChecker/bin checklink,4.137,4.138

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

Modified Files:
	checklink 
Log Message:
Prefer text/html over application/xhtml+xml in Accept because of our lack of xml:base support.

Index: checklink
===================================================================
RCS file: /sources/public/perl/modules/W3C/LinkChecker/bin/checklink,v
retrieving revision 4.137
retrieving revision 4.138
diff -u -d -r4.137 -r4.138
--- checklink	30 Jan 2009 19:58:17 -0000	4.137
+++ checklink	30 Jan 2009 21:20:11 -0000	4.138
@@ -280,8 +280,11 @@
     require Apache2::RequestUtil;
   } if MP2();
 
-  my @content_types =
-    qw(application/xhtml+xml text/html application/vnd.wap.xhtml+xml;q=0.6);
+  my @content_types = qw(
+    text/html
+    application/xhtml+xml;q=0.9
+    application/vnd.wap.xhtml+xml;q=0.6
+  );
   $Accept = join(', ', @content_types, '*/*;q=0.5');
   my $re = join('|', map { s/;.*// ; quotemeta } @content_types);
   $ContentTypes = qr{\b(?:$re)\b}io;

Received on Friday, 30 January 2009 21:20:24 UTC