danf: curl-www metalink.cgi,1.3,1.4

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

Modified Files:
	metalink.cgi 
Log Message:
Added Belgium. Fixed abbreviation for Great Britain.


Index: metalink.cgi
===================================================================
RCS file: /cvsroot/curl/curl-www/metalink.cgi,v
retrieving revision 1.3
retrieving revision 1.4
diff -u -d -r1.3 -r1.4
--- metalink.cgi	1 Mar 2007 04:57:13 -0000	1.3
+++ metalink.cgi	11 Apr 2007 19:02:44 -0000	1.4
@@ -95,6 +95,9 @@
     elsif($country =~ /Austria/) {
         $tld="at";
     }
+    elsif($country =~ /Belgium/i) {
+        $tld="be";
+    }
     elsif($country =~ /Canada/) {
         $tld="ca";
     }
@@ -144,7 +147,8 @@
         $tld="us";
     }
     elsif($country =~ /United Kingdom/i) {
-        $tld="uk";
+        # NOTE: this is GB not UK, as the Metalink spec says
+        $tld="gb";
     }
     return $tld;
 }