danf: curl-www metalink.cgi,1.1,1.2

[email protected] Thu, 01 Mar 2007 00:01:38 +0000

Newsgroups	gmane.comp.web.curl.www.cvs
Message-ID	<[email protected]>

Update of /cvsroot/curl/curl-www
In directory labb:/tmp/cvs-serv15193

Modified Files:
	metalink.cgi 
Log Message:
lowercase the URL type


Index: metalink.cgi
===================================================================
RCS file: /cvsroot/curl/curl-www/metalink.cgi,v
retrieving revision 1.1
retrieving revision 1.2
diff -u -d -r1.1 -r1.2
--- metalink.cgi	28 Feb 2007 22:12:09 -0000	1.1
+++ metalink.cgi	1 Mar 2007 00:01:35 -0000	1.2
@@ -229,7 +229,7 @@
 
             $i++;
             printf "<url type=\"%s\" location=\"%s\" preference=\"%d\">%s</url>\n",
-		    $proto{$url},
+		    lc($proto{$url}),
 		    gettld($where{$url}),
 		    $pref,
 		    CGI::escapeHTML($url);