From: Daniel Kahn Gillmor <dkg@fifthhorseman.net>
Date: Sun, 10 Jan 2010 16:28:24 +0000 (-0500)
Subject: cleaning up module includes for msva-perl
X-Git-Tag: msva-perl/0.1~31
X-Git-Url: http://git.tremily.us/gitweb.cgi?a=commitdiff_plain;h=bfcb3d443c756290244d47bcaf2379796ee19663;p=monkeysphere-validation-agent.git

cleaning up module includes for msva-perl
---

diff --git a/msva b/msva
index 63930c8..4771db6 100755
--- a/msva
+++ b/msva
@@ -6,12 +6,9 @@ use strict;
 {
   package MSVA;
 
-  use HTTP::Server::Simple::CGI;
-  use base qw(HTTP::Server::Simple::CGI);
-  use warnings;
-  use strict;
-  use Crypt::GPG;
-  use Crypt::X509;
+  use parent qw(HTTP::Server::Simple::CGI);
+  require Crypt::GPG;
+  require Crypt::X509;
 
   use JSON;
 
@@ -90,6 +87,8 @@ use strict;
 
     return '500 not yet implemented', { };
   }
+
+  1;
 }
 
 my $server = MSVA->new();