Thanks for the patch, committed.
Best regards
El 15/01/17 a las 17:05, victory escribió:
> it lacked define-tag for index; revised patch below:
>
> Index: stattrans.pl
> ===================================================================
> --- stattrans.pl (revision 240)
> +++ stattrans.pl (working copy)
> @@ -535,6 +535,11 @@
> 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";
> + printf HTML qq|<define-tag transstatslink><a
> href="%s">webwml-stattrans</a></define-tag>\n|,
> + alioth_cvs_view_url('stattrans.pl');
> + print HTML "<define-tag createdwith><address>\n";
> + print HTML "<gettext domain=\"stats\">Created with
> <transstatslink></gettext>\n"
> + print HTML "</address></define-tag>\n";
> print HTML "<script src=\"diffstat.js\"
> type=\"text/javascript\"></script>\n\n";
> $color = get_color ($percent_a{$lang});
>
> @@ -655,10 +660,7 @@
> print HTML "</table>\n";
> }
>
> - print HTML
> - '<address><gettext domain="stats">Created with</gettext> <a
> href="'
> - . alioth_cvs_view_url('stattrans.pl')
> - . '">webwml-stattrans</a></address>' . "\n";
> + print HTML "<createdwith/>\n";
> close (HTML);
> } else {
> print "Can't open $config{'htmldir'}/$l.wml\n";
> @@ -675,6 +677,11 @@
>
> print HTMLI "#use wml::debian::stats_tags\n";
> printf HTMLI "#use wml::debian::template title=\"%s\"\n\n", $config{'title'};
> +printf HTMLI qq|<define-tag transstatslink><a
> href="%s">webwml-stattrans</a></define-tag>\n|,
> + alioth_cvs_view_url('stattrans.pl');
> +print HTMLI "<define-tag createdwith><address>\n";
> +print HTMLI "<gettext domain=\"stats\">Created with
> <transstatslink></gettext>\n"
> +print HTMLI "</address></define-tag>\n";
> print HTMLI '<h2><gettext domain="stats">Translated web
> pages</gettext></h2>'."\n";
> printf HTMLI "<p><stats_pages
> %d></p>\n",($wml{'english'}+$untranslated{'english'});
>
> @@ -809,10 +816,7 @@
> print HTMLI "</tbody>";
> print HTMLI "</table>\n";
>
> -print HTMLI
> - '<address><gettext domain="stats">Created with</gettext> <a href="'
> - . alioth_cvs_view_url('stattrans.pl')
> - . '">webwml-stattrans</a></address>' . "\n";
> +print HTMLI "<createdwith/>\n";
> close (HTMLI);
>
> print "done.\n" if ($config{'verbose'});
>
>
--
Laura Arjona Reina
https://wiki.debian.org/LauraArjona
