[Popcon-commits] cvs commit to popularity-contest by ballombe

[popcon-commits@lists.alioth.debian.org]

Update of /cvsroot/popcon/popularity-contest
In directory haydn:/tmp/cvs-serv32334

Modified Files:
	popcon.pl 
Log Message:
Add an introductionnary text to popcon.pl


Index: popcon.pl
===================================================================
RCS file: /cvsroot/popcon/popularity-contest/popcon.pl,v
retrieving revision 1.9
retrieving revision 1.10
diff -u -d -r1.9 -r1.10
--- popcon.pl	14 Apr 2004 16:11:34 -0000	1.9
+++ popcon.pl	27 Apr 2004 16:44:03 -0000	1.10
@@ -47,6 +47,17 @@
 EOH
 }
 
+sub popconintro
+{
+  print HTML <<"EOH";
+  <p> <em> The popularity contest project is an attempt to map the usage of
+  Debian packages.  This site publishes the statistics gathered from report send by users of the <a href="http://packages.debian.org/popularity-contest">popularity-contest</a> package. This package send every week the list of packages installed and the access time of relevant files to the server via email. Every day the server anonymize the result and publishes this survey.
+  For more information, read the <a href="README">README</a> and the 
+  <a href="FAQ">FAQ</a>.
+  </em> <p>
+EOH
+}
+
 sub htmlfooter
 {
   my $date=gmtime();
@@ -323,6 +334,7 @@
 {
 	open HTML , "> $popcon/index.html";
 	&htmlheader;
+	&popconintro;
 	printf HTML ("<p>Statistics for the whole archive sorted by fields: <pre>",$sec);
 	print_by (".",$_) for (@fields);
 	print HTML ("</pre>\n </p> \n");