From bfcb3d443c756290244d47bcaf2379796ee19663 Mon Sep 17 00:00:00 2001
From: Daniel Kahn Gillmor <dkg@fifthhorseman.net>
Date: Sun, 10 Jan 2010 11:28:24 -0500
Subject: [PATCH] cleaning up module includes for msva-perl

---
 msva | 11 +++++------
 1 file changed, 5 insertions(+), 6 deletions(-)

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();
-- 
2.26.2