tor-webwml.git

@@ -1,5 +1,6 @@

 ## translation metadata

 # Revision: $Revision$

+# Translation-Priority: 1-high

 #include "head.wmi" TITLE="Download"

@@ -1,5 +1,6 @@

 ## translation metadata

 # Revision: $Revision$

+# Translation-Priority: 1-high

 #include "head.wmi" TITLE="anonymity online"

@@ -1,5 +1,6 @@

 ## translation metadata

 # Revision: $Revision$

+# Translation-Priority: 2-medium

 #include "head.wmi" TITLE="Overview"

@@ -38,17 +38,34 @@ sub do_status($$) {

 			};

 		};

 	};

+	my %priorities;

+	for my $file (keys %{$files{'en'}}) {

+		my $p = $files{'en'}->{$file}->{'all'}->{'Translation-Priority'};

+		if (defined $p) {

+			$priorities{$p} = 1;

+		};

+	};

+	my @priorities = sort {$a cmp $b} keys %priorities;

+	push @priorities, 'other';

+

+	my $HTMLBASE = (defined $ENV{'HTMLBASE'} ? $ENV{'HTMLBASE'} : 'https://www.torproject.org/') . ($dir eq '.' ? '' : $dir.'/');

+

 	print "<h1>$dir</h1>\n";

+	for my $priority (@priorities) {

+		print "<h2>$priority</h2>\n";

 		print "<table border=1>\n";

 		print "<tr>\n";

 		print "<th>File</th>\n";

 		printf("<th>%s (%s)</th>\n", $_, $LANGUAGES{$_}) for ('en', grep { $_ ne 'en' } @LANGUAGES);

 		print "</tr>\n";

-	my $HTMLBASE = (defined $ENV{'HTMLBASE'} ? $ENV{'HTMLBASE'} : 'https://www.torproject.org/') . ($dir eq '.' ? '' : $dir.'/');

 		for my $file (sort {$a cmp $b} keys %{$files{'en'}}) {

+			my $file_priority = $files{'en'}->{$file}->{'all'}->{'Translation-Priority'};

+			next if (defined $file_priority && $priority ne $file_priority);

+			next if (!defined $file_priority && $priority ne 'other');

+

 			my $obs = file_is_obsolete($dir, 'en', $file);

 			my $validatorlink = '';

 			my $htmlfile = $file;

@@ -119,6 +136,7 @@ sub do_status($$) {

 			print "</tr>\n\n";

 		};

 		print "</table>\n\n\n";

+	};

 	for my $lang (@LANGUAGES) {

 		next if $lang eq 'en';