On Thu, Jul 19, 2001 at 11:37:01AM +0200, Martin Schulze wrote: > Since Joy has "stolen" the script even thoug I objected, fix > the crap yourself. I'm out.
Er, okay, though I don't see why you sent two tons of old -www mail back to the list :) > Output corresponding to the changed script is in > > http://ulises.adi.uam.es/~ender/webstats/ > > The patch to webwmlstattrans is attached. I'd like that you apply > it, Joey. :-) > --- webwml-stattrans.orig Mon Jun 18 17:07:02 2001 > +++ webwml-stattrans Mon Jun 18 17:27:45 2001 > @@ -27,6 +27,8 @@ > 'wmlpat' => '*.wml', > 'title' => 'Website Translation Statistics', > 'verbose' => 0, > + #'diff_type' => '', > + 'diff_type' => '&diff_format=h', > ); > > $max_versions = 5; > @@ -231,15 +233,24 @@ > $msg = check_translation ($version{"$lang/$file"}, > $version{"english/$file"}, "$lang/$file"); > if (length ($msg)) { > $body .= sprintf ("<tr><td><a > href=\"http://www.debian.org/%s.%s.html\";>%s</a></td><td>%s</td><td>%s</td>" > - ."<td>%s</td></tr>\n", > - $file, $l, $file, $version{"$lang/$file"}, > $version{"english/$file"}, $msg); > + ."<td>%s</td><td>" > + ." <a > href=\"http://cvs.debian.org/webwml/english/%s.wml.diff\?r1=%s\&r2=%s\&cvsroot=webwml%s\";>" > + ."Diff between %s and %s</a></td></tr>\n", > + $file, $l, $file, $version{"$lang/$file"}, > $version{"english/$file"}, $msg, $file, $version{"$lang/$file"}, > + $version{"english/$file"}, > $config{'diff_type'}, $version{"$lang/$file"}, $version{"english/$file"}); > $outdated{$lang}++; > } > } > if ($body) { > print HTML "<h3>Out-dated pages:</h3>"; > print HTML "<table border=0 cellpadding=1 cellspacing=1>\n"; > - print HTML > "<tr><th>File</th><th>Translated</th><th>English</th><th>Comment</th></tr>\n"; > + print HTML > "<tr><th>File</th><th>Translated</th><th>English</th><th>Comment</th>"; > + if ($config{'diff_type'}) { > + print HTML "<th>Colored diff</th>"; > + } else { > + print HTML "<th>Unified diff</th>"; > + } > + print HTML "</tr>\n"; > print HTML $body; > print HTML "</table>\n"; > } I'll go add this. -- Digital Electronic Being Intended for Assassination and Nullification
