diff options
author | Marcin Owsiany <porridge> | 2011-07-30 13:13:25 +0000 |
---|---|---|
committer | Marcin Owsiany <porridge> | 2011-07-30 13:13:25 +0000 |
commit | c998594bfcfde60f3fbac9b98b9a72bcf3be60e1 (patch) | |
tree | 352ad4e5bb55f0a85443cc1ead8ed1fe91f4c368 /stattrans.pl | |
parent | 2605c5238f91205edeae6bf9374d54459309f0bc (diff) |
english/devel/website/stats/anoncvs-cors
CVS version numbers
stattrans.pl: 1.104 -> 1.105
english/devel/website/stats/Makefile: 1.4 -> 1.5
english/devel/website/stats/diffstat.js: INITIAL -> 1.1
Diffstat (limited to 'stattrans.pl')
-rwxr-xr-x | stattrans.pl | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/stattrans.pl b/stattrans.pl index b8e5d4cc9d9..cb673071f5f 100755 --- a/stattrans.pl +++ b/stattrans.pl @@ -386,6 +386,7 @@ foreach $lang (@search_in) { $o_body .= sprintf "<td>%s</td>", $transversion{"$lang/$file"}; $o_body .= sprintf "<td>%s</td>", $version{"$orig/$file"}; $o_body .= sprintf "<td>%s</td>", $msg; + $o_body .= sprintf "<td style='font-family: monospace' title='<gettext domain=\"stats\">Click to fetch diffstat data.</gettext>' onClick=\"setDiffstat('%s', '%s', '%s', this)\">+/-</td>", $file, $transversion{"$lang/$file"}, $version{"$orig/$file"}; if ($msg eq '<gettext domain="stats">Wrong translation version</gettext>' || $msg eq '<gettext domain="stats">The original no longer exists</gettext>') { $o_body .= "<td></td><td></td>"; } else { @@ -475,7 +476,8 @@ foreach $lang (@search_in) { if (open (HTML, ">$config{'htmldir'}/$l.wml")) { printf HTML "#use wml::debian::template title=\"<:=\$trans{\$CUR_ISO_LANG}{%s}:>\"\n", $lang; - print HTML "#use wml::debian::toc\n\n"; + print HTML "#use wml::debian::toc\n"; + print HTML "<script src='diffstat.js'></script>\n\n"; $color = get_color ($percent_a{$lang}); printf HTML '<table summary="<gettext domain="stats">Translation summary for</gettext> <:=$trans{$CUR_ISO_LANG}{'.$lang.'} :>" style="background-color: %s; width: 100%; font-weight: bold; margin: 0; text-align: center;">'."\n", $color; @@ -509,6 +511,7 @@ foreach $lang (@search_in) { print HTML '<th><gettext domain="stats">Translation</gettext></th>'."\n"; print HTML '<th><gettext domain="stats">Origin</gettext></th>'."\n"; print HTML '<th><gettext domain="stats">Comment</gettext></th>'."\n"; + print HTML '<th><gettext domain="stats">Diffstat</gettext></th>'."\n"; if ($opt_d eq "u") { print HTML '<th><gettext domain="stats">Unified diff</gettext></th><th><gettext domain="stats">Colored diff</gettext></th>'; } elsif ($opt_d eq "h") { print HTML '<th><gettext domain="stats">Colored diff</gettext></th><th><gettext domain="stats">Unified diff</gettext></th>'; } else { print HTML '<th><gettext domain="stats">Diff</gettext></th>'; } |