tor-webwml.git

@@ -66,11 +66,10 @@ sub do_status(\%$$) {

 					$HTMLBASE, $htmlfile;

 			};

-			${$_[0]}{$priority}->{$path}->{'data'} = sprintf '<th>%s</th>

-				<td%s>Revision %s%s<br>

+			my $cell_path = sprintf '<th>%s</th>', $path;

+			my $cell_en = sprintf '<td%s>Revision %s%s<br>

 				<a href="https://svn.torproject.org/cgi-bin/viewcvs.cgi/website/trunk/%sen/%s?root=Tor&amp;view=markup">HEAD</a>

 				%s',

-				$path,

 				($obs ? ' bgcolor="#D3D3D3"' : ''),

 				$files{'en'}->{$file}->{'rev'},

 				($obs ? ' (obsolete)' :''),

@@ -78,6 +77,7 @@ sub do_status(\%$$) {

 				$file,

 				$validatorlink;

+			${$_[0]}{$priority}->{$path}->{'data'} = $cell_path . $cell_en;

 			${$_[0]}{$priority}->{$path}->{'urgency'} = 0;

 			for my $lang (@LANGUAGES) {

@@ -138,6 +138,8 @@ sub do_status(\%$$) {

 				};

 				delete $files{$lang}->{$file};

 			};

+

+			${$_[0]}{$priority}->{$path}->{'data'} .= $cell_en . $cell_path;

 		};

 	};

@@ -177,7 +179,8 @@ sub sort_and_print(\%) {

 		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);

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

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

 		print "</tr>\n";

 		for my $row (sort {$rows{$priority}->{$b}->{'urgency'} <=> $rows{$priority}->{$a}->{'urgency'}} keys %{$rows{$priority}}) {