[Date Prev][Date Next] [Thread Prev][Thread Next] [Date Index] [Thread Index]

Re: PO files location (Was Re: [d-i] Problems with various debconf templates)



On Wed, Sep 04, 2002 at 09:30:32AM +0200, Denis Barbier wrote:
[...]
> Here is a patch against retriever/choose-mirror/makeheader.pl

Here it is.

Denis
Index: makeheader.pl
===================================================================
RCS file: /cvs/debian-boot/debian-installer/retriever/choose-mirror/makeheader.pl,v
retrieving revision 1.4
diff -u -u -r1.4 makeheader.pl
--- makeheader.pl	29 Aug 2002 11:37:15 -0000	1.4
+++ makeheader.pl	4 Sep 2002 07:16:35 -0000
@@ -46,6 +46,9 @@
 
 open (OUT, ">mirrors_$type.h") or die "mirrors_$type.h: $!";
 print OUT "/* Automatically generated; do not edit. */\n";
+print OUT "#ifndef _\n";
+print OUT "#define _(ARG) ARG\n";
+print OUT "#endif\n";
 
 # Poor man's mirror rating system: push-primary, push* (-secondary), others
 foreach my $site (keys %data) {
@@ -65,7 +68,8 @@
 	next unless exists $data{$site}->{"archive-$type"} and
 		    exists $data{$site}->{country};
 	print OUT "\t{",
-		  join(", ", $q.$site.$q, $q.$data{$site}->{country}.$q,
+		  join(", ", $q.$site.$q,
+			"_(".$q.$data{$site}->{country}.$q.")",
 			$q.$data{$site}->{"archive-$type"}.$q),
 		  "},\n";
 	$used_country{$data{$site}->{country}}=1;

Reply to: