Browse Source

some more rebranding

tags/1.61-4+devuan1.1
KatolaZ 4 years ago
parent
commit
917baa4826
2 changed files with 21 additions and 18 deletions
  1. +16
    -13
      examples/bin/popcon.pl
  2. +5
    -5
      examples/cgi-bin/popcon.cgi

+ 16
- 13
examples/bin/popcon.pl View File

@@ -60,16 +60,20 @@ sub htmlheader
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<title> Debian Popularity Contest </title>
<link rev="made" href="mailto:ballombe\@debian.org">
<title> Devuan Popularity Contest </title>
<!-- <link rev="made" href="mailto:ballombe\@debian.org">
<link href="http://www.debian.org/debian.css" rel="stylesheet" type="text/css">
-->
<link rel="shortcut icon" href="/favicon.ico">
</head>
<body>
<div id="header">
<div id="upperheader">
<div id="logo">
<a href="http://www.debian.org/" title="Debian Home"><img src="http://www.debian.org/Pics/openlogo-50.png" alt="Debian" width="50" height="61"></a>
<a href="http://www.devuan.org/" title="Devuan Home">
Devuan Home
<!-- <img src="http://www.debian.org/Pics/openlogo-50.png" alt="Devuan" width="50" height="61"> -->
</a>
</div> <!-- end logo -->
<p class="section"><a href="/">POPCON</a></p>
</div> <!-- end upperheader -->
@@ -77,13 +81,12 @@ sub htmlheader
<div id="navbar">
<p class="hidecss"><a href="#content">Skip Quicknav</a></p>
<ul>
<li><a href="http://www.debian.org/intro/about">About Debian</a></li>
<li><a href="http://www.debian.org/distrib/">Getting Debian</a></li>
<li><a href="http://www.debian.org/support">Support</a></li>
<li><a href="http://www.debian.org/devel/">Developers' Corner</a></li>
<li><a href="https://devuan.org/os/">About Devuan</a></li>
<li><a href="http://www.devuan.org/distrib/">Getting Devuan</a></li>
<li><a href="https://devuan.org/os/development">Developers' Corner</a></li>
</ul>
</div> <!-- end navbar -->
<p id="breadcrumbs"><a href="http://popcon.debian.org/">Debian Popularity Contest</a>
<p id="breadcrumbs"><a href="http://popcon.devuan.org/">Devuan Popularity Contest</a>
&#x2F;
${report_label}</p>
</div> <!-- end header -->
@@ -102,18 +105,18 @@ sub popconintro
&htmlheader($name, $sec);
print HTML <<"EOF";
<div id="content">
<h1>Debian Popularity Contest</h1>
<h1>Devuan Popularity Contest</h1>
<p> <em> The popularity contest project is an attempt to map the usage of
Debian packages. This site publishes the statistics gathered from report
sent by users of the <a
href="http://packages.debian.org/popularity-contest">popularity-contest</a>
Devuan packages. This site publishes the statistics gathered from report
sent by users of the
href="http://popcon.devuan.org">popularity-contest</a>
package. This package sends every week the list of packages installed and the
access time of relevant files to the server via email. Every day the server
anonymizes the result and publishes this survey.
For more information, read the <a href="${docurlbase}README">README</a> and the
<a href="${docurlbase}FAQ">FAQ</a>.
</em>
<p><em>To participate in this survey, install the <a href="http://packages.debian.org/popularity-contest">popularity-contest</a> package.</em> </p>
<p><em>To participate in this survey, install the <b>popularity-contest</b> package.</em> </p>
<p></p>
<form method="GET" action="http://qa.debian.org/popcon.php">Popcon statistics
for source package <input type="text" size="30" maxlength="80" name="package">


+ 5
- 5
examples/cgi-bin/popcon.cgi View File

@@ -15,7 +15,7 @@ use strict;
use CGI;
use Compress::Zlib;

my $email='survey@popcon.debian.org';
my $email='survey@popcon.devuan.org';

my $directsave = 0; # Enable to store on disk instead of sending an email
my $basedir = "/var/lib/popcon";
@@ -26,8 +26,8 @@ $ENV{PATH}="";
print "Content-Type: text/plain\n\n";
if (exists $ENV{REQUEST_METHOD} && $ENV{REQUEST_METHOD} ne "POST")
{
print "Debian Popularity-Contest HTTP-POST submission URL\n";
print "Visit http://popcon.debian.org/ for more info.\n";
print "Devuan Popularity-Contest HTTP-POST submission URL\n";
print "Visit http://popcon.devuan.org/ for more info.\n";
exit 0;
}

@@ -90,9 +90,9 @@ EOF
print POPCON @entry;
close POPCON;
}
print "Thanks for your submission to Debian Popularity-Contest!\n";
print "Thanks for your submission to Devuan Popularity-Contest!\n";
print "DEBIAN POPCON HTTP-POST OK\n";
} else {
print "The submission to Debian Popularity-Contest failed!\n";
print "The submission to Devuan Popularity-Contest failed!\n";
}
exit 0;

Loading…
Cancel
Save