Cease the DriverSurvey link completely.

diff --git a/project/captive/Index.pm b/project/captive/Index.pm
index 48580e8..96bb1ae 100755 (executable)
--- 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>