From: lace <>
Date: Wed, 15 Feb 2006 11:09:57 +0000 (+0000)
Subject: Cease the DriverSurvey link completely.
X-Git-Url: http://git.jankratochvil.net/?p=www.jankratochvil.net.git;a=commitdiff_plain;h=6a05b2d3531156cc7ee4e974ac62fb75425fdcd0

Cease the DriverSurvey link completely.
---

diff --git a/project/captive/Index.pm b/project/captive/Index.pm
index 48580e8..96bb1ae 100755
--- a/project/captive/Index.pm
+++ b/project/captive/Index.pm
@@ -86,9 +86,10 @@ my $W=project::Lib->init(
 my $version="1.1.7";
 my $revision="0";
 
+my $survey_enable=0;	# Temporarily forced, enough data so far.
+
 Wrequire 'project::captive::DriverSurvey';
-my $survey_want=1;
-$survey_want=0;	# Temporarily forced, enough data so far.
+my $survey_want=$survey_enable;
 $survey_want=0 if $W->{"args"}{"file"};
 $survey_want=0 if project::captive::DriverSurvey::cookie();
 
@@ -132,7 +133,7 @@ print <<"HERE";
 </table>
 HERE
 
-if (!$survey_want) {
+if ($survey_enable && !$survey_want) {
 	print <<"HERE";
 <p>@{[ a_href 'DriverSurvey.pm','Linux Drivers Availability survey' ]} link
 - if you already answered before.</p>